Type Property
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.
Type property as it applies to the CalloutFormat object.
MsoCalloutType
| MsoCalloutType can be one of these MsoCalloutType constants. |
| msoCalloutFour |
| msoCalloutMixed |
| msoCalloutOne |
| msoCalloutThree |
| msoCalloutTwo |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the ColorFormat object.
PbColorType
| PbColorType can be one of these PbColorType constants. |
| pbColorTypeCMYK |
| pbColorTypeInk |
| pbColorTypeRGB |
| pbColorTypeScheme |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the ConnectorFormat object.
MsoConnectorType
| MsoConnectorType can be one of these MsoConnectorType constants. |
| msoConnectorCurve |
| msoConnectorElbow |
| msoConnectorStraight |
| msoConnectorTypeMixed |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the Field object.
PbFieldType
| PbFieldType can be one of these PbFieldType constants. |
| pbFieldDateTime |
| pbFieldHyperlinkAbsolutePage |
| pbFieldHyperlinkEmail |
| pbFieldHyperlinkFile |
| pbFieldHyperlinkRelativePage |
| pbFieldHyperlinkURL |
| pbFieldIHIV |
| pbFieldMailMerge |
| pbFieldNone |
| pbFieldPageNumber |
| pbFieldPageNumberNext |
| pbFieldPageNumberPrev |
| pbFieldPhoneticGuide |
| pbFieldWizardSampleText |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the FillFormat object.
MsoFillType
| MsoFillType can be one of these MsoFillType constants. |
| msoFillBackground |
| msoFillGradient |
| msoFillMixed |
| msoFillPatterned |
| msoFillPicture |
| msoFillSolid |
| msoFillTextured |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the Hyperlink object.
MsoHyperlinkType
| MsoHyperlinkType can be one of these MsoHyperlinkType constants. |
| msoHyperlinkInlineShape |
| msoHyperlinkRange |
| msoHyperlinkShape |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the MailMergeDataSource object.
Returns a Long that represents the type of mail merge data source. Read-only.
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the RulerGuide object.
PbRulerGuideType
| PbRulerGuideType can be one of these PbRulerGuideType constants. |
| pbRulerGuideTypeHorizontal |
| pbRulerGuideTypeVertical |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the Selection object.
PbSelectionType
| PbSelectionType can be one of these PbSelectionType constants. |
| pbSelectionNone |
| pbSelectionShape |
| pbSelectionShapeSubSelection |
| pbSelectionTableCells |
| pbSelectionText |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the ShadowFormat object.
MsoShadowType
| MsoShadowType can be one of these MsoShadowType constants. |
| msoShadow1 |
| msoShadow10 |
| msoShadow11 |
| msoShadow12 |
| msoShadow13 |
| msoShadow14 |
| msoShadow15 |
| msoShadow16 |
| msoShadow17 |
| msoShadow18 |
| msoShadow19 |
| msoShadow2 |
| msoShadow20 |
| msoShadow3 |
| msoShadow4 |
| msoShadow5 |
| msoShadow6 |
| msoShadow7 |
| msoShadow8 |
| msoShadow9 |
| msoShadowMixed |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the Shape and ShapeRange objects.
PbShapeType
| PbShapeType can be one of these PbShapeType constants. |
| pbAutoShape |
| pbCallout |
| pbChart |
| pbComment |
| pbEmbeddedOLEObject |
| pbFormControl |
| pbFreeform |
| pbGroup |
| pbGroupWizard |
| pbLine |
| pbLinkedOLEObject |
| pbLinkedPicture |
| pbMedia |
| pbOLEControlObject |
| pbPicture |
| pbPlaceholder |
| pbShapeTypeMixed |
| pbTable |
| pbTextEffect |
| pbTextFrame |
| pbWebCheckBox |
| pbWebCommandButton |
| pbWebHTMLFragment |
| pbWebListBox |
| pbWebMultiLineTextBox |
| pbWebOptionButton |
| pbWebSingleLineTextBox |
| pbWebWebComponent |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the Story object.
PbStoryType
| PbStoryType can be one of these PbStoryType constants. |
| pbStoryContinuedFrom |
| pbStoryContinuedOn |
| pbStoryTable |
| pbStoryTextFrame |
expression.Type
expression Required. An expression that returns one of the above objects.
Type property as it applies to the WrapFormat object.
PbWrapType
| PbWrapType can be one of these PbWrapType constants. |
| pbWrapTypeMixed |
| pbWrapTypeNone |
| pbWrapTypeSquare |
| pbWrapTypeThrough |
| pbWrapTypeTight |
expression.Type
expression Required. An expression that returns one of the above objects.
Example
As it applies to the Callout and Shape objects.
This example formats the callout type of the specified shape if the shape is a callout. This example assumes there is at least one shape on the first page of the active publication.
Sub SetCalloutType()
With ActiveDocument.Pages(1).Shapes(1)
If .Type = pbCallout Then
With .Callout
.Border = msoTrue
.Type = msoCalloutThree
End With
End If
End With
End Sub
As it applies to the WrapFormat object.
The following example adds an oval to the active publication and specifies that publication text wrap around both the left and right sides of the square that surrounds the oval.
Sub SetTextWrapType()
Dim shpOval As Shape
Set shpOval = ActiveDocument.Pages(1).Shapes.AddShape( _
Type:=msoShapeOval, Left:=36, Top:=36, _
Width:=100, Height:=35)
With shpOval.TextWrap
.Type = pbWrapTypeSquare
.Side = pbWrapSideBoth
End With
End Sub
As it applies to the Selection object.
This example checks to see if the selection is text and if it is, bolds the selected text.
Sub IfCellData()
Dim rowTable As Row
If Selection.Type = pbSelectionText Then
Selection.TextRange.Font.Bold = msoTrue
End If
End Sub