Word VBA教程:Type属性

应用于 CalloutFormat对象的 Type属性。

该属性返回或设置标注的类型。MsoCalloutType,可读写。

MsoCalloutType 可以是下列 MsoCalloutType 常量之一:
msoCalloutFour
msoCalloutOne
msoCalloutTwo
msoCalloutMixed
msoCalloutThree

expression.Type

expression   必需。该表达式返回一个CalloutFormat对象。

应用于 ColorFormat对象的 Type属性。

该属性返回或设置图形的颜色类型。MsoColorType,只读。

MsoColorType 可以是下列 MsoColorType 常量之一:
msoColorTypeCMYK
msoColorTypeRGB
msoColorTypeCMS
msoColorTypeMixed
msoColorTypeScheme

expression.Type

expression   必需。该表达式返回一个ColorFormat对象。

应用于 Diagram对象的 Type属性。

该属性返回图表类型。MsoDiagramType,只读。

MsoDiagramType 可以是下列 MsoDiagramType 常量之一:
msoDiagramCycle
msoDiagramMixed
msoDiagramOrgChart
msoDiagramPyramid
msoDiagramRadial
msoDiagramTarget
msoDiagramVenn

expression.Type

expression   必需。该表达式返回一个Diagram对象。

应用于 Dialog对象的 Type属性。

该属性返回内置 Microsoft Word对话框的类型。WdWordDialog,只读。

