如何Word中用VBA打开Excel表格，读取其中的内容写入到Word

如题所述

举报该问题

推荐答案 2017-10-15

可用CreateObject函数创建对EXCEL的引用，然后就可打开EXCEL工作簿，将表格中的数据复制到WORD中，参考代码如下：

Set xlapp = CreateObject("excel.application")
With xlapp.Open("带路径的EXCEL文件名")
.Sheets(1).Range("A1:H8").Copy
'粘贴到WORD指定位置
End With
xlapp.Quit

温馨提示：答案为网友推荐，仅供参考

当前网址：http://66.wendadaohang.com/zd/2i2UvxisUpnD2Dv2sn.html

相似回答

excelvba内容如何填到wordexcel写入wordvba答：第1种方法：就是直接粘贴;按【Ctrl+V】就可以把excel表格导入word 粘贴为图片 第2种方法：是粘贴为图片;我们只需要单击鼠标右键，分别点击【选择性粘贴】-【图片】，即可把excel表格导入word，因为是图片格式，所以不会显示不完整，但是有一个缺点：就是数据无法编辑。粘贴为链接第3种方法：是粘贴为...

怎样用VBA把Excel中的内容导入到word中答：1.举个例子，首先思路分析：目前在Excel中有两张表，一张表是原来的学年报表(即“原表”，含学生的各种信息，如图1所示)，一张表是现在的学生花名册(即“新表”，只有学生的姓名和性别信息，如图2所示)。只要能将“原表”中的信息根据“新表”中的学生姓名关联到“新表”中，就可以完成任务了。...

如何Word中用VBA打开Excel表格,读取其中的内容写入到Word答：可用CreateObject函数创建对EXCEL的引用，然后就可打开EXCEL工作簿，将表格中的数据复制到WORD中，参考代码如下：Set xlapp = CreateObject("excel.application")With xlapp.Open("带路径的EXCEL文件名") .Sheets(1).Range("A1:H8").Copy '粘贴到WORD指定位置End Withxlapp.Quit ...

如何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 '...

如何把Excel里A1:C8单元格的内容用VBA写入word表格和非表格位置答：在excel的第一行前插入一行，选取a1:a8区域，合并单元格，输入公式 =b5 设置格式，居中。设置b1:d8区域框线。复制表格，到word中，进入插入编辑菜单(或者右键)，选择性粘贴，选取excel对象，粘贴即可。双击可以进入excel表格编辑，没有必要用vba。

关于vba 在word中打开excel,然后复制其中单元格的数据,粘贴回wrod中视频时间 3:44

大家正在搜

打开表格发现不可读取内容 excel表格库存录入VBA vba复制表格内容到另一表格 excel导入word表格 vba如何取word表格数据 excelvba清空表格内容 java读取excel表格 xlrd读取excel excel文件不可读取内容

如何Word中用VBA打开Excel表格，读取其中的内容写入...

如何Word中用VBA打开Excel表格，读取其中的内容写入...

如何Word中用VBA打开Excel表格，读取其中的内容写入...

有没有办法用excel VBA实现，把指定文件夹里的Word...

如何Word中用VBA打开Excel表格，读取其中的内容写入...

如何Word中用VBA打开Excel表格，读取其中的内容写入...

如何在EXECL中用VBa打开Word，并输出数据到WORD...

您好，我想问一下用EXCEL vba读取word表格中的表格...