Excel表格内容自动填充到word中的指定位置

发布网友发布时间：2022-02-21 22:16

我来回答

共10个回答

热心网友时间：2022-02-21 23:46

可以，下面演示具体操作方法：

一、如下图，这里把Excel和Word同时打开，并复制Excel中的部分单元格。

二、进入Word窗口，点击“开始菜单”下的“粘贴”—“选择性粘贴”。

三、打开选择性粘贴窗口后，点击“粘贴链接”，右边选择“带格式文本（RTF）”，点击“确定”。

四、这时即可把Excel中选中的单元格以链接的形式粘贴入Word中。

五、效果如下图，当把成绩栏中95分的成绩改为15分后，右边分数范围中60分以下人数变为3人，这时Word中60分以下人数同步变为3人。

热心网友时间：2022-02-22 01:04

可以这个需要在word中使用宏，去调用Excel中的指定位置的数值。

热心网友时间：2022-02-22 02:38

这个是WORD邮件合并的重要功能之一。
邮件合并：在Office中，先建立两个文档：一个WORD包括所有文件共有内容的主文档（比如未填写的信封等）和一个包括变化信息的数据源EXCEL（填写的收件人、发件人、邮编等），然后使用邮件合并功能在主文档中插入变化的信息，合成后的文件用户可以保存为Word文档，可以打印出来，也可以以邮件形式发出去。

word如何邮件合并，参阅百度百科：http://ke.baidu.com/link?url=is-WZpDkUe29gInngPuUYYBIJfj3bTIG8SZHw3J6VGSdmjfElv1xLvnoGcxKCiMkMizeDsZBDdt9jViDf16-4a

也可以有详细图文介绍的百度经验：http://jingyan.baidu.com/article/335530da51745219cb41c3ea.html

热心网友时间：2022-02-22 04:30

这个可以使用word的邮件合并功能进行完成：
excel每行的数据可以合并成一个单独的文档
方法如下：
第一步：word->邮件->选择收件人->使用现有列表：选择存放数据的excel表格
第二步：在word文档中将光标移动到需要插入数据的位置，然后选择菜单->邮件->插入合并域，选择需要插入的数据列标题。
第三步：逐个位置插入完毕后，选择邮件->完成并合并菜单根据需要选择1个或多个就可以将记录合并到word文档了。
建议将该表格放置到该word所在目录或固定目录，这样以后excel数据改变后，需要再合并时就不用重新设置了

热心网友时间：2022-02-22 06:38

Sub t()

Dim ExcelApp As Object

Dim ws As Object

Dim sht As Object

excelFile = "C:\Users\syj\Desktop\21.xlsx"

Set ExcelApp = CreateObject("Excel.Application")

Set ws = ExcelApp.Workbooks.Open(excelFile)

Set sht = ws.Sheets(1)

For i = 1 To 10

sht.Cells(i, 11) = i

Debug.Print ws.Save()

Debug.Print ws.Close

End Sub

然后就可以用excel的代码了。

热心网友时间：2022-02-22 09:02

使用粘贴链接。在Excel中复制需要进入Word文档中的数据内容，然后在Word文档中，点击选择性粘贴，然后点选粘贴为链接。

热心网友时间：2022-02-22 11:44

复制－选择性粘贴－粘贴链接－带格式文本－匹配目标格式并连接到EXCEL

热心网友时间：2022-02-22 14:42

用邮件合并功能。很简单，很方便。工具-—信函与邮件——邮件合并（或显示邮件合并工具栏）按提示做。

热心网友时间：2022-02-22 17:56

有点道理，再深入研究更有意思

热心网友时间：2022-02-22 21:28

用邮件合并应该可以吧！