WdWordDialog 可以是下列 WdWordDialog 常量之一:
wdDialogConsistencyChecker
wdDialogConvertObject
wdDialogCreateAutoText
wdDialogDrawAlign
wdDialogEditAutoText
wdDialogEditFind
wdDialogEditGoTo
wdDialogInsertAddCaption
wdDialogInsertBookmark
wdDialogInsertCaption
wdDialogInsertCrossReference
wdDialogInsertDateTime
wdDialogInsertFile
wdDialogInsertFormField
wdDialogInsertIndex
wdDialogInsertMergeField
wdDialogInsertObject
wdDialogInsertPicture
wdDialogInsertSubdocument
wdDialogInsertSymbol
wdDialogInsertTableOfAuthorities
wdDialogInsertTableOfContents
wdDialogInsertTableOfFigures
wdDialogLetterWizard
wdDialogListCommands
wdDialogMailMerge
wdDialogMailMergeCheck
wdDialogMailMergeCreateDataSource
wdDialogMailMergeCreateHeaderSource
wdDialogMailMergeFieldMapping
wdDialogMailMergeFindRecord
wdDialogMailMergeHelper
wdDialogMailMergeInsertAddressBlock
wdDialogMailMergeInsertAsk
wdDialogMailMergeInsertFields
wdDialogMailMergeInsertFillIn
wdDialogMailMergeInsertGreetingLine
wdDialogMailMergeInsertIf
wdDialogMailMergeInsertNextIf
wdDialogMailMergeInsertSet
wdDialogMailMergeInsertSkipIf
wdDialogMailMergeOpenDataSource
wdDialogMailMergeOpenHeaderSource
wdDialogMailMergeQueryOptions
wdDialogMailMergeRecipients
wdDialogMailMergeUseAddressBook
wdDialogMarkCitation
wdDialogMarkIndexEntry
wdDialogMarkTableOfContentsEntry
wdDialogNewToolbar
wdDialogNoteOptions
wdDialogOrganizer
wdDialogPhoneticGuide
wdDialogReviewAfmtRevisions
wdDialogSearch
wdDialogTableAutoFormat
wdDialogTableCellOptions
wdDialogTableColumnWidth
wdDialogTableDeleteCells
wdDialogTableFormatCell
wdDialogTableFormula
wdDialogTableInsertCells
wdDialogTableInsertRow
wdDialogTableInsertTable
wdDialogTableOfCaptionsOptions
wdDialogTableOfContentsOptions
wdDialogTableProperties
wdDialogTableRowHeight
wdDialogTableSort
wdDialogTableSplitCells
wdDialogTableTableOptions
wdDialogTableToText
wdDialogTableWrapping
wdDialogTCSCTranslator
wdDialogTextToTable
wdDialogToolsAcceptRejectChanges
wdDialogToolsAdvancedSettings
wdDialogToolsAutoCorrect
wdDialogToolsAutoManager
wdDialogToolsBulletsNumbers
wdDialogToolsCreateDirectory
wdDialogToolsCreateLabels
wdDialogToolsCustomizeKeyboard
wdDialogToolsCustomizeMenus
wdDialogToolsEnvelopesAndLabels
wdDialogToolsHighlightChanges
wdDialogToolsLanguage
wdDialogToolsMacroRecord
wdDialogToolsMergeDocuments
wdDialogToolsOptionsAutoFormat
wdDialogToolsOptionsBidi
wdDialogToolsOptionsEdit
wdDialogToolsOptionsFuzzy
wdDialogToolsOptionsPrint
wdDialogToolsOptionsSpellingAndGrammar
wdDialogToolsOptionsTypography
wdDialogToolsOptionsView
wdDialogToolsProtectSection
wdDialogToolsSpellingAndGrammar
wdDialogToolsThesaurus
wdDialogToolsWordCount
wdDialogUpdateTOC
wdDialogWebOptions
wdDialogConnect
wdDialogControlRun
wdDialogCopyFile
wdDialogDocumentStatistics
wdDialogDrawSnapToGrid
wdDialogEditCreatePublisher
wdDialogEditFrame
wdDialogEditGoToOld
wdDialogEditLinks
wdDialogEditObject
wdDialogEditPasteSpecial
wdDialogEditPublishOptions
wdDialogEditReplace
wdDialogEditStyle
wdDialogEditSubscribeOptions
wdDialogEditSubscribeTo
wdDialogEditTOACategory
wdDialogEmailOptions
wdDialogFileDocumentLayout
wdDialogFileFind
wdDialogFileMacCustomPageSetupGX
wdDialogFileMacPageSetup
wdDialogFileMacPageSetupGX
wdDialogFileNew
wdDialogFileOpen
wdDialogFilePageSetup
wdDialogFilePrint
wdDialogFilePrintOneCopy
wdDialogFilePrintSetup
wdDialogFileRoutingSlip
wdDialogFileSaveAs
wdDialogFileSaveVersion
wdDialogFileSummaryInfo
wdDialogFileVersions
wdDialogFitText
wdDialogFontSubstitution
wdDialogFormatAddrFonts
wdDialogFormatBordersAndShading
wdDialogFormatBulletsAndNumbering
wdDialogFormatCallout
wdDialogFormatChangeCase
wdDialogFormatColumns
wdDialogFormatDefineStyleBorders
wdDialogFormatDefineStyleFont
wdDialogFormatDefineStyleFrame
wdDialogFormatDefineStyleLang
wdDialogFormatDefineStylePara
wdDialogFormatDefineStyleTabs
wdDialogFormatDrawingObject
wdDialogFormatDropCap
wdDialogFormatEncloseCharacters
wdDialogFormatFont
wdDialogFormatFrame
wdDialogFormatPageNumber
wdDialogFormatParagraph
wdDialogFormatPicture
wdDialogFormatRetAddrFonts
wdDialogFormatSectionLayout
wdDialogFormatStyle
wdDialogFormatStyleGallery
wdDialogFormatStylesCustom
wdDialogFormatTabs
wdDialogFormatTheme
wdDialogFormFieldHelp
wdDialogFormFieldOptions
wdDialogFrameSetProperties
wdDialogHelpAbout
wdDialogHelpWordPerfectHelp
wdDialogHelpWordPerfectHelpOptions
wdDialogHorizontalInVertical
wdDialogIMESetDefault
wdDialogInsertAutoCaption
wdDialogInsertBreak
wdDialogInsertCaptionNumbering
wdDialogInsertDatabase
wdDialogInsertField
wdDialogInsertFootnote
wdDialogInsertHyperlink
wdDialogInsertIndexAndTables
wdDialogInsertNumber
wdDialogInsertPageNumbers
wdDialogToolsAutoCorrectExceptions
wdDialogToolsAutoSummarize
wdDialogToolsCompareDocuments
wdDialogToolsCreateEnvelope
wdDialogToolsCustomize
wdDialogToolsCustomizeMenuBar
wdDialogToolsDictionary
wdDialogToolsHangulHanjaConversion
wdDialogToolsHyphenation
wdDialogToolsMacro
wdDialogToolsManageFields
wdDialogToolsOptions
wdDialogToolsOptionsAutoFormatAsYouType
wdDialogToolsOptionsCompatibility
wdDialogToolsOptionsFileLocations
wdDialogToolsOptionsGeneral
wdDialogToolsOptionsSave
wdDialogToolsOptionsTrackChanges
wdDialogToolsOptionsUserInfo
wdDialogToolsProtectDocument
wdDialogToolsRevisions
wdDialogToolsTemplates
wdDialogToolsUnprotectDocument
wdDialogTwoLinesInOne
wdDialogViewZoom
wdDialogWindowActivate

expression.Type

expression   必需。该表达式返回一个Dialog对象。

应用于 Dictionary对象的 Type属性。

