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 支援與意見反應。