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 のサポートおよびフィードバックを参照してください。