该属性返回词典的类型。WdDictionaryType,只读。

WdDictionaryType 可以是下列 WdDictionaryType 常量之一:
wdGrammar
wdHangulHanjaConversionCustom
wdSpelling
wdSpellingCustom
wdSpellingMedical
wdHangulHanjaConversion
wdHyphenation
wdSpellingComplete
wdSpellingLegal
wdThesaurus

expression.Type

expression   必需。该表达式返回一个Dictionary对象。

应用于 Document对象的 Type属性。

该属性返回文档的类型(模板或文档)。WdDocumentType,只读。

WdDocumentType 可以是下列 WdDocumentType 常量之一:
wdTypeDocument
wdTypeTemplate
wdTypeFrameset

expression.Type

expression   必需。该表达式返回一个Document对象。

应用于 Field、FormField 和 MailMergeField对象的 Type属性。

该属性返回域的类型。WdFieldType,只读。

WdFieldType 可以是下列 WdFieldType 常量之一:
wdFieldFileSize
wdFieldFootnoteRef
wdFieldFormDropDown
wdFieldFormula
wdFieldGoToButton
wdFieldHyperlink
wdFieldImport
wdFieldIncludePicture
wdFieldIndex
wdFieldInfo
wdFieldLastSavedBy
wdFieldListNum
wdFieldMacroButton
wdFieldMergeField
wdFieldMergeRec
wdFieldMergeSeq
wdFieldNext
wdFieldNextIf
wdFieldNoteRef
wdFieldNumChars
wdFieldNumPages
wdFieldNumWords
wdFieldOCX
wdFieldPage
wdFieldPageRef
wdFieldPrint
wdFieldPrintDate
wdFieldPrivate
wdFieldQuote
wdFieldRef
wdFieldRefDoc
wdFieldRevisionNum
wdFieldSaveDate
wdFieldSection
wdFieldSectionPages
wdFieldSequence
wdFieldSet
wdFieldSkipIf
wdFieldStyleRef
wdFieldSubject
wdFieldSubscriber
wdFieldSymbol
wdFieldTemplate
wdFieldTime
wdFieldTitle
wdFieldTOA
wdFieldTOAEntry
wdFieldTOC
wdFieldTOCEntry
wdFieldUserAddress
wdFieldUserInitials
wdFieldUserName
wdFieldAddin
wdFieldAdvance
wdFieldAsk
wdFieldAuthor
wdFieldAutoNum
wdFieldAutoNumLegal
wdFieldAutoNumOutline
wdFieldAutoText
wdFieldAutoTextList
wdFieldBarCode
wdFieldComments
wdFieldCompare
wdFieldCreateDate
wdFieldData
wdFieldDatabase
wdFieldDate
wdFieldDDE
wdFieldDDEAuto
wdFieldDocProperty
wdFieldDocVariable
wdFieldEditTime
wdFieldEmbed
wdFieldEmpty
wdFieldExpression
wdFieldFileName
wdFieldFillIn
wdFieldFormCheckBox
wdFieldFormTextInput
wdFieldGlossary
wdFieldHTMLActiveX
wdFieldIf
wdFieldInclude
wdFieldIncludeText
wdFieldIndexEntry
wdFieldKeyWord
wdFieldLink

expression.Type

expression   必需。该表达式返回上述一个对象。

应用于 FillFormat对象的 Type属性。

该属性返回图形填充格式的类型。MsoFillType,只读。

MsoFillType 可以是下列 MsoFillType 常量之一:
msoFillGradient
msoFillBackground
msoFillMixed
msoFillPatterned
msoFillPicture
msoFillSolid
msoFillTextured

expression.Type

expression   必需。该表达式返回一个FillFormat对象。

应用于 Frameset对象的 Type属性。

该属性返回Frameset对象的类型。WdFramesetType,只读。

WdFramesetType 可以是下列 WdFramesetType 常量之一:
wdFramesetTypeFrame
wdFramesetTypeFrameset

expression.Type

expression   必需。该表达式返回一个 Frameset对象。

应用于 Hyperlink对象的 Type属性。

该属性返回超链接的类型。MsoHyperlinkType,只读。

MsoHyperlinkType 可以是下列 MsoHyperlinkType 常量之一:
msoHyperlinkInlineShape
msoHyperlinkRange
msoHyperlinkShape

expression.Type

expression   必需。该表达式返回一个Hyperlink对象。

应用于 Index对象的 Type属性。

该属性返回或设置索引的类型。WdIndexType,可读写。

WdIndexType 可以是下列 WdIndexType 常量之一:
wdIndexRunin
wdIndexIndent

expression.Type

