次の方法で共有

ThreeDFormat.Depth プロパティ (Publisher)

  • [アーティクル]

バリアント 図形の奥行きの深さを示すを設定または返します。 値の取得と設定が可能です。

構文

式。深さ

式ThreeDFormat オブジェクトを表す変数。

戻り値

バリアント型

注釈

数値は ポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位 (例: "2.5 in") に含めることができます。

正の値を使用すると、前面に押し出されたようになり、負の値を使用すると、背面に押し出されたようになります。 有効な値は、-600 ～ 9600 ポイントの範囲、またはこれに相当する他の単位の値です。

例

次の使用例は、作業中の文書に楕円を追加し、楕円の浮き出しの奥行きを 50 ポイント、色を紫にします。

Dim shpNew As Shape 
 
Set shpNew = ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeOval, _ 
 Left:=90, Top:=90, Width:=90, Height:=40) 
 
With shpNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。