[VBA ] 執行階段的錯誤:此處需要物件

[foreverkn (時間是最好的療劑)]

我的程式碼如下，有一行出現錯誤，請大家幫小弟我看看是哪裡出問題，感謝萬分!


    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)
→ yauhh:"此處需要物件"是指它找不到物件,原因可能是with那句它讀不
→ yauhh:到一個物件. 你可以把"畫圖表"改名為英文名稱試試.
→ foreverkn:我也懷疑是名稱問題，想請問with不支援中文名稱嗎?
→ yauhh:你這個畫圖表有建立物件嗎?應該可以測一下是不是nothing
→ foreverkn:原來真的不支援中文，要用真正的Sheet1或Sheet30之類的