expression   必需。该表达式返回一个Index对象。

应用于 InlineShape对象的 Type属性。

该属性返回嵌入式图形的类型。WdInlineShapeType,只读。

WdInlineShapeType 可以是下列 WdInlineShapeType 常量之一:
wdInlineShapeEmbeddedOLEObject
wdInlineShapeHorizontalLine
wdInlineShapeLinkedOLEObject
wdInlineShapeLinkedPicture
wdInlineShapeLinkedPictureHorizontalLine
wdInlineShapeOLEControlObject
wdInlineShapeOWSAnchor
wdInlineShapePicture
wdInlineShapePictureBullet
wdInlineShapePictureHorizontalLine
wdInlineShapeScriptAnchor

expression.Type

expression   必需。该表达式返回一个InlineShape对象。

应用于 LinkFormat对象的 Type属性。

该属性返回链接的类型。WdLinkType,只读。

WdLinkType 可以是下列 WdLinkType 常量之一:
wdLinkTypeText
wdLinkTypeDDE
wdLinkTypeDDEAuto
wdLinkTypeImport
wdLinkTypeInclude
wdLinkTypeOLE
wdLinkTypePicture
wdLinkTypeReference

expression.Type

expression   必需。该表达式返回一个LinkFormat对象。

应用于 MailMergeDataSource对象的 Type属性。

该属性返回邮件合并数据源的类型。WdMailMergeDataSource,只读。

WdMailMergeDataSource 可以是下列 WdMailMergeDataSource 常量之一:
wdMergeInfoFromAccessDDE
wdMergeInfoFromMSQueryDDE
wdMergeInfoFromODSO
wdNoMergeInfo
wdMergeInfoFromExcelDDE
wdMergeInfoFromODBC
wdMergeInfoFromWord

expression.Type

expression   必需。该表达式返回一个MailMergeDataSource对象。

应用于 ProofreadingErrors对象的 Type属性。

该属性返回校对错误的类型。WdProofreadingErrorType,只读。

WdProofreadingErrorType 可以是下列 WdProofreadingErrorType 常量之一:
wdGrammaticalError
wdSpellingError

expression.Type

expression   必需。该表达式返回一个ProofreadingRrrors对象。

应用于 Revision对象的 Type属性。

该属性返回修订的类型。WdRevisionType,只读。

WdRevisionType 可以是下列 WdRevisionType 常量之一:
wdNoRevision
wdRevisionDelete
wdRevisionInsert
wdRevisionParagraphProperty
wdRevisionReconcile
wdRevisionSectionProperty
wdRevisionStyleDefinition
wdRevisionConflict
wdRevisionDisplayField
wdRevisionParagraphNumber
wdRevisionProperty
wdRevisionReplace
wdRevisionStyle
wdRevisionTableProperty

expression.Type

expression   必需。该表达式返回一个Revision对象。

应用于 Selection对象的 Type属性。

该属性返回选择的类型。WdSelectionType,只读。

WdSelectionType 可以是下列 WdSelectionType 常量之一:
wdSelectionBlock
wdSelectionFrame
wdSelectionIP
wdSelectionRow
wdNoSelection
wdSelectionColumn
wdSelectionInlineShape
wdSelectionNormal
wdSelectionShape

expression.Type

expression   必需。该表达式返回一个Selection对象。

应用于 ShadowFormat对象的 Type属性。

该属性返回或设置图形阴影的类型。MsoShadowType,可读写。

MsoShadowType 可以是下列 MsoShadowType 常量之一:
msoShadow10
msoShadow12
msoShadow14
msoShadow16
msoShadow18
msoShadow2
msoShadow3
msoShadow5
msoShadow7
msoShadow9
msoShadow1
msoShadow11
msoShadow13
msoShadow15
msoShadow17
msoShadow19
msoShadow20
msoShadow4
msoShadow6
msoShadow8
msoShadowMixed

expression.Type

expression   必需。该表达式返回一个ShadowFormat对象。

应用于 Shape 和 ShapeRange对象的 Type属性。

该属性返回图形的类型。MsoShapeType,只读。

MsoShapeType 可以是下列 MsoShapeType 常量之一:
msoAutoShape
msoCanvas
msoComment
msoFormControl
msoCallout
msoChart
msoEmbeddedOLEObject
msoFreeform
msoGroup
msoLine
msoLinkedOLEObject
msoLinkedPicture
msoMedia
msoOLEControlObject
msoPicture
msoPlaceholder
msoScriptAnchor
msoShapeTypeMixed
msoTable
msoTextBox
msoTextEffect

expression.Type

expression   必需。该表达式返回上述对象之一。

