vba - 工作表和模块之间的变量不合作

Question

我的 Module1 宏看不到工作表代码中所述变量的值。知道为什么吗？一切都是公开的。

在我的工作表中，我有这个:

Public oldVal As Variant

Public Sub Worksheet_SelectionChange(ByVal Target As Range)
oldVal = Target.Value
End Sub

在 Module1 中，我有一个连接到按钮的宏，它应该(出于测试目的)只打印 oldVal，但它不起作用。消息框是空的。

Public Sub button_Click1()
MsgBox oldVal
End Sub

知道为什么它不从工作表中获取变量“OldVal”的值吗？

谢谢。

Answer 1

您应该在常规模块中声明您的公共(public)变量以避免这种情况。

因为 Sheet 的模块 ThisSession, ThisWorkbook, ... 是类的模块，所以您声明的变量被视为该类/对象的属性。

您的常规模块代码

Public oldVal As Variant

Public Sub button_Click1()
    MsgBox oldVal
End Sub

您的工作表模块代码

Public Sub Worksheet_SelectionChange(ByVal Target As Range)
     oldVal = Target.Value
End Sub