两个不同的VBAProject之间的变量怎么传递？

wwangfay

我在加载宏里定义了一个用户窗体，而在打开Excel时生成的VBAProject(Book1)中需要用到在加载宏中定义的一个变量，那么怎样才能取得这个变量的值呢？直接使用该变量，调试报错：未定义。

哪位高手能够解答，不胜感激。

清风_ll

怎么会有这种需求呢?

变量的范围只限于在一个工程里面,不可以引用其他工程中的变量

51082481

同意楼上！

wwangfay

我也不想的，可惜现实就是这么怪异。

在加载宏的用户窗体中有一个文本框框控件，需要判断该控件是否获得焦点，然后在VBAProject（BOOK1）中根据时候获得焦点往文本框中填加内容。

51082481

可以使用注册表方法　来存储你所需要的值！

51082481

你的留言我看见了．对不起本人中午不在！

１．如果能不需要调用另一个工程中的变量就别调用．（偶还未曾遇到过这种情况）

２．的确要调用的话，有以下方法：

　　（１）写注册表键值：有关注册表的写入或读去请自行参阅SaveSetting和GetAllSettings函数．

　　（２）写ｔｘｔ文件记录当前的变量值．请参阅相关ｏｐｅｎ（）＼ｉｎｐｕｔ（）＼ｗｒｉｔｅ（）语句．

　　（３）在文件本身ｓｈｅｅｔ表中存储变量值．（相对简单不再敖述）

如有问题再联系我！

figfig

以下是引用清风_ll在2005-6-3 9:41:00的发言：

怎么会有这种需求呢?

变量的范围只限于在一个工程里面,不可以引用其他工程中的变量

反对

工程1:假设 zzz=abcdefg

Sub test1()

Application.ExecuteExcel4Macro "SET.NAME(""zzz"",""abcdefg"")"

End Sub

工程2:获取zzz数值

Sub test22()

MsgBox Application.ExecuteExcel4Macro("zzz") End Sub

[此贴子已经被作者于2005-6-3 20:30:32编辑过]

51082481

７楼的偶不解！！！！

？？

清风_ll

以下是引用figfig在2005-6-3 19:46:00的发言： >

反对

工程1:假设 zzz=abcdefg

Sub test1()

Application.ExecuteExcel4Macro "SET.NAME(""zzz"",""abcdefg"")"

End Sub

工程2:获取zzz数值

Sub test22()

MsgBox Application.ExecuteExcel4Macro("zzz") End Sub

对于4.0宏不熟悉

figfig

该方法使变量在所有工程传递，直到退出EXCEL