① 如何word中用VBA打开Excel表格，读取其中的内容写入到Word
在word vba工具-引用中复选中Ms Excel就可以正制常打开EXCEL进行操作了
Dim xlapp As Excel.Application ‘代表excel程序
Dim wkBook As Excel.Workbook '代表excelworkbook（也就是excel工作簿文件 .xls .xlsx)
Dim wkSheet As Excel.Worksheet '代表excel的工作页
xlapp.Application.EnableEvents = False '禁止宏等提示的运行
Set wkBook = xlapp.Workbooks.Open(ExcelFileName)
② EXCEL如何使用VBA打开相对路径下的文件或文件夹
打开文件如下：
Workbooks.Open ("C:对账单对帐单.xlsx")
这里你可以把“C:对账单”换成你的绝对路径，
你可以用：a = ThisWorkbook.Path
a = ThisWorkbook.Path
Workbooks.Open ("" & a & "&" "&对帐单.xlsx")
来获取你当前表的绝对路径，然后再打开，因为不知道你的具体情况，如果有问题可以hai我
如果当前文件夹下还有A文件夹可以用代码：
Workbooks.Open ("" & a & "&" A"&b.xlsx")
③ excel的VBA关于如何后台打开工作簿并读取里面的数据问题（高手进）
1、定义新的Excel.Application对象（Dim EA as new Excel.Application）
2、新的Excel.Application隐藏（EA.Visible=False）
3、SET WB=EA.Workbook.open(”G:\1.xls”）'（WB事先定义成Wordbook对象：Dim WB as new workbook）
4、Var1=WB.Sheets(1).cells(2,2)
5、WB.Close False
6、SET EA=nothing
④ vba打开excel文件（带密码）
打开带密码的文抄件，你需将密码作为参数来打开文件。
Open( _FileName_ , _UpdateLinks_ , _ReadOnly_ , _Format_ , _Password_ , _WriteResPassword_ , _IgnoreReadOnlyRecommended_ , _Origin_ , _Delimiter_ , _Editable_ , _Notify_ , _Converter_ , _AddToMru_ , _Local_ , _CorruptLoad_ )
其中：
_password_ 包含打开受保护工作簿所需密码的字符串。 如果省略此参数并且工作簿需要密码，则会提示用户输入密码。
_writerespassword_ 包含写入写保护的工作簿所需密码的字符串。 如果省略此参数并且工作簿需要密码，则将提示用户输入密码。
用逗号分隔参数时需要注意参数的位置
也可用password:="XXXX"指明参数名称