使用 TransparencyColor 属性可设置透明颜色。该属性只应用于位图。MsoTriState 类型,可读写。
MsoTriState 可为以下 MsoTriState 常量之一。 |
msoCTrue |
msoFalse |
msoTriStateMixed |
msoTriStateToggle |
msoTrue 图片中定义为透明颜色的部分是透明的。 |
如果要透过图片的透明部分看到该图片后面的对象,就必须将该图片的 FillFormat 对象的 Visible 属性设置为 False。如果图片具有透明颜色,且该图片的 FillFormat 对象的 Visible 属性为 True,则可透过该图片的透明颜色看到该图片的填充格式,但该图片后面的对象将被挡住。
本示例用函数 RGB(0, 24, 240) 返回 RGB 值,并用该 RGB 值作为 myDocument
中第一张图形的透明颜色。为使本示例正常运行,第一张图形必须是位图。
blueScreen = RGB(0, 0, 255)
Set myDocument = Worksheets(1)
With myDocument.Shapes(1)
With .PictureFormat
.TransparentBackground = True
.TransparencyColor = blueScreen
End With
.Fill.Visible = False
End With