把图片导入word

1. 如何把图片插入到Word文档中

插入图片的具体操作步骤如下：

1、打开word文档，在需要插入图片的地方点击鼠标，使光标移动到此处。

2. 如何把图片一次导入word文档里》

好像只能一张张的导~

3. 怎么把图片的内容导入WORD中急用，谢谢了！~~

图片中的文字么？
如果是的话，可以直接使用微软在Microsoft
Office
2003中的工具组件中有一个“Microsoft
Office
Document
Imaging”的组件包，它可以直接执行光学字符识别（OCR）
第一步
我们需要安装“Microsoft
Office
Document
Imaging”的组件，点“开始→程序”，在
“Microsoft
Office
工具”
里点“
Microsoft
Office
Document
Imaging”
即可安装运行
第二步
打开带有文字的图片或电子书籍等，找到你希望提取的页面，按下键盘上的打印屏幕键（PrintScreen）进行屏幕取图。
第三步
打开Microsoft
Office
Word
2003
，将刚才的屏幕截图粘贴进去；点击“文件”菜单中的“打印”，在安装Microsoft
Office
Document
Imaging组件后，系统会自动安装一个名为“Microsoft
Office
Document
Imaging
Writer”的打印机。如图2所示，在“打印机”下拉列表框中选择“Microsoft
Office
Document
Imaging
Writer”打印机，其他选项无须额外设置，点击“确定”按钮后，设定好文件输出的路径及文件名（缺省使用源文件名），然后很快就可以自动生成一个MDI格式的文档了。
图2
选择打印机
打开刚才保存的MDI类型文件（如图3所示），根据你的需要用鼠标选择文字内容（被选中的内容在红色的框内），然后单击鼠标右键，在弹出的快捷菜单中选择“将文本发送到Word”，即可将图片内容自动转换为一个新的Word文档，然后你就可以在Word文档中随心所欲地进行编辑了。
图3
将文本发送到Word
提示：如果你不想将转换的内容输入到一个新的Word
文档中，而是希望粘贴到一个已经打开的Word
文档，只需在上面的操作中点击右键菜单的“复制”，然后再到指定文档中执行粘贴即可。
【PS：图就不上了，麻烦~自己看文字好了
描述的很清楚~~~】

4. 如何将大量照片按照顺序一次性导入WORD文档中

将大量照片按照顺序一次性导入word文档中的方法如下（以windows10系统的word2016版为例，需要准备大量照片）：

1、将宣传册的照片放入一个文件夹中，并将第一张图片命名为1.jpg，第二页命名为2.jpg，依次类推。

5. 如何将照片放在word文档中

想要把照片放在word文档当中，首先可以打开word文档，然后在左上角上面找到图片插入方式，然后点击进去，选取需要放入文档当中的图片，再点击确认，即可达到理想的使用程度和效果。

6. 怎样才能把图片文字导入word

打开Microsoft word，选择文档进入页面，点击顶部的显示命令图标。

2.
再次点击该图标，选择开始，插入。

3.
点击图片，照片，找到需要导入的照片并单击。

4.
完成，最后可根据个人需求，拖动照片大小即可。

7. 怎么一次把多张图片插入到word

具体操作步骤如下：

一、首先在存储图片的文件中调整好图片的顺序，然后选中全部图片拖入Word。

8. 如何把大量照片快速全部导入到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