在本文中，我们想与您分享 4 种方便的方法，以快速准确地获取 Word 文档中的图像总数。
时不时地，一份文件需要多张图片才能使它更专业。 但是，如果您是像我这样喜欢在编辑完后立即插入图像的人，那么您可能会担心是否不小心遗漏了一两个图像。 因此，您将不得不费力地上下滚动以检查文档中的图像总数。 鉴于这种尴尬，我们为您提供了 4 种非常有用的方法来节省您的时间。
方法一：利用“查找”功能
- 首先和形式ost, 点击“主页”选项卡。
- 然后单击“查找”图标后面的按钮。
- 并在菜单上选择“高级查找”。
- 在“查找和替换”对话框中，确保“查找内容”文本框中没有其他文本，然后在其中输入“^g”。
- 接下来单击“查找位置”并选择“主文档”。
现在对话框中有结果，显示了该文档中内联形状的数量。 这意味着“查找”功能只能统计设置为“符合文本”环绕样式的图像。
方法 2：使用“转到”功能
- 首先，按“Ctrl+Home”跳转到文件开头，重复方法一中的前两步。
- 这次改为选择“转到”。
- 然后选择“图形”。
- 在文本框中不输入任何内容，然后单击“下一步”。
每次点击“下一步”，Word都会带你到网络图形，需要你自己去数。 尽管如此，这种方式仅包括内联形状。
这是一个视频演示：
方法三：按“Tab”键
- 到tar然后，单击文档上的第一张图像。
- 接下来按“Tab”键，将选择下一张图像。 记得自己数。
幸运的是，方法 3 包括内联形状和浮动形状，如文本框。
方法二：运行Word宏
- 首先，点击“开发者”选项卡。
- 然后点击“Visual Basic”打开VBA编辑器。
- 接下来单击“插入”并选择“模块”以在“普通”项目下插入一个新模块。
- 双击新模块打开编码空间。
- 并在此处粘贴以下代码：
Sub CountImages()
Dim objDoc As Document
Dim nFlowingShapes As Long, nInlineShapes As Long, nTextBox As Long, nTotalShapes As Long
Dim objShape As Shape
Set objDoc = ActiveDocument
nTextBox = 0
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
nTextBox = nTextBox + 1
End If
Next objShape
nFlowingShapes = objDoc.Shapes.Count
nInlineShapes = objDoc.InlineShapes.Count
nTotalShapes = nFlowingShapes + nInlineShapes - nTextBox
MsgBox "There are " & nTotalShapes & " images in this document, " & "with " & nFlowingShapes & " flowing shapes, " & nTextBox & "text boxes, and " & nInlineShapes & " inline shapes."
End Sub
- 最后，单击“运行”。
应有一个消息框，指示结果。
修复 Word 的工具
Word 容易出错。 一旦它停止工作，关机会对我们的 Word 文件造成严重破坏，这对我们的精神来说将是一个巨大的挫折。 尽管如此，仍然有恢复损坏文件的补救方法，即获得一个复杂的工具来 修字.
作者简介：
Vera Chen 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术领域的世界领先者，包括 xls修复 以及 pdf 修复软件产品。 欲了解更多信息，请访问 datanumen.com