Word VBA教程:SetCMYK方法

设置青色-品红-黄色-黑色 (CMYK) 颜色值。

expression.SetCMYK(Cyan, Magenta, Yellow, Black)

expression   必需。该表达式返回“应用于”列表中的一个对象。

Cyan  Long 类型,必需。该参数表示颜色中的青色部分。可以是从 0 到 255 之间的任意数值。

Magenta  Long 类型,必需。该参数表示颜色中的品红部分。可以是从 0 到 255 之间的任意数值。

Yellow  Long 类型,必需。该参数表示颜色中的黄色部分。可以是从 0 到 255 之间的任意数值。

Black  Long 类型,必需。该参数表示颜色中的黑色部分。可以是从 0 到 255 之间的任意数值。

VBA示例

本示例在活动文档中添加图形,并设置指定图形的 CMYK 填充和线条颜色。


Sub SetCMYKColor()
    Dim shpHeart As Shape
    Set shpHeart = ActiveDocument.Shapes.AddShape _
        (Type:=msoShapeHeart, Left:=100, Top:=100, _
        Width:=100, Height:=100)
    With shpHeart
        .Fill.ForeColor.SetCMYK Cyan:=0, _
            Magenta:=255, Yellow:=100, Black:=0
        .Line.ForeColor.SetCMYK Cyan:=0, _
            Magenta:=255, Yellow:=100, Black:=20
    End With
End Sub

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号