你的背包100434106
1.Excel 怎样从word文档中提取数据字段
如何将excel表里的数据提取到word文档里的解决方法如下：1、复制法。
即将原来的数据直接复制后，在word中进行粘贴，这样数据就直接导入到word文档中了。2、邮件合并法。
在word中启用邮件合并，按向导的过程分别制作好需要插入的需要，数据源，对应关系，最后执行合并就可以了。3、程序法。
在word中插入合并域（如果是有规律的表格，可以不用这一步），然后编写vba程序，从excel文件中读取数据，然后写入到word中指定的位置。上面三个方法中，方法1简单快捷，但是每次都需要操作，如果数据不是连续的块，需要复制粘贴多次，相对来说麻烦一点。
方法2，一次设置可以多次使用，但不够灵活。方法3方便可以多次重复使用，但需要有一定的编程基础，可以根据工作的实际选择一个最适合的完成这个工作。
2.Word文字报告怎样自动从Excel中提取数据
方法如下：
1、首先，打开媒介工具“记事本”，将word文件里需要导入的数据，复制粘贴到记事本当中，然后保存成为txt文件，本例中将txt文件取名为“1.txt”。
2、打开excel表格，点击“数据”选项卡，在“获取外部数据”当中，找到“自文本”。
3、点击“自文本”，弹出下一窗口，选择刚才保存的名为1的txt类型文件，点击“导入”。因“自文本”方式数据导入默认的只有三种文件类型txt、csv、prn，所以需要事先将word转变为txt。
4、弹出文本导入对话框，选择默认的固定宽度，意思就是数据与单元格一一对应。如果选择分隔符号，则导入的所有数据将会在一个单元格当中，接着，点击下一步。
5、设置分行线，其实就是导入数据列数的控制，单击鼠标，可以在任意位置增加分行线。双击任意分行线，就会删除。完成设定后，点击下一步。
6、设置输出数据的格式，一般不需要进行任何设置，选择常规即可，点击“完成”。
7、导入完成。
3.怎样从excel里导出需要的数据到word
所需工具和原料：
1.一台Windows7系统笔记本电脑。
2.软件Office 2007。
excel表格数据导出方法：
1.使用Excel 2007打开一个excel表格，选中要复制的数据，点击鼠标右键，选择复制。
2.使用Word 2007打开一个word文档，点击鼠标右键，选择粘贴。
3.数据导出完毕，在当前文档界面里查看。
4.我有几千个word,里面包含有表格,如何批量提取我想要的数据
如果是一个word中的，复制粘贴；如果是多个word中的，需要写个代码（如下），或者在网上找一下相关的工具。
此方法适用于多个word文档里面的所有表格：
1、将多个含有表格的word文档放入一个目录；
2、在该目录中新建一个空的excel表格；
3、在excel表格中运行以下宏命令，即可。
Sub WordTabletoExcel()
Dim WordApp As Object, DOC, mTable, Fn$, Str$
On Error Resume Next '设置容错代码
CreateObject("wscript.shell").Run "cmd.exe /c dir """ & ThisWorkbook.Path & "\*.doc"" /s/b>""" & ThisWorkbook.Path & "\list.txt""", False, True '取得指定目录下的word文档清单
Set WordApp = CreateObject("word.application") '创建word程序项目（用于操作word文档）
WordApp.Visible = True '设定word程序项目可见
Open ThisWorkbook.Path & "\list.txt" For Input As #1 '打开清单文件并读取内容
While Not EOF(1) '循环读取清单文件各行内容
Input #1, Str '输入一行文本到变量str中
If Trim(Str) <> "" Then '如果文本有效则
Set DOC = WordApp.documents.Open(Trim(Str)） '利用word程序项目打开对应的word文档
With DOC
For Each mTable In .Tables '循环文档中的各个表格
WordApp.Activate '激活word程序，使之窗体前置
mTable.Range.Copy '复制表格区域
With Windows(1) '激活excel程序窗体，使之前置
.Activate
With ThisWorkbook.ActiveSheet '选中当前使用区A列下面的第一个单元格，并粘贴复制的word中的表格数据
.Cells(.Cells.SpecialCells(xlCellTypeLastCell).Row + 1, 1).Select
.Paste
End With
End With
Next mTable
.Close False '关闭word文档
End With
End If
Wend
Close #1 '关闭清单文件
If Dir(ThisWorkbook.Path & "\list.txt") <> "" Then Kill ThisWorkbook.Path & "\list.txt" '删除清单文件
WordApp.Quit 'word程序项目关闭
Set DOC = Nothing '清空对应项目变量
Set WordApp = Nothing
End Sub
满意请采纳哟~~~~~~
5.怎么从word里导出内容到excel表格
1、首先我们打开word这款软件，进入到word的操作界面。
2、在该界面内按下Ctrl+O键在弹出的对话框内找到我们的word表格文件。
3、打开该表格文件之后在菜单里找到文件菜单。
4、点击文件菜单，在其下拉菜单里找到另存为选项。
5、点击另存为选项在，在弹出的对话框内找到保存类型选项，将保存类型设置为网页。
6、设置好以后点击保存，关掉word这款软件，打开excel这款软件，在打开的excel界面内找到文件菜单。
6.如何从EXCEL里提取和word里面一样的数据
方法/步骤 首先按照实际工作需要制作好Word表格。
如下图。 然后调出开发者工具。
可以点击文件—选项—自定义功能区，右侧勾选“开发工具”即可。 表格制作完成后修改需要填写信息的单元格，也就是以后需要提取的单元格，切换到开发模式选项卡，点击“Aa”格式文本内容控件，接下来单击信息框，然后在开发工具中点选“设计模式”。
然后打开属性，在对话框输入标题，这就是信息框的信息提示文字，要是有需求，还可以修改边框颜色、文本样式等等。 把所有需要填写信息的单元格都按照上述步骤操作完毕，点击开发模式中的“限制编辑”，在Word右侧栏中，勾选“限制对选定的样式设置格式”和“仅允许在文档中进行此类型的修改”并选中“填写窗体”。
到此第一部分word设置完成，接下来，我们设置Excel。 同样是切换到开发工具选项卡，点选最左侧的“Visual Basic” 双击Sheet1，把以下代码复制 Option Base 1 Sub readDoc() Dim WordApp As Word.Application Set WordApp = CreateObject("Word.Application") Dim WordDoc As Word.Document Dim diag1 As FileDialog Dim return1 As String Dim filePathArray() Set diag1 = Application.FileDialog(msoFileDialogFilePicker) '定义文件选择对话框 With diag1 .AllowMultiSelect = True '设置文件选择对话框能够选择多个文件 return1 = .Show '打开文件选择对话框 n = .SelectedItems.Count '将选中文件个数保存至变量n If return1 = -1 Then '如选中文件（retun1=-1）则将选中的文件路径保存到filePathArray数组 ReDim filePathArray(n) For i = 1 To n filePathArray(i) = .SelectedItems(i) Next Else '如果未选中任何文件则提示 MsgBox "未选择任何文件"， vbExclamation End If End With For j = 1 To n Set WordDoc = WordApp.Documents.Open(filePathArray(j)） '根据filePathArray数组中的路径逐个打开Word文件 Dim ccSet Set ccSet = WordDoc.ContentControls '将ccSet设为打开文档的内容控件集合 i = 1 For Each cc In ccSet '遍历所有内容控件 Application.ActiveSheet.Cells(j, i) = cc.Range.Text '将内容控件内容保存至单元格 i = i + 1 Next WordDoc.Close '关闭当前Word文档 Next WordApp.Quit End Sub 接着继续点选当前Visual Basic界面上方工具栏的“工具—引用”，在“可使用的引用”中找到“Microsoft Word 16.0 Object Library”并勾选确定。
返回到Excel主界面，还是在开发工具选项卡中，点击“宏”，选中刚才编辑的这个宏命令，单击“运行”，这时Excel会自动弹出文件选择框，找到要摘录信息的Word文档点选打开，Excel就可以开始自动摘录信息了。这样一来，数据摘录的工作就完全依靠电脑自动完成了，大大节省了工作时间，也避免了手工摘录的出错几率。
