ThreeDFormat.ExtrusionColor プロパティ (Publisher)
図形の浮き出しの色を表す ColorFormat オブジェクトを取得します。
構文
式。ExtrusionColor
式ThreeDFormat オブジェクトを表す変数。
戻り値
ColorFormat
例
次の使用例は、作業中の文書に楕円を追加し、楕円の浮き出しの奥行きを 50 ポイント、色を紫にします。
Dim shpNew As Shape
' Set a reference to a new oval.
Set shpNew = ActiveDocument.Pages(1).Shapes _
.AddShape(Type:=msoShapeOval, _
Left:=90, Top:=90, Width:=90, Height:=40)
' Format the 3D properties of the oval.
With shpNew.ThreeD
.Visible = True
.Depth = 50
.ExtrusionColor.RGB = RGB(255, 100, 255)
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。