AutoShapeType Property

Applies To

Shape object, ShapeRange collection object.

Description

Returns or sets the shape type for the specified Shape or ShapeRange object, which must represent an AutoShape other than a line, freeform drawing, or connector. Read/write Long.

Note When you change the type of a shape, the shape retains its size, color, and other attributes.

Can be one of the following MsoAutoShapeType constants:

msoShape16pointStar	msoShape24pointStar
msoShape32pointStar	msoShape4pointStar
msoShape5pointStar	msoShape8pointStar
msoShapeActionButtonBackorPrevious	msoShapeActionButtonBeginning
msoShapeActionButtonCustom	msoShapeActionButtonDocument
msoShapeActionButtonEnd	msoShapeActionButtonForwardorNext
msoShapeActionButtonHelp	msoShapeActionButtonHome
msoShapeActionButtonInformation	msoShapeActionButtonMovie
msoShapeActionButtonReturn	msoShapeActionButtonSound
msoShapeArc	msoShapeBalloon
msoShapeBentArrow	msoShapeBentUpArrow
msoShapeBevel	msoShapeBlockArc
msoShapeCan	msoShapeChevron
msoShapeCircularArrow	msoShapeCloudCallout
msoShapeCross	msoShapeCube
msoShapeCurvedDownArrow	msoShapeCurvedDownRibbon
msoShapeCurvedLeftArrow	msoShapeCurvedRightArrow
msoShapeCurvedUpArrow	msoShapeCurvedUpRibbon
msoShapeDiamond	msoShapeDonut

msoShapeDoubleBrace	msoShapeDoubleBracket
msoShapeDoubleWave	msoShapeDownArrow
msoShapeDownArrowCallout	msoShapeDownRibbon
msoShapeExplosion1	msoShapeExplosion2
msoShapeFlowchartAlternateProcess	msoShapeFlowchartCard
msoShapeFlowchartCollate	msoShapeFlowchartConnector
msoShapeFlowchartData	msoShapeFlowchartDecision
msoShapeFlowchartDelay	msoShapeFlowchartDirectAccessStorage
msoShapeFlowchartDisplay	msoShapeFlowchartDocument
msoShapeFlowchartExtract	msoShapeFlowchartInternalStorage
msoShapeFlowchartMagneticDisk	msoShapeFlowchartManualInput
msoShapeFlowchartManualOperation	msoShapeFlowchartMerge
msoShapeFlowchartMultidocument	msoShapeFlowchartOffpageConnector
msoShapeFlowchartOr	msoShapeFlowchartPredefinedProcess
msoShapeFlowchartPreparation	msoShapeFlowchartProcess
msoShapeFlowchartPunchedTape	msoShapeFlowchartSequentialAccessStorage
msoShapeFlowchartSort	msoShapeFlowchartStoredData
msoShapeFlowchartSummingJunction	msoShapeFlowchartTerminator
msoShapeFoldedCorner	msoShapeHeart
msoShapeHexagon	msoShapeHorizontalScroll
msoShapeIsoscelesTriangle	msoShapeLeftArrow
msoShapeLeftArrowCallout	msoShapeLeftBrace
msoShapeLeftBracket	msoShapeLeftRightArrow
msoShapeLeftRightArrowCallout	msoShapeLeftRightUpArrow
msoShapeLeftUpArrow	msoShapeLightningBolt
msoShapeLineCallout1	msoShapeLineCallout1AccentBar
msoShapeLineCallout1BorderandAccentBar	msoShapeLineCallout1NoBorder
msoShapeLineCallout2	msoShapeLineCallout2AccentBar
msoShapeLineCallout2BorderandAccentBar	msoShapeLineCallout2NoBorder
msoShapeLineCallout3	msoShapeLineCallout3AccentBar
msoShapeLineCallout3BorderandAccentBar	msoShapeLineCallout3NoBorder
msoShapeLineCallout4	msoShapeLineCallout4AccentBar
msoShapeLineCallout4BorderandAccentBar	msoShapeLineCallout4NoBorder
msoShapeMixed	msoShapeMoon
msoShapeNoSymbol	msoShapeNotchedRightArrow
msoShapeNotPrimitive	msoShapeOctagon

msoShapeOval	msoShapeOvalCallout
msoShapeParallelogram	msoShapePentagon
msoShapePlaque	msoShapeQuadArrow
msoShapeQuadArrowCallout	msoShapeRectangle
msoShapeRectangularCallout	msoShapeRegularPentagon
msoShapeRightArrow	msoShapeRightArrowCallout
msoShapeRightBrace	msoShapeRightBracket
msoShapeRightTriangle	msoShapeRoundedRectangle
msoShapeRoundedRectangularCallout	msoShapeSmileyFace
msoShapeStripedRightArrow	msoShapeSun
msoShapeTrapezoid	msoShapeUpArrow
msoShapeUpArrowCallout	msoShapeUpDownArrow
msoShapeUpDownArrowCallout	msoShapeUpRibbon
msoShapeUTurnArrow	msoShapeVerticalScroll
msoShapeWave

Remarks

Use the Type property of the ConnectorFormat object to set or return the connector type.

Example

This example replaces all 16-point stars with 32-point stars in myDocument.

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