主题：Option Explicit 提示编译器错误 1024

Option Explicit \' 要求在脚本中声明所有的变量 　　Dim Mystring

　　Mystring="This is my string"

提示编译器错误 1024

这个在金字塔vba里 如何表达

不能使用这个语句的，如果是模块中共用的变量，你可以在模块前面使用private定义，如果是过程中使用的变量，不定义也可以使用。

 

如：

private abc

 

sub test1()

    abc=10

    a1="aaaaaaa"

    appliation.msgout "只在test1过程中有效的变量a1:"&a1

end sub

 

sub test2()

    application.msgout "模块中都可以使用的变量:"&abc

    appliation.msgout "只在test1过程中有效的变量a1:"&a1

end sub

 

此例子中的abc变量是模块级的变量，所以在过程test1中赋值为10，在test2过程中显示出来依然是10，而test1中定义的变量a1，在test1中可见，而在test2中没有这个变量，显示的结果就是空字符了。