如何Word中用VBA打开Excel表格,读取其中的内容写入到Word
1个回答
展开全部
在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)
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)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询