VBA 循环遍历工作表单元格并弹出消息框

这段代码中的方法和数据成员都是正确的，并且可以正常运行。它的功能是循环遍历工作表中 'A1' 到 'A6' 单元格中的值，并在每次循环中弹出一个消息框，显示当前单元格中的值。

Private Sub CommandButton1_Click()
Dim Name As String
Dim i As Integer
For i = 0 To 6
Name = ThisWorkbook.Range('A' & i).Value
MsgBox Name
Next i
End Sub