Question

VBA 我的一个工作薄里有6个模块，每个模块里面又有一些SUBXX()事件，我想在其他工作薄里也调用

希望高手给我解答 希望比较简单 谢谢
我的意思是
01.xls 工作薄 我这里面有宏程序
比如说是
sub 01（）
range("a1")=10
end sub
sub 02()
range("a2")=10
end sub
.........
我现在想把01.xls 工作薄里面的宏程序 直接用到 02.xls 03.xls .....等等的工作薄里面的SHEET1工作表中 有什么迅速快捷的方法 谢谢你们了

Answer 1

你定义sub的时候加上关键字public 就可以了，如
Public Sub Test()

End Sub

在别的模块里调用的时候直接写函数名Test或者Call Test都可以了。希望可以帮到你~

Answer 2

EXCEL里面的每个工作表内的SUB只能在工作表上调用。你可做一个通用的模块，将一此与具体工作表无关的SUB操作编为通用的子程序。

追问

通用的模块，能具体举个例子吗

Answer 3

在 别的工作簿调用 01.xls 的过程 就这样写：

    Application.Run "01.xls!01"