用作项目计数器的静态variables的生存期

我已经声明了一个静态variables来作为一个项目计数器使用。 电子表格将由运行代码的不同人员更新并随后保存工作簿。 但是，当我testing我的代码，并进行任何更改时，静态variables重置为1 ：

 Static strn, mechn, ein As Integer Dim i, lrow As Long Dim num as String Set wb = ThisWorkbook Set ws = wb.Sheets("test") lrow = ws.Range("A" & Rows.Count).End(xlUp).Row i = 1 If reqb = "blah" Then Do Until ws.Range("B" & i).Value = "bloop" i = i + 1 Loop strn = strn + 1 num = "1-" & strn End If 

我最终确定我的代码后会重置吗？

Answer 1

正如您在答复的评论中指出的那样，只要项目/工作簿closures，您的“静态”variables就会重置。 要创build一个永久variables，将其附加到一个Excel对象。 正如评论中指出的那样，最简单的方法是将值赋给单元格; 其他选项包括创build一个不可见的形状和调整形状的标题等。