如何在Excel 2016 VBA中的众多模块中使用相同的全局变量?

时间:2017-03-13 18:16:33

标签: excel vba excel-vba

是否可以在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"由两个模块共享。

0 个答案:

没有答案