對象“ _Global”的方法“ Range”的錯誤失敗

Question

我正在運行一個計時器。 我希望計時器倒數。 所有這一切。 但是，計時器需要在不同的行中經過一堆時間，但在按下按鈕之前，不應移至下一次。 這將使我能夠提取倒計時中的時間。

有任何想法嗎？ （我正在使用表面處理作為按鈕，它所做的只是一個黑色的單元格）。 我希望當我這樣做時，時間會重新設置並轉到下一欄。

Sub GoGo()

將公共GoGo作為布爾值

GoGo = True

結束子

子Runn（）

昏昏欲睡，只要我長

        For i = 23 To 32


           DoEvents
            If GoGo = True Then

                If Cells(i, 1) <> 0 Then

             Range("B5").Value = Cells(i, 2).Value
             Range("E5").Value = Cells(i, 3).Value
             Range("E11").Value = Range("C33").Value

             Application.Run ("Realcount")
             Application.Run ("Realcount2")

            End If
            End If



            Next i

結束子

Answer 1

您不能執行Range（i，2）或Range（i，3）。 您是說Cells（i，2）嗎？