如何计算运行宏的次数

Question

每次运行宏时，我都需要计数。目前，这就是我正在做的事情：

Public i As Integer

Sub Macro5()

i = i + 1

Cells(5, 5).Select
ActiveCell.FormulaR1C1 = "=" & i // printing the i in 5,5 cell

End Sub

但是每次我再次运行Macro5时，我都会设置为1（最初为0，但是加1为1）。
知道我怎么算吗？谢谢！

Answer 1

如果在子例程之外和代码模块顶部声明全局变量i，您的代码将正常工作。

Answer 2

根据您的代码，这将是正确的。

Sub Macro5()

Cells(5, 5).Select
ActiveCell.FormulaR1C1 = ActiveCell.FormulaR1C1 + 1

End Sub