Word 文档中的一千张 JPEG 图像:如何以相同的方式设置它们的格式?

Ult*_*mit 5 jpeg vba formatting microsoft-word

请假设您有一个 Microsoft Word 2007 文档:您刚刚在其中插入了大约一千张 JPEG 图像。

对于第一张图像,您右键单击,然后格式化图片,然后选择“RECOLOR”,然后在第二行“COLOR MODES”中选择“BLACK AND WHITE”。

您如何自动执行向其他 999 个 JPEG 图像提供相同“格式化图片”命令的过程?

我刚刚尝试过 FORMAT PAINTER,但没有成功。

有什么线索吗?

这是一个没有答案的类似问题:http : //thedailyreviewer.com/windowsapps/view/formatting-all-pictures-in-a-word-document-in-one-go-11962810

如何一次性选择所有图片,以保持格式一致,以便它们在整个 Word 文档中都显示相同,即,例如,它们都具有相同的文本换行边距...并且都是相同的 %原件的尺寸?如果 word 不允许我为图片“全选”,我可以复制图片的格式,然后以某种方式将其粘贴到其他图片上,类似于用于文本的格式刷吗?

预先感谢您的帮助。

Ale*_*x K 7

你可以:

Dim Pic As InlineShape
For Each Pic In ActiveDocument.InlineShapes
  Pic.PictureFormat.ColorType = msoPictureGrayscale
Next
Run Code Online (Sandbox Code Playgroud)

  • 使用 `msoPictureBlackAndWhite` 而不是 `msoPictureGrayscale` 但它可能看起来很糟糕 - recolour 选项似乎使用灰度 (2认同)