次の方法で共有


ShapeRange.AutoShapeType プロパティ (Excel)

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

構文

AutoShapeType

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

注釈

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

コネクタの 種類 を設定または返すには、 ConnectorFormat オブジェクトの Type プロパティを使用します。

次の使用例は、myDocument の 16 ポイントの星をすべて 32 ポイントの星に置き換えます。

Set myDocument = Worksheets(1) 
For Each s In myDocument.Shapes 
    If s.AutoShapeType = msoShape16pointStar Then 
        s.AutoShapeType = msoShape32pointStar 
    End If 
Next

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

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