2016-01-20 42 views
0

我想要addionaly在Word中的圖像上放一個稍微紅色的透明圖層,以表明它應該被刪除,因爲更改欄(使用更改時跟蹤)被嚴重忽視。如何使用MS Word 2010中的宏對圖像着色

到目前爲止好,我可以格式化選定的圖像:

Sub FormatPicture() 

    Dim inShape As InlineShape 
    Set inShape = Selection.InlineShapes(1) 

    inShape.LockAspectRatio = msoCTrue 
    'equals 16cm 
    inShape.Width = "453,9" 

End Sub 

但我怎麼能上色的形象呢?

回答

0

這爲我工作

Dim inShape As InlineShape 
    Set inShape = Selection.InlineShapes(1) 
    inShape.LockAspectRatio = msoCTrue 
     inShape.PictureFormat.ColorType = msoPictureGrayscale 
    'equals 16cm 
    inShape.Width = "453,9" 

你可以用ColorType 我覺得inShape.PictureFormat.ColorType = msoPictureWatermark發揮將滿足您的需要

+0

我仍然無法添加紅色層,但'inShape.PictureFormat.ColorType = msoPictureWatermark'爲我工作。 –