如何在excel的vba中声明一个全局变量并赋值

工具/原料

Excel

变量声明

方法/步骤

1、声明一个变量并且给它赋值。

2、定义一个宏函数，用于显示全局变量是否有值。

3、单击执行宏命令，通过按control +Q, 如图，提示框没有提示。

4、然后改一下全局变量声明的位置。

5、再按一下Control+Q会得到提示框，如图所示。

你可以在窗体的Load事件中给x赋初始值：\x0d\x0aPrivate Sub Form_Load()\x0d\x0ax = 10\x0d\x0aEnd Sub\x0d\x0a\x0d\x0a如果是模块中的全局变量，而且启动对象设为Sub Main，则可以在Main过程赋初始值：\x0d\x0aSub main()\x0d\x0ax = 10\x0d\x0aEnd Sub\x0d\x0a\x0d\x0a也可以在使用x的时候，先检测x，如果是空值，就赋初始值：\x0d\x0aIf IsEmpty(x) Then x = 10 \x0d\x0a\x0d\x0a还有一种方法，可以把x定义为常量，这样就可以在定义时直接赋初始值：\x0d\x0aConst x = 10 \x0d\x0a\x0d\x0a如果你的这个x是固定数值的话，建议你用最后一种方法。如果x是需要变化的，就只能用前面三种了。

随便一个模块中定义即可

定义语句如下：

Public A    as string

需要注意的是，以下情况会导致变量重置：

1、点击 "设计模式"

2、点击 "重新设置"

3、程序出错，导致代码停止执行。

4、某些情况下，修改或者添加代码。

---