应用于 Style对象的 Type属性。

该属性返回样式的类型。WdStyleType,只读。

WdStyleType 可以是下列 WdStyleType 常量之一:
wdStyleTypeCharacter
wdStyleTypeList
wdStyleTypeParagraph
wdStyleTypeTable

expression.Type

expression   必需。该表达式返回一个Style对象。

应用于 StyleSheet对象的 Type属性。

该属性返回或设置样式表的类型。WdStyleSheetLinkType,可读写。

WdStyleSheetLinkType 可以是下列 WdStyleSheetLinkType 常量之一:
wdStyleSheetLinkTypeImported
wdStyleSheetLinkTypeLinked

expression.Type

expression   必需。该表达式返回一个StyleSheet对象。

应用于 Template对象的 Type属性。

该属性返回模板的类型。WdTemplateType,只读。

WdTemplateType 可以是下列 WdTemplateType 常量之一:
wdAttachedTemplate
wdGlobalTemplate
wdNormalTemplate

expression.Type

expression   必需。该表达式返回一个Template对象。

应用于 TextInput对象的 Type属性。

该属性返回文字型窗体域的类型。WdTextFormFieldType,只读。

WdTextFormFieldType 可以是下列 WdTextFormFieldType 常量之一。
wdCalculationText
wdCurrentDateText
wdCurrentTimeText
wdDateText
wdNumberText
wdRegularText

expression.Type

expression   必需。该表达式返回一个TextInput对象。

应用于 View对象的 Type属性。

该属性返回或设置视图的类型。WdViewType,可读写。

WdViewType 可以是下列 WdViewType 常量之一:
wdMasterView
wdOutlineView
wdPrintView
wdNormalView
wdPrintPreview
wdWebView

expression.Type

expression   必需。该表达式返回一个View对象。

说明

Type属性为当前处于大纲视图或主控文档视图的所有文档返回 wdMasterView。除非预先在代码中明确设置,否则当前视图不会返回 wdOutlineView。

若要检查当前文档是否为大纲,请使用 Type属性和Subdocuments集合的Count属性。如果 Type属性返回 wdOutlineView 或 wdMasterView,并且 Count属性返回 0(零),则该文档为大纲。例如:


Sub VerifyOutlineView()
    With ActiveWindow.View
        If .Type = wdOutlineView Or wdMasterView Then
            If ActiveDocument.Subdocuments.Count = 0 Then
                .
                .
                .
            End If
        End If
    End With
End Sub

应用于 Window对象的 Type属性。

该属性返回窗口的类型。WdWindowType,只读。

WdWindowType 可以是下列 WdWindowType 常量之一:
wdWindowTemplate
wdWindowDocument

expression.Type

expression   必需。该表达式返回一个Window对象。

应用于 WrapFormat对象的 Type属性。

该属性返回指定图形的换行类型。WdWrapType,可读写。

WdWrapType 可以是下列 WdWrapType 常量之一:
wdWrapInline
wdWrapNone
wdWrapSquare
wdWrapThrough
wdWrapTight
wdWrapTopBottom

expression.Type

expression   必需。该表达式返回一个WrapFormat对象。

VBA示例

当应用于 Document对象时。

如果活动窗口包含文档,本示例将“标题 1”样式重新设置为居中。


If ActiveDocument.ActiveWindow.Type = wdWindowDocument Then
    ActiveDocument.Styles("Heading 1") _
        .ParagraphFormat.Alignment = wdAlignParagraphCenter
End If

当应用于 Revision对象时。

如果活动文档中下一处修订的类型是插入的文本,则本示例接受该修订。


Set myRev = Selection.NextRevision
If Not (myRev Is Nothing) Then
    If myRev.Type = wdRevisionInsert Then myRev.Accept
End If

当应用于 Selection对象时。

如果所选内容不是插入点,则本示例将所选内容的格式设为阴文。


If Selection.Type <> wdSelectionIP Then
    Selection.Font.Engrave = True
Else
    MsgBox "You need to select some text."
End If

当应用于 Style对象时。

本示例显示一条消息,标明活动文档中名为“SubTitle”的样式的样式类型。


If ActiveDocument.Styles("SubTitle").Type = _
        wdStyleTypeParagraph Then
    MsgBox "Paragraph style"
ElseIf ActiveDocument.Styles("SubTitle").Type = _
        wdStyleTypeCharacter Then
    MsgBox "Character style"
End If

当应用于 View对象时。

本示例将活动窗口切换为打印预览窗口。Type属性新建一个打印预览窗口。


ActiveDocument.ActiveWindow.View.Type = wdPrintPreview

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号