各位大佬,请教下,在word中我用vba编写一段代码,
要求:1.将c:\pictures里面的图片导入到word中
2.检查这些图片的边框,如果是红色的,就将这些图片设置为透明
但是我查资料发现vba好像不能对图片的透明度进行设置,需要先插入矩形,然后图片嵌入到矩形里面,所以需求需要检测pictures文件夹里面的图片数量,然后插入相应数量的矩形,然后在进行编辑透明度,以下是我自己写的插入矩形,但是遍历文件夹以及嵌入图片不知道怎么操作,有没有大佬帮我看下应该怎么写:
Sub AddAndFormatImages()
For i = 0 To 4
Dim rectangle As Shape
Set rectangle = ActiveDocument.Shapes.AddShape(msoShapeRectangle, 100, 0 + 120 * i, 100, 100)
Next
相似问题