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

1、将Word打开，找到“插入”菜单——>“图片”——>“来自文件”，此时弹出的插入图片对话框；

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

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

2、②、按住Shift键选中第一幅需插入的图片（此时shift键也不要放开），拖动右边的滚动条至看见所需插入的图片最后一张，鼠标移动到所需插入的最后一张图片并单击选中，此时应该选择了自第一张图至最后一张图之间的所有图片，再点“插入”即可。

最后介绍一种最简单、最懒的方法（我就是用这种的）：

3、①、打开Word;

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

2.如何把大量照片快速全部导入到word文档中

如何将图片批量导入word中并附加文件名？其实只要活用word的“宏”这一功能就好了，下面为大家详细讲解。

新建一个空白的word文档。 工具——》宏——》vb编辑器——》打开this document ——》把下面代码粘入编辑窗口——》保存 打开这个word文档——》工具——》宏——》执行 下面的不用我说了，最后记得通配符批量替换照片就可以一行显示多张了。

Sub InsertPic() Dim myfile As FileDialog Set myfile = Application.FileDialog(msoFileDialogFilePicker) With myfile .InitialFileName = "F:\" If .Show = -1 Then For Each fn In .SelectedItems Set mypic = Selection.InlineShapes.AddPicture(FileName:=fn, SaveWithDocument:=True) '按比例调整相片尺寸 WidthNum = mypic.Width c = 10 '在此处修改相片宽，单位厘米 mypic.Width = c * 28.35 mypic.Height = (c * 28.35 / WidthNum) * mypic.Height If Selection.Start = ActiveDocument.Content.End - 1 Then '如光标在文末 Selection.TypeParagraph '在文末添加一空段 Else Selection.MoveDown End If Selection.Text = Basename(fn) '函数取得文件名 Selection.EndKey If Selection.Start = ActiveDocument.Content.End - 1 Then '如光标在文末 Selection.TypeParagraph '在文末添加一空段 Else Selection.MoveDown End If Next fn Else End If End With Set myfile = Nothing End Sub Function Basename(FullPath) '取得文件名 Dim x, y Dim tmpstring tmpstring = FullPath x = Len(FullPath) For y = x To 1 Step -1 If Mid(FullPath, y, 1) = "\" Or _ Mid(FullPath, y, 1) = ":" Or _ Mid(FullPath, y, 1) = "/" Then tmpstring = Mid(FullPath, y + 1) Exit For End If Next Basename = Left(tmpstring, Len(tmpstring) - 4) End Function。

3.word如何批量插入图片

①批量插入图片。

这个都会，不用详细介绍了。②快速分页，每张图片一页。

用宏来处理。工具→宏→录制新宏→键盘（单击选键盘这个按钮）→请按新快捷键（我指定的是ctrl+L），直接用键盘上的组合键按下去即可→单击“指定”→关闭→用方向箭头，把光标移到第一张图片的右侧，按一下ctrl+enter（这个组合键是插入分页符），然后将光标用方向箭头移到第二张图片的右侧。

单击停止录制。然后联系按 ctrl+L即可将无论多少张的图片均单独设置为一页。

我已经尝试了，很轻松的。不明白的继续联系我的QQ。

4.word批量插入图片及批量修改大小

操作步骤： 1、单击office---->Word选项，如图所示； 2、弹出Word选项对话框，单击高级---->剪切、复制和粘贴---->将图片插入/粘贴为后面的输入框，在弹出的选项中选择四周型，如图所示；（注：因默认为嵌入型，不能同时选中多个图片） 3、按住Ctrl键，单击图片，选中需要设成大小的多张图片； 4、单击图片工具格式选项卡右下角如图所示的标记； 5、弹出大小对话框，选择大小选项卡，去掉锁定纵横比和相对原始图片大小复选框中的对勾，在高度、宽度输入框中输入所需要的数值即可，如图所示； 。

5.哪位大神教我怎么在word里批量设置插入的图片格式

如果图片都存在同一个文件夹中，那么我们可以按住shift键批量插入图片~ 然后用宏方式批量调整图片格式： Sub 批量统一调整图片大小（） Dim iShape As InlineShape, WidthNum As Long For Each iShape In ActiveDocument.InlineShapes With iShape WidthNum = .Width c = 10 '在此处修改相片宽，单位厘米 .Width = c * 28.35 .Height = (c * 28.35 / WidthNum) * .Height End With Next End Sub。

转载请注明出处51数据库 » 照片批量导入word