次の方法で共有

LineFormat.InsetPen プロパティ (Excel)

  • [アーティクル]

指定した図形の境界線の内側に線を描くかどうかを示します。 値の取得と設定が可能です。

構文

式。InsetPen

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

戻り値

MsoTriState

注釈

図形の境界内に線が描画される場合は msoTrue (-1)。それ以外の場合は、msoFalse (0)。

例

次のコード例では、2 つの四角形を作業中のワークシートに追加します。最初の四角形の線は、境界線の内側に描きます。2 番目の四角形の線は、境界線上に描きます。

Dim shpNew As Shape 
 
With ActiveSheet.Shapes 
 Set shpNew = .AddShape(Type:=msoShapeRectangle, _ 
 Left:=200, Top:=150, Width:=150, Height:=100) 
 With shpNew.Line 
 .Weight = 24 
 .InsetPen = msoTrue 
 End With 
 
 Set shpNew = .AddShape(Type:=msoShapeRectangle, _ 
 Left:=200, Top:=300, Width:=150, Height:=100) 
 With shpNew.Line 
 .Weight = 24 
 .InsetPen = msoFalse 
 End With 
End With

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

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