Question

这是我的循环代码，效果很好

i = 3
Do
Cells(i, 8) = 17012
i = i + 1
Loop Until i = 11

我希望“循环直到i = 11”才能更像“循环直到i = f”或其他一些变量字母并不重要。我希望F表示按下另一个按钮的次数的值。下面的代码表示点击次数。但是在另一个cmd按钮下。

Static Counter As Integer
Counter = Counter + 1
cmdworkstationadd.Caption = Counter

所以我的想法是输出的代码是：

i = 3
Do
Cells(i, 8) = 17012
i = i + 1
Loop Until i = F

但是f没有值，所以循环永远不会停止，因为F被视为0.如何将计数器的值设置为F，以便F具有值

Answer 1

这完全取决于您声明变量的位置：

Option Explicit
Public Counter As Integer

Sub SetCounter()
    Counter = 15
End Sub

Sub PrintCounter()
    Debug.Print Counter
End Sub

Answer 2

始终使用

Option Explicit

......这样做，大多数错误会在实际发生之前显示出来。