図形の 3-D の色を表す ColorFormat オブジェクトを返します。 値の取得のみ可能です。
構文
expression。 ExtrusionColor
式ThreeDFormat オブジェクトを表す変数。
戻り値
カラー フォーマット
例
この例では、 myDocument に楕円を追加し、楕円を 50 ポイントの深さまで押し出し、押し出しを紫色にすることを指定します。
Set myDocument = ActivePresentation.Slides(1)
Set myShape = myDocument.Shapes _
.AddShape(msoShapeOval, 90, 90, 90, 40)
With myShape.ThreeD
.Visible = True
.Depth = 50
'RGB value for purple
.ExtrusionColor.RGB = RGB(255, 100, 255)
End With
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。