从Word中调用Excel VBA

我们在MS Word中有一个标准格式来手动填写细节并启动一个macros。 这个macros将打开一个MS Excel寄存器来自动从Word文档中的字段填充它,同时做其他事情。

当前的解决scheme有一个Excel电子表格中的macros的键盘快捷方式和Word文档macros发送按键笔划到打开的Excel电子表格启动macros。 这只适用于办公室里的几个人。

当我的Excel电子表格处于焦点状态时,是否可以直接从Wordmacros中调用我的Excelmacros,还是有阻止我的发送键启动macros的Windows设置?

这只是一个预感,但是可以将Excelmacros从Excel电子表格迁移到Word文档吗? 然后,您可以添加一些代码来启动正确的Excel电子表格并执行必要的字段操作。 所以,基本上,让你的Word文档在Excel电子表格上做所有的工作。

或者,你可以按照这里讨论的程序:

http://support.microsoft.com/kb/177760

这里是相关的代码清单:

Sub XLTest() Dim XL as Object Set XL = CreateObject("Excel.Application") XL.Workbooks.Open "C:\My Documents\ExcelFile.xls" ' If there is more than one macro called TestMacro, ' the module name would be required as in ' ' XL.Run "Module1.TestMacro" ' ' to differentiate which routine is being called. ' XL.Run "TestMacro" End Sub