一、请问,如何批量提取word2010中的某些固定位置的信息
按照下面的步骤来就能达到你的效果了。
把excel中的名字批量导入到word文件中的同一位置:1、打开文字文档以后,先做好表格,接着找到文档中工具栏的“工具”按钮。2、点击之后,就会弹出一个命令菜单,在其中找到“邮件合并工具栏”,点击“邮件合并工具栏”以后就会出现一个工具栏了。
3、在这个工具栏中找到图标,点击打开数据源。4、接着就会出现一个选择框,选择好需要导入的数据源excel文件,点击确定。
5、接着鼠标点击要导入数据文档表格中的单元格,让光标在这个单元格总闪动,然后点击图标“插入合并域”。6、接着选择要输入的项目,点击确定,就能看到单元格里出现了《姓名》,出生日期和性别也可以用同样的方法输入。
7、然后点击”合并到新文档“,在合并到新文档设置中选择要导入的数据起始行和结束行,点击确定。8、接着会发现excel中的数据全部导入到了文档的表格里。
二、我有几千个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
满意请采纳哟~~~~~~
三、如何批量提取word里面的所有图片
常规的基本方法就是打开Office文档,然后直接另存为网页格式,然后从生成的网页文档的图片文件夹中,就可以获得word中的图片了。本方法利弊皆有:
利:简单、普适、快捷,不用借助任何工具,谁都能用会用;
弊:不同的Office版本,获得的图片质量有差别,即有的不能原始图片的大小和图片的Exif信息,有的能获得原始图片的大小和图片的Exif信息,因此,如果想获得原始大图的大小和原始的Exif信息,并保持比如300dpi的高分辨率,必须选择恰当的Office版本,有可能需要重新下载安装另外一个版本,费事费时;会生成一些冗余的小图片,需要人工再进行二次整理,不能一步到位,无法省事省心,不能批量处理多个Office文档。
除了上述唯一的通行方法外,可以使用如下的实用工具,设置完毕,一步到位,省事省心省力,批量。
选择 批量复制 功能卡,选择doc类型,然后添加文件入列表,然后单击提取Office文档中的图片,勾选提取图片的原始大小。
四、如何从word和excel中批量提取超链接
word和excel批量提取超链接的方法相同,都要用到宏功能,因此,在你准备执行这个功能的时候,首先要保证你的office软件是可以加载宏的,一般将宏的安全级别设置为中。
word和excel批量提取超链接的具体步骤是:工具>宏>宏>创建(excel为Visual Basic编辑器),打开编辑器,将如下代码插入模块: word文档插入代码: Sub 超级链接() For Each aHyperlink In ActiveDocument。 Hyperlinks With Selection 。
InsertAfter aHyperlink。Name 。
Collapse Direction:=wdCollapseEnd 。InsertParagraphAfter End With Next aHyperlink End Sub excel文档插入代码: Sub ExtractHL() Dim HL As Hyperlink For Each HL In ActiveSheet。
Hyperlinks HL。Range。
Offset(0? 1)。Value = HL。
Address Next End Sub 将代码插入后,点运行即可。word文档会将超链接的URL显示在光标所在处,excel会将URL显示在含超链接的单元格的右侧单元格内。
五、如何把多个文件夹里的内容批量提取出来啊
如果是要提取同类型的文件,您可以在这几个文件夹的上层文件夹中启动搜索,搜索*.后缀,比方说把所有的WORD文档弄出来,就搜*.doc,再把搜到的文件拷贝到你想放的地方。不知道这对你适用不,希望能帮到你。
搜图片的话,你看图片是什么格式的,如果格式不统一,多搜几次,还是和上面的一样,图片一般是JPEG,BMP,GIF等,你看看后缀,如果图片文件名不带后缀,可以进行如下操作:菜单“工具”-“文件夹选项”“查看”,将高级设置下面的“隐藏已知文件的扩展名”前面的勾去掉,点确定就可以了,就可以看图片的格式了。
然后就按后缀搜索吧
转载请注明出处51数据库 » 批量提取word里面的信息