作者foreverkn (时间是最好的疗剂)
看板Visual_Basic
标题[VBA ] 执行阶段的错误:此处需要物件
时间Tue Jan 24 21:48:29 2012
我的程式码如下，有一行出现错误，请大家帮小弟我看看是哪里出问题，感谢万分!
Dim d As Integer
Dim SpinnerValue As Integer
With 画图表 '画图表是一个 Sheet
SpinnerValue = .Shapes("Spinner 26").ControlFormat.Value
'上面这行出现 "执行阶段错误 '424': 此处需要物件"
RightEnd = .Range("$M$2").Value + .Range("$M$3").Value
d = RightEnd - SpinnerValue
If d <= 0 Then
.Shapes("Spinner 26").ControlFormat.Value = SpinnerValue - 1
Exit Sub
End If
.Shapes("Scroll Bar 27").ControlFormat.Value = d
.Shapes("Scroll Bar 27").ControlFormat.Max = .Range("$M$1").Value -
.Range("$M$2").Value
End With
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.171.230.144
※ 编辑: foreverkn 来自: 218.171.230.144 (01/24 21:49)
1F：→ yauhh:"此处需要物件"是指它找不到物件,原因可能是with那句它读不 01/24 22:08
2F：→ yauhh:到一个物件. 你可以把"画图表"改名为英文名称试试. 01/24 22:08
3F：→ foreverkn:我也怀疑是名称问题，想请问with不支援中文名称吗? 01/25 23:37
4F：→ yauhh:你这个画图表有建立物件吗?应该可以测一下是不是nothing 01/25 23:55
5F：→ foreverkn:原来真的不支援中文，要用真正的Sheet1或Sheet30之类的 01/27 20:17