Shape.AutoShapeType プロパティ (Word)

線またはフリーフォーム図面以外のオートシェイプを表す必要がある、指定した Shape オブジェクトの図形の種類を設定または返します。 読み取り/書き込みの コネクタ以外のオートシェイプ です。

構文

式。AutoShapeType

expression 必須です。 Shape オブジェクトを表す変数を指定します。

注釈

図形の種類を変更しても、図形の大きさ、色などの属性は保持されます。

例

次の使用例は、現在の文書内の 16 ポイントの星を 32 ポイントの星に置き換えます。

Sub ReplaceAutoShape() 
 Dim docNew As Document 
 Dim shpStar As Shape 
 Set docNew = ActiveDocument 
 For Each shpStar In docNew.Shapes 
 If shpStar.AutoShapeType = msoShape16pointStar Then 
 shpStar.AutoShapeType = msoShape32pointStar 
 End If 
 Next 
End Sub

関連項目

Shape オブジェクト

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

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