找到所有图形

Question

我有100多个Word文档，每个文档有1000多张图片。我需要＆＃34;查看＆＃34;所有这些都在一个文档中逐个进行，并且还计算文档中图片的总数。

我尝试使用＆＃34;查找图形＆＃34; ---＆＃34; ^ G＆＃34 ;.然而，它并没有找到所有的照片。

经过实验，我意识到如果图形的自动换行文本值设置为＆＃34;符合文本＆＃34;只有这样它才被视为图形并位于Find！

中

有没有办法一个接一个地找到文档中的所有图片，还能在一个文档中统计所有图片？

Answer 1

要查看文档中的图像总数，可以使用以下内容：

MsgBox ActiveDocument.InlineShapes.Count

您可以用来循环它们的包装器是：

For Each iShape In ActiveDocument.InlineShapes
    stuff
Next

一种选择是进入宏并使用F8逐步完成代码。