佛山小老鼠说Excel VBA

mm050610 · 发表于 2013-8-19 22:19

学习中，谢谢分享！

genuinechenfp · 发表于 2013-8-20 11:23

我在模块中写以下语句为什么运行显示语法错误啊
Sub Range 表示()
Range("A1") = "哈哈"
End Sub

genuinechenfp · 发表于 2013-8-20 12:50

Sub test12() '这个程序是完善的，不会报错
Dim r As Single, S As Single
r = InputBox("请输入圆的半径", "圆半径", 0)
If r = "" Or StrPtr(r) = 0 Then Exit Sub
S = 3.14 * r ^ 2
MsgBox "圆的面积是:" & S
End Sub

结果：运行时错误13，类型不匹配，WHY？

zzw9912 · 发表于 2013-8-20 13:07

学习学习，谢谢

bible20139 · 发表于 2013-8-21 20:24

谢谢分享

nthzm2008 · 发表于 2013-8-23 21:18

非常好，讲得比较明白！我会努力的！

time666 · 发表于 2013-8-24 16:18

受益匪浅啊

D_.J · 发表于 2013-8-25 10:54

谢谢分享

D_.J · 发表于 2013-8-25 10:59

genuinechenfp 发表于 2013-8-20 11:23
我在模块中写以下语句为什么运行显示语法错误啊
Sub Range 表示()
Range("A1") = "哈哈"

Sub Range 表示()
Range与表示之间有空格，把空格去了试一下

Sub Range表示()

ykx042907 · 发表于 2013-8-28 11:34

谢谢分享, 辛苦了!

		自动登录	找回密码
密码			免费注册