在Word文档中,有数千个JPEG图像: 同样,我如何设置它们的格式?

分享于 

2分钟阅读

电脑

  繁體 雙語

问题:

请假设你有一个 Microsoft 2007文档: 你刚刚插入了上千张JPEG图片。

在第一个图像中,右键单击,然后格式化图片,然后选择"重新着色",然后在第二行"颜色模式"中选择"黑白黑白"。

如何将同一"格式图片"命令的过程自动化到它的他 999图像?

我刚尝试了格式刷,但我没有成功。

任何线索?

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

我如何在一go选择所有图片,以便一致地格式化,以便它们全部显示在word文档中,这样它们都有相同的文本环绕边距,例如。 都是相同的% 大小? 如果word不允许我为图片进行'全部选择',可以复制图片格式,然后将它的粘贴到它的他图片中。

感谢你的帮助,请提前。


回答 1:

你可以:


Dim Pic As InlineShape


For Each Pic In ActiveDocument.InlineShapes


 Pic.PictureFormat.ColorType = msoPictureGrayscale


Next




回答 2:

好吧,感谢 Alex K,解决方案如下:


Sub Macro1()


'


' Macro1 Macro


'


'


Dim Pic As InlineShape


For Each Pic In ActiveDocument.InlineShapes


 Pic.PictureFormat.ColorType = msoPictureBlackAndWhite


Next


End Sub



我已经接受了 Alex K。 因为他找到了解决这个问题的正确方法。 正确的关键字是msoPictureBlackAndWhite而不是 msoPictureGrayscale。

非常感谢,Alex。;



图像  for  DOC  form  WORD  images  
相关文章