怎样将图片批量导入到WORD中?

1.怎样将图片批量导入到WORD中?

2、此时你可以从[查找范围]（左边的黑色小三角下拉列表或者下方的位置）进入到你的图片存放位置（此时应能看到缩略图了）；

2、①、按住Ctrl键不放，移动鼠标到你所需插入的图片，单击左键选中若干所需的图片，选完才可以放开Ctrl键，然后点“插入”即可在word中插入大批量图片；

最后介绍一种最简单、最懒的方法（我就是用这种的）：3、①、打开Word;

3、②、将所需图片选中（选取的方法参照2），然后移动鼠标至选中的图片任意一张的上方，按住鼠标左键不放将图片“拖/拉”到Word文档中，此时所有选中的图片均“拖/拉”到了文档之中了；

2.怎么把许多图片放到word文档中

1、acdsee可以打印缩略图，带文件路径的2、也可以用如下的word宏 Sub 宏1（) ' '成都豺狼 ' pth = "C:\\My Pictures\\" '读入文件的路径 fln = Dir(pth & "*.jpg") '文件类型，没有其它文件，可以只用路径 wdth = ActiveDocument.PageSetup.PageWidth - ActiveDocument.PageSetup.LeftMargin - ActiveDocument.PageSetup.RightMargin hght = ActiveDocument.PageSetup.PageHeight - ActiveDocument.PageSetup.TopMargin - ActiveDocument.PageSetup.BottomMargin a = ActiveDocument.Paragraphs.LineSpacing cnt = 0 Do While Len(fln) > 0 If cnt Mod 6 = 0 Then Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.TypeParagraph'Selection.InsertBreak Type:=wdPageBreak ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=3, NumColumns:= _ 4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed Selection.Tables(ActiveDocument.Tables.Count).Select Selection.SelectCell Selection.ParagraphFormat.Alignment = Selection.Cells.VerticalAlignment = ActiveDocument.Tables(ActiveDocument.Tables.Count).AllowAutoFit = False ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(3).Select Selection.Orientation = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(1).Select Selection.Orientation = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(1).Width = wdth * 0.05 ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(2).Width = wdth * 0.45 ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(3).Width = wdth * 0.05 ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(4).Width = wdth * 0.45 ActiveDocument.Tables(ActiveDocument.Tables.Count).Rows.Height = (hght - a - a) * 0.33 tablebili = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(2).Width / ActiveDocument.Tables(ActiveDocument.Tables.Count).Rows.Height End If Selection.TypeText Text:=fln Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.InlineShapes.AddPicture FileName:= _ pth & fln, LinkToFile:=False, _ SaveWithDocument:=True cnt = ActiveDocument.InlineShapes.Count bili = ActiveDocument.InlineShapes(cnt).Width / ActiveDocument.InlineShapes(cnt).Height If tablebili > bili Then '控制图形按纵横比例显示，要拉伸就直接用行高列宽 ActiveDocument.InlineShapes(cnt).Height = ActiveDocument.Tables(ActiveDocument.Tables.Count).Rows.Height ActiveDocument.InlineShapes(cnt).Width = ActiveDocument.InlineShapes(cnt).Height * bili Else ActiveDocument.InlineShapes(cnt).Width = ActiveDocument.Tables(ActiveDocument.Tables.Count).Columns(2).Width ActiveDocument.InlineShapes(cnt).Height = ActiveDocument.InlineShapes(cnt).Width / bili End If Selection.MoveRight Unit:=wdCharacter, Count:=1 fln = Dir DoEvents Loop End Sub。

3.怎么把数量较多的图片一次性转换成word文档

将图片转换成word文档目前有一款非常好用的ocr文字识别软件（捷速），直接下载这款软件就可以批量将图片放入软件中进行扫描输出，这款软件是一款非常好用的软件。

1、通过浏览器搜索“ocr文字识别软件”，找到捷速版本的这款软件，下载到电脑上即可。

2、打开软件就可以看见非常简洁的界面，点击读取选项。

3、如果文件过多的话可以按住Ctrl键一次性添加多数量的文件。

4、点击识别按键，最后得出的文档根据自己的需要保存为图片或者是word。