如何在ＷＯＲＤ里面写ＶＢＡ打开ＥＸＣＥＬ表

[fooltutu]

我在WORD里写了一段宏代码，是想把WORD里的一些信息提出来放到用户选择的EXCEL表中。如果在运行前，将EXCEL表打开，就可以正常运行。如果没有将EXCEL表打开，运行就会出现错误。可是在WORD里写VBA打开EXCEL表的代码，我不知道，试运行总是出现错误。
谢谢了！

[lidaixiang]

先检测EXCEL是否运行，如果没有运行，就启动它啊。如果从WORD中取出的数据是作用于excel的表，就进一步检测是否有表打开（表的数量是否>0)，没有表打开，就打开一个sheet.

[fooltutu]

ＭＳＴＲ就是文件的路径，所以我写的语句是：
Set ea = GetObject(mstr)
ea.Workbooks.Open mstr
Set ewt = ea.worksheets("sheet1")
提示错误是：对象不支持该属性或方法