KutoolsforOffice— 一套方案,五大工具。事半功倍。

如何统计 Word 文档中的图片数量?

作者晓阳修改日期

统计 Word 文档中的图片数量有多种用途,无论是进行质量控制、确保规范合规,还是便于文档整理。对于长文档来说,手动统计图片数量不仅耗时繁琐,还容易出错。幸运的是,我们有高效的方法,能够帮助您快速且准确地统计 Word 文档中的图片数量。

本文将为您详细介绍如何轻松统计图片数量,助您更高效地管理文档。

使用查找和替换功能统计嵌入图片数量

使用 Kutools for Word 统计多个文档中的嵌入图片数量

用 VBA 代码同时统计嵌入图片与浮动图形数量


使用查找和替换功能统计嵌入图片数量

查找和替换功能可帮助您在 Word 中快速统计嵌入图片的数量。请按以下步骤操作:

  1. 单击开始> 查找> 高级查找.

    功能区上的高级查找选项

  2. 查找和替换对话框中,切换至查找选项卡,在查找内容文本框中输入 ^g。然后,在查找范围下拉列表中选择主文档查找和替换对话框,"查找内容"文本框中输入“^g”,并在“查找范围”下拉列表中选择“主文档”
  3. 文档中嵌入图片的数量将显示在对话框底部。

    查找和替换对话框显示符合条件项目的计数

Office Tab:为 Word、Excel、PowerPoint 带来标签式界面……
使用Office Tab在文档中导航
立即提升您的工作流程。      了解更多 Office Tab 详情      立即免费下载

使用 Kutools for Word 统计多个文档中的嵌入图片数量

Kutools for Word 为统计多个文档中嵌入图片的数量,提供了一种高效便捷的解决方案。该工具能够自动识别所选文件中以 ^g 标识的图片占位符,极大简化了操作流程,帮助您节省宝贵的时间与精力。

Kutools for Word搭载 AI 功能🤖,提供超过 100 项实用功能,助您轻松完成各类任务。
  1. Kutools 选项卡中,选择批量替换.

    Word 功能区 Kutools 选项卡上的批量替换选项

  2. 批量查找与替换对话框中,按如下方式进行设置:
    1. 单击添加行,即可创建用于查找嵌入图片的规则。
    2. 在添加行中的查找字段,输入 ^g(表示嵌入图片占位符)。
    3. 单击添加按钮,选择添加文件目录,即可导入您需要统计嵌入图片数量的文档。
    4. 单击查找,即可在所有选中的文档中执行查找和统计操作。批量查找和替换对话框中“查找”字段为 ^g
  3. 批量查找与替换对话框将切换至结果预览选项卡,您可在此查看嵌入图片的总数。确认无误后,单击关闭即可。批量查找和替换对话框显示预览结果

操作已完成!所有选中文档中的嵌入图片数量已成功统计并统一展示。

Kutools for Word 是终极的 Word 插件,能够简化您的工作流程并提升文档处理效率。立即获取!

用 VBA 代码同时统计嵌入图片与浮动图形数量

前述方法仅统计了文档中的嵌入图片,不包括浮动图形。如需同时统计嵌入图片和浮动图形,请使用以下 VBA 代码,并按照下列步骤操作:

  1. 按住 Alt + F11 键,即可打开 Microsoft Visual Basic for Applications 窗口。
  2. 单击插入> 模块。将以下代码复制并粘贴到空白模块中:
    Sub CountImagesInDoc()
        Dim xInlines As Long
        Dim xFloaters As Long
        Dim sh As Shape
        Dim tbxs As Long
        Dim msg As String
        With ActiveDocument
            For Each sh In .Shapes
                If sh.Type = msoTextBox Then tbxs = tbxs + 1
            Next
            xInlines = .InlineShapes.Count
            xFloaters = .Shapes.Count - tbxs
        End With
        xPrompt = "Inline images:" & vbTab & xInlines & vbCr
        xPrompt = xPrompt & "Floating shapes:" & vbTab & xFloaters & vbCr
        xPrompt = xPrompt & vbTab & "Total:" & vbTab & (xInlines + xFloaters) & vbCr
        xPrompt = xPrompt & "Counts do not include headers and footers, etc."
        MsgBox xPrompt, vbInformation, "Kutools for Word"
    End Sub
    
  3. 在粘贴代码后,按下 F5 即可运行。随后会弹出提示框,直观显示 Word 文档中嵌入图片和浮动图形的数量。操作成功对话框

最佳办公效率工具

Kutools for Word——集成超过 100 项卓越功能,全面提升您的 Word 体验!

🤖KUTOOLS AI 功能AI 助手/实时助手/超级润色(保留格式)/超级翻译(保留格式)/AI 遮挡/AI 校正……

📘 文档精通分割页面/文档合并/批量选择导出为多种格式(PDF/TXT/DOC/HTML……)/批量转换为 PDF……

内容编辑批量查找与替换跨多个文件/统一调整所有图片大小/调整翻转表格行列/表格转文本……

🧹 轻松清理:一键清除多余空格/分节符/文本框/超链接/ 想要更多清理工具,请前往移除分组……

创意插入:插入千位分隔符/复选框/选项按钮/二维码/条形码/多图插入/ 更多插入选项请查看插入分组……

🔍 精准选择:快速定位特定页面/表格/形状/标题段落/ 利用更多选择功能提升导航效率……

明星增强功能跳转到任意位置/自动插入重复文本/在多个文档 Windows 间切换/11 转换工具……

🌍 支持 40+ 种语言:无论您身处何地,Kutools 均支持英语、西班牙语、德语、法语、中文等 40 多种语言!

Kutools for Word
 
 

Office Tab- 为 Office 带来标签式界面,让您的工作更轻松高效

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中,轻松启用标签式编辑与阅读功能。
  • 在同一窗口中打开和创建多个文档标签,而非在新窗口中分别打开。
  • 让您的工作效率提升 50%,每天为您减少数百次鼠标点击!

✨ Kutools for Office —— 一次安装,畅享五大强力工具!

包含 Office Tab Pro·Kutools for Excel·Kutools for Outlook·Kutools for Word·Kutools for PowerPoint

📦 一套打包 5 个工具 | 🔗 与 Microsoft Office 无缝集成 | ⚡ 保存时间,立即提升效率

最佳办公效率工具

Kutools for Word- 100+ 款 Word 工具