是否可以在Excel VBA宏中的各个模块之间共享单个变量?我正在尝试编写一个代码,在该代码中,我从用户表单文本框中读取值,然后在另一个模块中解析文本。下面的代码是我想要做的简化版本:
第一部分是用户表单模块:
Public text As String
Public Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Enter As Integer)
If KeyCode = 13 Then
text = TextBox1.Value 'Name of text box.
Logincode
Unload Me
End If
End Sub
在第二个模块中,我的代码如下:
Sub Logincode()
MsgBox text
End Sub
然而,当我运行代码时,我的消息框显示为空白。是否可以获得变量的数据" text"由两个模块共享。