Klasse Document (Word VBA)

Die Klasse Document stellt ein Dokument dar.

Die wichtigste Prozeduren der Klasse Document sind Activate, AddToFavorites, Close, Select, Documents.Add, Documents.Close, Documents.Open und Documents.OpenNoRepairDialog

Set

Um eine Document -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim doc as Document
Set doc = ActiveDocument

Die folgenden Prozeduren können zum Festlegen der Document Klassenvariablen verwendet werden : Application.ActiveDocument, Application.CompareDocuments, Application.CustomizationContext, Application.MacroContainer, Application.MergeDocuments, Documents.Add, Documents.Item, Documents.Open, Documents.AddBlogDocument, Documents.OpenNoRepairDialog, KeyBinding.Context, KeyBindings.Context, KeysBoundTo.Context, MailingLabel.CreateNewDocument, MailingLabel.CreateNewDocumentByID, Pane.Document, ProtectedViewWindow.Edit, ProtectedViewWindow.Document, Range.Document, RecentFile.Open, Selection.Document, Subdocument.Open, Template.OpenAsDocument, Version.Open, Window.Document, XMLNode.OwnerDocument und Application.Documents

For Each

Hier ist ein Beispiel für die Verarbeitung der Document -Elemente in einer Sammlung

For Each doc In Documents 
     doc.UpdateStyles 
     doc.Close SaveChanges:=wdSaveChanges 
Next doc

Themas

Einige Prozeduren in dieser Klasse wurden in Themen zusammengefasst und auf separaten Themenseiten beschrieben

Review with its procedures AcceptAllRevisions, AcceptAllRevisionsShown, CheckConsistency, CheckGrammar, CheckSpelling, Comments, Compare, DeleteAllComments, DeleteAllCommentsShown, EndReview, Final, GrammarChecked, GrammaticalErrors, RejectAllRevisions, RejectAllRevisionsShown, Revisions, SendForReview, ShowGrammaticalErrors, ShowSpellingErrors, SpellingChecked, SpellingErrors und TrackRevisions
Format with its procedures ActiveTheme, ActiveWritingStyle, ApplyQuickStyleSet2, ApplyTheme, AutoFormat, AutoFormatOverride, ClickAndTypeParagraphStyle, CopyStylesFromTemplate, DefaultTableStyle, DefaultTabStop, DocumentTheme, DoNotEmbedSystemFonts, EmbedTrueTypeFonts, EnforceStyle, FormattingShowClear, FormattingShowFont, FormattingShowNextLevel, FormattingShowNumbering, FormattingShowParagraph, FreezeLayout, GridOriginFromMargin, LockQuickStyleSet, LockTheme, OMathLeftMargin, OMathRightMargin, PageSetup, ReadingLayoutSizeX, ReadingLayoutSizeY, ReadingModeLayoutFrozen, RemoveDocumentInformation, RemoveLockedStyles, RemovePersonalInformation, RemoveTheme, SaveAsQuickStyleSet, SaveFormat, SaveSubsetFonts, SetDefaultTableStyle, Styles, StyleSheets, StyleSortMethod, TrackFormatting, UpdateStyles und UpdateStylesOnOpen
Name with its procedures ActiveThemeDisplayName, FormattingShowUserStyleName, FullName, Name, OMathFontName, OriginalDocumentTitle, RevisedDocumentTitle und SelectContentControlsByTitle
Save with its procedures AutoSaveOn, CanCheckin, CheckIn, CheckInWithVersion, IsInAutosave, Save, SaveAs2, Saved, SaveEncoding und Documents.Save
Close with its procedures Close, ClosePrintPreview und Documents.Close
Code with its procedures CodeName, VBASigned, VBProject und ViewCode
Open with its procedures CompatibilityMode, OpenEncoding, ReadOnly, ReadOnlyRecommended, SetCompatibilityMode, Documents.CanCheckOut, Documents.CheckOut, Documents.Open und Documents.OpenNoRepairDialog
Export with its procedures ExportAsFixedFormat und ExportAsFixedFormat2
Print with its procedures FitToPages, PrintFormsData, PrintOut, PrintPostScriptOverText, PrintPreview und PrintRevisions
Password with its procedures HasPassword, Password, PasswordEncryptionAlgorithm, PasswordEncryptionFileProperties, PasswordEncryptionKeyLength, PasswordEncryptionProvider, ProtectionType, SetPasswordEncryptionOptions und WritePassword

Methoden

Die Hauptmethoden der Klasse Document sind

Activate - Aktiviert das angegebene Dokument, sodass es zum aktiven Dokument wird.

ActiveDocument.Activate

AddToFavorites - Erstellt eine Verknüpfung mit dem Dokument oder Hyperlink und fügt sie dem Ordner Favoriten hinzu.

ActiveDocument.AddToFavorites

Select - Markiert den Inhalt des angegebenen Dokuments.

ActiveDocument.Select

Documents.Add - Gibt ein Objekt Document zurück, das ein neues leeres Dokument repräsentiert, das der Sammlung an offenen Dokumenten hinzugefügt wurde.

Dim doc As Document
Set doc = Documents.Add()

Andere Methoden

ComputeStatistics - Gibt eine Statistik basierend auf den Inhalten des angegebenen Dokuments zurück.

Dim lngComputeStatistics As Long
lngComputeStatistics = ActiveDocument.ComputeStatistics(Statistic:=wdStatisticCharacters)

ConvertNumbersToText - Ändert die Listennummern und LISTNUM-Felder im angegebenen Dokument in Text.

ActiveDocument.ConvertNumbersToText

CountNumberedItems - Gibt die Anzahl der Aufzählungs-oder nummerierten Elemente und LISTNUM-Felder im angegebenen Document -Objekt zurück.

Dim lngCountNumberedItems As Long
lngCountNumberedItems = ActiveDocument.CountNumberedItems()

CreateLetterContent - Erstellt und gibt ein LetterContent -Objekt basierend auf den angegebenen Letter-Elementen zurück.

Dim strDateFormat As String: strDateFormat = 
Dim strPageDesign As String: strPageDesign = 
Dim strRecipientName As String: strRecipientName = 
Dim strRecipientAddress As String: strRecipientAddress = 
Dim strSalutation As String: strSalutation = 
Dim strRecipientReference As String: strRecipientReference = 
Dim strMailingInstructions As String: strMailingInstructions = 
Dim strAttentionLine As String: strAttentionLine = 
Dim strSubject As String: strSubject = 
Dim strCCList As String: strCCList = 
Dim strReturnAddress As String: strReturnAddress = 
Dim strSenderName As String: strSenderName = 
Dim strClosing As String: strClosing = 
Dim strSenderCompany As String: strSenderCompany = 
Dim strSenderJobTitle As String: strSenderJobTitle = 
Dim strSenderInitials As String: strSenderInitials = 
Dim lngEnclosureNumber As Long: lngEnclosureNumber =  
Dim lctCreateLetterContent As LetterContent
Set lctCreateLetterContent = ActiveDocument.CreateLetterContent(DateFormat:=strDateFormat, IncludeHeaderFooter:=True, PageDesign:=strPageDesign, LetterStyle:=wdFullBlock, Letterhead:=True, LetterheadLocation:=wdLetterBottom, LetterheadSize:=, RecipientName:=strRecipientName, RecipientAddress:=strRecipientAddress, Salutation:=strSalutation, SalutationType:=wdSalutationBusiness, RecipientReference:=strRecipientReference, MailingInstructions:=strMailingInstructions, AttentionLine:=strAttentionLine, Subject:=strSubject, CCList:=strCCList, ReturnAddress:=strReturnAddress, SenderName:=strSenderName, Closing:=strClosing, SenderCompany:=strSenderCompany, SenderJobTitle:=strSenderJobTitle, SenderInitials:=strSenderInitials, EnclosureNumber:=lngEnclosureNumber)

FollowHyperlink - Zeigt ein Cachespeicher-Dokument an, wenn es bereits heruntergeladen wurde.

ActiveDocument.FollowHyperlink

GetCrossReferenceItems - Gibt ein Array von Elementen zurück, auf die auf der Basis des angegebenen Querverweistyps verwiesen werden kann.

Dim arrGetCrossReferenceItems() As Variant
arrGetCrossReferenceItems() = ActiveDocument.GetCrossReferenceItems(ReferenceType:=wdRefTypeBookmark)

GoTo - Gibt ein Range -Objekt zurück, das die Startposition des angegebenen Elements (beispielsweise eine Seite, ein Lesezeichen oder ein Feld) darstellt.

Dim rngGoTo As Range
Set rngGoTo = ActiveDocument.GoTo()

Merge - Integriert die Änderungen, die in einem Dokument mit Korrekturmarkierungen gekennzeichnet wurden, in ein anderes Dokument.

Dim strFileName As String: strFileName =  
ActiveDocument.Merge FileName:=strFileName

Range - Gibt ein Range -Objekt zurück, indem die angegebenen Start- und Endzeichenpositionen verwendet werden.

Dim rng As Range
Set rng = ActiveDocument.Range()

RemoveNumbers - Entfernt Zahlen oder Aufzählungszeichen aus dem angegebenen Dokument.

ActiveDocument.RemoveNumbers

RunLetterWizard - Ruft den Brief-Assistenten mit dem angegebenen Dokument auf.

ActiveDocument.RunLetterWizard

SelectNodes - Gibt eine XMLNodes-Auflistung zurück, die alle Knoten darstellt, die mit dem XPath-Parameter in der angegebenen Reihenfolge übereinstimmen.

Dim strXPath As String: strXPath =  
Dim xmlsSelectNodes As XMLNodes
Set xmlsSelectNodes = ActiveDocument.SelectNodes(XPath:=strXPath)

SelectSingleNode - Gibt ein XmlNode -Objekt zurück, das den ersten Knoten darstellt, der dem XPath-Parameter im angegebenen Dokument entspricht.

Dim strXPath As String: strXPath =  
Dim xmlSelectSingleNode As XMLNode
Set xmlSelectSingleNode = ActiveDocument.SelectSingleNode(XPath:=strXPath)

SendFax - Sendet das angegebene Dokument als Fax ohne Eingriffe des Benutzers.

Dim strAddress As String: strAddress =  
ActiveDocument.SendFax Address:=strAddress

SendFaxOverInternet - Sendet ein Dokument an einen Faxdienst Anbieter, der das Dokument an einen oder mehrere angegebene Empfänger faxen kann.

ActiveDocument.SendFaxOverInternet

TransformDocument - Wendet die angegebene XSLT-Datei (Extensible Stylesheet Language Transformation) auf das angegebene Dokument an und ersetzt das Dokument durch das Ergebnis.

Dim strPath As String: strPath =  
ActiveDocument.TransformDocument Path:=strPath

Eigenschaften

ActiveWindow Gibt ein Window -Objekt zurück, das das aktive Fenster (das Fenster mit dem Fokus) darstellt.

Dim wndActiveWindow As Window
Set wndActiveWindow = ActiveDocument.ActiveWindow

AttachedTemplate Gibt eine Template-Objekt zurück, das die an das angegebenen Dokument angefügte Vorlage angibt.

ActiveDocument.AttachedTemplate =

AutoHyphenation True, wenn für das angegebene Dokument die automatische Silbentrennung aktiviert ist.

ActiveDocument.AutoHyphenation = True

Background Gibt ein Shape -Objekt zurück, das das Hintergrundbild für das angegebene Dokument darstellt.

ActiveDocument.Background =

Bibliography Gibt ein Bibliography -Objekt zurück, das die in einem Dokument enthaltenen Literaturverweise darstellt.

Dim bblBibliography As Bibliography
Set bblBibliography = ActiveDocument.Bibliography

Bookmarks Gibt eine Bookmarks -Auflistung zurück, die alle Textmarken in einem Dokument darstellt.

Dim bkmsBookmarks As Bookmarks
Set bkmsBookmarks = ActiveDocument.Bookmarks

Broadcast Gibt ein Broadcast -Objekt zurück, das eine Broadcast Sitzung darstellt, in der Referenten Word-Dokumente über das Web an Remote Teilnehmer übertragen können, ohne dass die Teilnehmer Rich-Clients installieren müssen.

Dim brdBroadcast As Broadcast
Set brdBroadcast = ActiveDocument.Broadcast

BuiltInDocumentProperties Gibt eine DocumentProperties -Auflistung zurück, die alle integrierten Dokumenteigenschaften für das angegebene Dokument darstellt.

Dim dpsBuiltInDocumentProperties As DocumentProperties
dpsBuiltInDocumentProperties = ActiveDocument.BuiltInDocumentProperties

Characters Gibt eine Characters -Auflistung zurück, die die Zeichen in einem Dokument darstellt.

Dim chrsCharacters As Characters
Set chrsCharacters = ActiveDocument.Characters

ChartDataPointTrack Gibt einen Wert vom Typ Boolean zurück oder legt ihn fest, der angibt, ob Diagramme im aktiven Dokument die Datenpunkt Verfolgung auf Zellverweisen verwenden.

ActiveDocument.ChartDataPointTrack = True

CoAuthoring Gibt ein Mitverfasser -Objekt zurück, das den Einstiegspunkt in das Co-Dokument Erstellungs Objektmodell bereitstellt.

Dim cagCoAuthoring As CoAuthoring
Set cagCoAuthoring = ActiveDocument.CoAuthoring

CommandBars Gibt CommandBars -Auflistung zurück, welche die Menüleiste sowie alle Symbolleisten in Microsoft Word darstellt.

Dim cbsCommandBars As Office.CommandBars
Set cbsCommandBars = ActiveDocument.CommandBars

Compatibility True, wenn die durch das Argument Type angegebene Kompatibilitätsoption aktiviert ist.

ActiveDocument.Compatibility(Type:=wdAlignTablesRowByRow) = True

ConsecutiveHyphensLimit Gibt die maximale Anzahl aufeinanderfolgender Zeilen zurück, die mit Bindestrichen enden können, oder legt diese fest.

ActiveDocument.ConsecutiveHyphensLimit =

Container Gibt das Objekt zurück, das die Containeranwendung für das angegebene Dokument repräsentiert.

Dim objContainer As Object
Set objContainer = ActiveDocument.Container

Content Gibt ein Range -Objekt zurück, das den Hauptdokument Text darstellt.

Dim rngContent As Range
Set rngContent = ActiveDocument.Content

ContentControls Gibt eine ContentControls -Auflistung zurück, die alle Inhaltssteuerelemente in einem Dokument darstellt.

Dim ccsContentControls As ContentControls
Set ccsContentControls = ActiveDocument.ContentControls

ContentTypeProperties Gibt eine MetaProperties-Auflistung zurück, die die in einem Dokument gespeicherten Metadaten darstellt, z. B. Name des Autors, Thema und Firma.

Dim mpsContentTypeProperties As Office.MetaProperties
Set mpsContentTypeProperties = ActiveDocument.ContentTypeProperties

CurrentRsid Gibt einen Wert vom Typ Long zurück, der eine Zufallszahl darstellt, die Word Änderungen in einem Dokument zuweist.

Dim lngCurrentRsid As Long
lngCurrentRsid = ActiveDocument.CurrentRsid

CustomDocumentProperties Gibt eine DocumentProperties -Auflistung zurück, die alle benutzerdefinierten Dokumenteigenschaften für das angegebene Dokument darstellt.

Dim dpsCustomDocumentProperties As DocumentProperties
dpsCustomDocumentProperties = ActiveDocument.CustomDocumentProperties

CustomXMLParts Gibt eine CustomXMLParts -Auflistung zurück, die den benutzerdefinierten XML-Code im XML-Datenspeicher darstellt.

Dim cxmsCustomXMLParts As Office.CustomXMLParts
Set cxmsCustomXMLParts = ActiveDocument.CustomXMLParts

DefaultTargetFrame Zurückgeben oder Festlegen einer Zeichenfolge , die den Browserframe angibt, in dem eine Webseite angezeigt wird, die über einen Hyperlink erreicht wird.

ActiveDocument.DefaultTargetFrame =

DisableFeatures True deaktiviert alle Features, die nach der in der DisableFeaturesIntroducedAfter -Eigenschaft angegebenen Version eingeführt wurden.

ActiveDocument.DisableFeatures = True

DisableFeaturesIntroducedAfter Deaktiviert nur in einem Dokument alle Features, die nach der angegebenen Version von Microsoft Word neu hinzugekommen sind.

ActiveDocument.DisableFeaturesIntroducedAfter = wd70

DocumentInspectors Gibt eine DocumentInspectors -Auflistung zurück, die es Ihnen ermöglicht, verborgene persönliche Informationen wie den Namen des Autors, den Firmennamen und das Datum der Revision zu finden.

Dim disDocumentInspectors As Office.DocumentInspectors
Set disDocumentInspectors = ActiveDocument.DocumentInspectors

DocumentLibraryVersions Gibt eine DocumentLibraryVersions -Auflistung zurück, die die Auflistung von Versionen eines freigegebenen Dokuments darstellt, für die die Versionsverwaltung aktiviert ist und die in einer Dokumentbibliothek auf einem Server gespeichert ist.

Dim dlvsDocumentLibraryVersions As Office.DocumentLibraryVersions
Set dlvsDocumentLibraryVersions = ActiveDocument.DocumentLibraryVersions

Email Gibt ein Email -Objekt zurück, das alle e-Mail-bezogenen Eigenschaften des aktuellen Dokuments enthält.

Dim emlEmail As Email
Set emlEmail = ActiveDocument.Email

EmbedLinguisticData True, wenn Sprache und Handschrift von Microsoft Word eingebettet werden, sodass die Daten wieder in Sprache oder Handschrift umgewandelt werden können.

ActiveDocument.EmbedLinguisticData = True

EncryptionProvider Gibt eine Zeichenfolge zurück, die den Namen des Algorithmus-Verschlüsselungsanbieters angibt, den Microsoft Word beim Verschlüsseln von Dokumenten verwendet.

ActiveDocument.EncryptionProvider =

Endnotes Gibt eine Endnotes-Auflistung zurück, die alle Endnoten in einem Dokument darstellt.

Dim endsEndnotes As Endnotes
Set endsEndnotes = ActiveDocument.Endnotes

Envelope Gibt ein Envelope -Objekt zurück, das eine Umschlag-und Umschlag Funktion in einem Dokument darstellt.

Dim envEnvelope As Envelope
Set envEnvelope = ActiveDocument.Envelope

FarEastLineBreakLanguage Zurückgeben oder Festlegen einer WdFarEastLineBreakLanguageID , der die ostasiatische Sprache darstellt, beim Unterbrechen von Textzeilen im angegebenen Dokument oder Vorlage.

ActiveDocument.FarEastLineBreakLanguage = wdLineBreakJapanese

FarEastLineBreakLevel Zurückgeben oder Festlegen einer WdFarEastLineBreakLevel , die die Steuerelementebene für das angegebene Dokument darstellt.

ActiveDocument.FarEastLineBreakLevel = wdFarEastLineBreakLevelCustom

Fields Gibt eine Fields -Auflistung zurück, die alle Felder im Dokument darstellt.

Dim fldsFields As Fields
Set fldsFields = ActiveDocument.Fields

Footnotes Gibt eine Footnotes -Auflistung zurück, die alle Fußnoten in einem Dokument darstellt.

Dim ftnsFootnotes As Footnotes
Set ftnsFootnotes = ActiveDocument.Footnotes

FormattingShowFilter Legt fest oder gibt eine WdShowFilter -Konstante, die die Formatvorlagen und Formatierung im Aufgabenbereich Formatvorlagen und Formatierung angezeigt darstellt.

ActiveDocument.FormattingShowFilter = wdShowFilterFormattingAvailable

FormFields Gibt eine FormFields -Auflistung zurück, die alle Formularfelder im Dokument darstellt.

Dim ffsFormFields As FormFields
Set ffsFormFields = ActiveDocument.FormFields

FormsDesign True, wenn sich das angegebene Dokument im Formularentwurfsmodus befindet.

Dim booFormsDesign As Boolean
booFormsDesign = ActiveDocument.FormsDesign

Frames Gibt eine Frames -Auflistung zurück, die alle Frames in einem Dokument darstellt.

Dim frmsFrames As Frames
Set frmsFrames = ActiveDocument.Frames

Frameset Gibt ein Frameset -Objekt zurück, das eine gesamte Framesseite oder einen einzelnen Frame auf einer Framesseite darstellt.

Dim frmFrameset As Frameset
Set frmFrameset = ActiveDocument.Frameset

GridDistanceHorizontal Gibt einen einzelnen zurück, der den horizontalen Abstand zwischen den unsichtbaren Gitternetzlinien darstellt, die beim Zeichnen, verschieben und Ändern der Größe von AutoFormen oder ostasiatischen Zeichen im angegebenen Dokument von Microsoft Word verwendet werden, oder legt diesen fest.

ActiveDocument.GridDistanceHorizontal =

GridDistanceVertical Gibt einen einzelnen zurück, der den vertikalen Abstand zwischen den unsichtbaren Gitternetzlinien darstellt, die beim Zeichnen, verschieben und Ändern der Größe von AutoFormen oder ostasiatischen Zeichen im angegebenen Dokument von Microsoft Word verwendet werden, oder legt diesen fest.

ActiveDocument.GridDistanceVertical =

GridOriginHorizontal Gibt einen Single -Wert zurück, der den Punkt relativ zum linken Rand der Seite darstellt, auf dem das unsichtbare Raster für das Zeichnen, verschieben und Ändern der Größe von AutoFormen oder ostasiatischen Zeichen im angegebenen Dokument beginnen soll, oder legt dieses fest.

ActiveDocument.GridOriginHorizontal =

GridOriginVertical Gibt einen Single -Wert zurück, der den Punkt relativ zum oberen Rand der Seite darstellt, auf dem das unsichtbare Raster für das Zeichnen, verschieben und Ändern der Größe von AutoFormen oder ostasiatischen Zeichen im angegebenen Dokument beginnen soll.

ActiveDocument.GridOriginVertical =

GridSpaceBetweenHorizontalLines Gibt die Abstände zwischen den von Microsoft Word in der Drucklayoutansicht angezeigten horizontalen Zeichenrasterlinien zurück oder legt sie fest.

ActiveDocument.GridSpaceBetweenHorizontalLines =

GridSpaceBetweenVerticalLines Gibt die Abstände zwischen den von Microsoft Word in der Drucklayoutansicht angezeigten vertikalen Zeichenrasterlinien zurück oder legt sie fest.

ActiveDocument.GridSpaceBetweenVerticalLines =

HasVBProject Gibt einen Wert vom Typ Boolean zurück, der angibt, ob ein Dokument ein angeFügtes Microsoft Visual Basic für Applikationen-Projekt enthält.

Dim booHasVBProject As Boolean
booHasVBProject = ActiveDocument.HasVBProject

HTMLDivisions Gibt eine HTMLDIVISIONS -Auflistung zurück, die die HTML div-Elemente in einem Webdokument darstellt.

Dim htmsHTMLDivisions As HTMLDivisions
Set htmsHTMLDivisions = ActiveDocument.HTMLDivisions

Hyperlinks Gibt eine Hyperlinks -Auflistung zurück, die alle Hyperlinks im angegebenen Dokument darstellt.

Dim hypsHyperlinks As Hyperlinks
Set hypsHyperlinks = ActiveDocument.Hyperlinks

HyphenateCaps True, wenn Wörter in Großbuchstaben getrennt werden können.

ActiveDocument.HyphenateCaps = True

HyphenationZone Gibt die Breite der Silbentrennzone in Punkt zurück oder legt sie fest.

ActiveDocument.HyphenationZone =

Indexes Gibt eine Indexes -Auflistung zurück, die alle Indizes im angegebenen Dokument darstellt.

Dim idxsIndexes As Indexes
Set idxsIndexes = ActiveDocument.Indexes

InlineShapes Gibt eine InlineShapes-Auflistung zurück, die alle InlineShape-Objekte in einem Dokument darstellt.

Dim issInlineShapes As InlineShapes
Set issInlineShapes = ActiveDocument.InlineShapes

IsMasterDocument True, wenn es sich beim angegebenen Dokument um ein Zentraldokument handelt.

Dim booIsMasterDocument As Boolean
booIsMasterDocument = ActiveDocument.IsMasterDocument

IsSubdocument True, wenn es sich beim angegebenen Dokument um ein Filialdokument eines Zentraldokuments handelt.

Dim booIsSubdocument As Boolean
booIsSubdocument = ActiveDocument.IsSubdocument

JustificationMode Gibt die Zeichenabstandausrichtung für das angegebene Dokument zurück oder legt sie fest.

ActiveDocument.JustificationMode = wdJustificationModeCompress

KerningByAlgorithm True, falls halbbreite lateinische Zeichen und Interpunktionszeichen im angegebenen Dokument von Microsoft Word unterschnitten werden.

ActiveDocument.KerningByAlgorithm = True

Kind Gibt den Formattyp zurück, der von Microsoft Word bei der automatischen Formatierung des angegebenen Dokuments verwendet wird, oder legt diesen Formattyp fest.

ActiveDocument.Kind = wdDocumentEmail

LanguageDetected Gibt einen Wert zurück, der angibt, ob die Sprache des ausgewählten Texts von Microsoft Word erkannt wird, oder legt diesen Wert fest.

ActiveDocument.LanguageDetected = True

ListParagraphs Gibt ein ListParagraphs -Objekt zurück, das alle nummerierten Absätze in einem Dokument darstellt.

Dim lpsListParagraphs As ListParagraphs
Set lpsListParagraphs = ActiveDocument.ListParagraphs

Lists Gibt eine lists -Auflistung zurück, die alle formatierten Listen im angegebenen Dokument enthält.

Dim lstsLists As Lists
Set lstsLists = ActiveDocument.Lists

ListTemplates Gibt eine ListTemplates -Auflistung zurück, die alle Listenformate für das angegebene Dokument darstellt.

Dim ltsListTemplates As ListTemplates
Set ltsListTemplates = ActiveDocument.ListTemplates

MailEnvelope Gibt ein MsoEnvelope -Objekt zurück, das eine e-Mail-Kopfzeile für ein Dokument darstellt.

Dim meeMailEnvelope As Office.MsoEnvelope
Set meeMailEnvelope = ActiveDocument.MailEnvelope

MailMerge Gibt ein MailMerge -Objekt zurück, das die Seriendruckfunktionalität für das angegebene Dokument darstellt.

Dim mmeMailMerge As MailMerge
Set mmeMailMerge = ActiveDocument.MailMerge

NoLineBreakAfter Zurückgeben oder festlegen die Kinsoku Zeichen, nach denen Microsoft Word eine Leitung nicht unterbricht.

ActiveDocument.NoLineBreakAfter =

NoLineBreakBefore Gibt die Kinsoku-Zeichen zurück oder legt Sie fest, vor denen Microsoft Word keine Linien unterbricht.

ActiveDocument.NoLineBreakBefore =

OMathBreakBin Gibt eine WdOMathBreakBin -Konstante zurück oder legt Sie fest, die angibt, wo binäre Operatoren in Microsoft Word platziert werden, wenn Formeln zwei oder mehr Zeilen umfassen.

ActiveDocument.OMathBreakBin = wdOMathBreakBinAfter

OMathBreakSub Zurückgeben oder festlegen eine WdOMathBreakSub -Konstanten, die darstellt, wie Microsoft Word einen Subtraktionsoperator behandelt, der vor einem Umbruch liegt.

ActiveDocument.OMathBreakSub = wdOMathBreakSubMinusMinus

OMathIntSubSupLim Gibt einen Wert vom Typ Boolean zurück, der die Standardposition von Grenzwerten für integrale darstellt, oder legt diesen fest.

ActiveDocument.OMathIntSubSupLim = True

OMathJc Gibt eine WdOMathJc -Konstante zurück oder legt Sie fest, die die Standardausrichtung (Links, rechts, zentriert oder zentriert als Gruppe) einer Gruppe von Formeln darstellt.

ActiveDocument.OMathJc = wdOMathJcCenter

OMathNarySupSubLim Gibt einen Wert vom Typ Boolean zurück, der die Standardposition von Grenzwerten für n-andere Objekte als integrale darstellt, oder legt diesen fest.

ActiveDocument.OMathNarySupSubLim = True

OMaths Gibt eine OMaths -Auflistung zurück, die die OMath -Objekte innerhalb des angegebenen Bereichs darstellt.

Dim omsOMaths As OMaths
Set omsOMaths = ActiveDocument.OMaths

OMathSmallFrac Gibt zurück oder legt einen booleschen Wert , der angibt, ob kleine Brüche in Formeln innerhalb des Dokuments enthalten.

ActiveDocument.OMathSmallFrac = True

OMathWrap Gibt einen Single -Wert zurück, der die Platzierung der zweiten Position einer Formel darstellt, die in eine neue Position umbrochen wird, oder legt diesen fest.

ActiveDocument.OMathWrap =

Paragraphs Gibt eine Paragraphs -Auflistung zurück, die alle Absätze im angegebenen Dokument darstellt.

Dim prgsParagraphs As Paragraphs
Set prgsParagraphs = ActiveDocument.Paragraphs

Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Document-Objekts darstellt.

Dim objParent As Object
Set objParent = ActiveDocument.Parent

Path Gibt den Datenträger oder Webpfad an das Dokument zurück.

Dim strPath As String
strPath = ActiveDocument.Path

Permission Gibt ein Permission -Objekt zurück, das die Berechtigungseinstellungen im angegebenen Dokument darstellt.

Dim prmPermission As Office.Permission
Set prmPermission = ActiveDocument.Permission

ReadabilityStatistics Gibt eine ReadabilityStatistics -Auflistung zurück, die die Statistiken zur Lesbarkeit für das angegebene Dokument oder den angegebenen Bereich darstellt.

Dim rssReadabilityStatistics As ReadabilityStatistics
Set rssReadabilityStatistics = ActiveDocument.ReadabilityStatistics

RemoveDateAndTime Legt fest oder gibt einen Wert vom Typ Boolean zurück, der angibt, ob ein Dokument die Datums-und Uhrzeit Metadaten für nachverfolgte Änderungen speichert.

ActiveDocument.RemoveDateAndTime = True

Research Gibt ein Research -Objekt zurück, das den Recherchedienst für ein Dokument darstellt.

Dim rsrResearch As Research
Set rsrResearch = ActiveDocument.Research

SaveFormsData True, wenn Microsoft Word die in ein Formular eingegebenen Daten als einen durch Tabstopps getrennten Datensatz speichert, der in einer Datenbank verwendet werden kann.

ActiveDocument.SaveFormsData = True

Scripts Gibt eine Scripts -Auflistung zurück, die die Auflistung von HTML-Skripts im angegebenen Objekt darstellt.

Dim scrsScripts As Office.Scripts
scrsScripts = ActiveDocument.Scripts

Sections Gibt eine section -Auflistung zurück, die die Abschnitte im angegebenen Dokument darstellt.

Dim sctsSections As Sections
Set sctsSections = ActiveDocument.Sections

Sentences Gibt eine Sentences -Auflistung zurück, die alle Sätze im Dokument darstellt.

Dim sntsSentences As Sentences
Set sntsSentences = ActiveDocument.Sentences

ServerPolicy Gibt ein ServerPolicy -Objekt zurück, das eine Richtlinie darstellt, die für ein Dokument angegeben ist, das auf einem Server mit Microsoft Office SharePoint Server 2007 gespeichert ist.

Dim spyServerPolicy As Office.ServerPolicy
Set spyServerPolicy = ActiveDocument.ServerPolicy

Shapes Gibt eine Shapes -Auflistung zurück, die alle Shape -Objekte im angegebenen Dokument darstellt.

Dim shpsShapes As Shapes
Set shpsShapes = ActiveDocument.Shapes

Signatures Gibt eine SignatureSet -Auflistung zurück, die die digitalen Signaturen für ein Dokument darstellt.

Dim sstSignatures As Office.SignatureSet
Set sstSignatures = ActiveDocument.Signatures

SmartDocument Gibt ein SmartDocument -Objekt zurück, das die Einstellungen für eine Smart Document-Lösung darstellt.

Dim sdtSmartDocument As Office.SmartDocument
Set sdtSmartDocument = ActiveDocument.SmartDocument

SnapToGrid True, wenn AutoFormen oder ostasiatische Zeichen im angegebenen Dokument beim Zeichnen, Verschieben oder Ändern der Größe automatisch an einem unsichtbaren Gitter ausgerichtet werden.

ActiveDocument.SnapToGrid = True

SnapToShapes True, wenn AutoFormen oder ostasiatische Zeichen automatisch von Microsoft Word an unsichtbaren Gitternetzlinien ausgerichtet werden, die durch die vertikalen und horizontalen Ränder anderer AutoFormen oder ostasiatischer Zeichen im angegebenen Dokument verlaufen.

ActiveDocument.SnapToShapes = True

StoryRanges Gibt eine StoryRanges -Auflistung zurück, die alle Textabschnitte im angegebenen Dokument darstellt.

Dim srsStoryRanges As StoryRanges
Set srsStoryRanges = ActiveDocument.StoryRanges

Subdocuments Gibt eine Subdocuments-Auflistung zurück, die alle Filialdokumente im angegebenen Dokument darstellt.

Dim sbdsSubdocuments As Subdocuments
Set sbdsSubdocuments = ActiveDocument.Subdocuments

Sync

Dim synSync As Office.Sync
Set synSync = ActiveDocument.Sync

Tables Gibt eine Table -Auflistung zurück, die alle Tabellen im angegebenen Dokument darstellt.

Dim tblsTables As Tables
Set tblsTables = ActiveDocument.Tables

TablesOfAuthorities Gibt eine TableOfAuthorities -Auflistung zurück, die die Rechtsgrundlagenverzeichnisse im angegebenen Dokument darstellt.

Dim toasTablesOfAuthorities As TablesOfAuthorities
Set toasTablesOfAuthorities = ActiveDocument.TablesOfAuthorities

TablesOfAuthoritiesCategories Gibt eine TablesOfAuthoritiesCategories -Auflistung zurück, die die verfügbaren Kategorien für das öffentliche Verzeichnis für das angegebene Dokument darstellt.

Dim toasTablesOfAuthoritiesCategories As TablesOfAuthoritiesCategories
Set toasTablesOfAuthoritiesCategories = ActiveDocument.TablesOfAuthoritiesCategories

TablesOfContents Gibt eine TablesOfContents -Auflistung zurück, die die Inhaltsverzeichnisse im angegebenen Dokument darstellt.

Dim tocsTablesOfContents As TablesOfContents
Set tocsTablesOfContents = ActiveDocument.TablesOfContents

TablesOfFigures Gibt eine TablesOfFigures -Auflistung zurück, die die Abbildungstabellen im angegebenen Dokument darstellt.

Dim tofsTablesOfFigures As TablesOfFigures
Set tofsTablesOfFigures = ActiveDocument.TablesOfFigures

TextEncoding Dient zum Zurückgeben oder Festlegen der Codepage oder des Zeichensatzes, die Microsoft Word für ein als codierte Textdatei gespeichertes Dokument verwendet.

ActiveDocument.TextEncoding =

TextLineEnding Zurückgeben oder festlegen eine WdLineEndingType -Konstante, die angibt, wie Microsoft Word die Zeilen-und Absatzumbrüche in Dokumenten als Textdateien gespeichert markiert.

ActiveDocument.TextLineEnding = wdCRLF

TrackMoves Dient zum Zurückgeben oder Festlegen eines Werts vom Typ Boolean , der angibt, ob verschobener Text beim Aktivieren von Nachverfolgen von Änderungen markiert werden soll.

ActiveDocument.TrackMoves = True

Type Gibt den Dokumenttyp zurück (Vorlage oder Dokument).

Dim wdtType As WdDocumentType
wdtType = ActiveDocument.Type

UseMathDefaults Gibt einen Wert vom Typ Boolean zurück, der angibt, ob beim Erstellen neuer Formeln die standardmäßigen mathematischen Einstellungen verwendet werden sollen, oder legt diesen fest.

ActiveDocument.UseMathDefaults = True

UserControl True, wenn das Dokument vom Benutzer erstellt oder geöffnet wurde.

ActiveDocument.UserControl = True

Variables Gibt eine variables -Auflistung zurück, die die im angegebenen Dokument gespeicherten Variablen darstellt.

Dim vrbsVariables As Variables
Set vrbsVariables = ActiveDocument.Variables

WebOptions Gibt das WebOptions -Objekt zurück, das Attribute auf Dokumentebene enthält, die von Microsoft Word verwendet werden, wenn Sie ein Dokument als Webseite speichern oder eine Webseite öffnen.

Dim wosWebOptions As WebOptions
Set wosWebOptions = ActiveDocument.WebOptions

Windows Gibt eine Windows -Auflistung zurück, die alle Fenster für das angegebene Dokument darstellt.

Dim wndsWindows As Windows
Set wndsWindows = ActiveDocument.Windows

WordOpenXML Gibt eine Zeichenfolge , die das flache XML-Format für den Word Open XML-Inhalt des Dokuments darstellt.

Dim strWordOpenXML As String
strWordOpenXML = ActiveDocument.WordOpenXML

Words Gibt eine Words -Auflistung zurück, die alle Wörter in einem Dokument darstellt.

Dim wrdsWords As Words
Set wrdsWords = ActiveDocument.Words

WorkIdentity

ActiveDocument.WorkIdentity =

WriteReserved True, wenn das angegebene Dokument mit einem Schreibkennwort geschützt ist.

Dim booWriteReserved As Boolean
booWriteReserved = ActiveDocument.WriteReserved

XMLSaveThroughXSLT Legt fest oder gibt eine Zeichenfolge , die den Pfad und den Dateinamen für die XSL-Transformation (Extensible Stylesheet Language Transformation) angibt, die angewendet werden soll, wenn ein Benutzer ein Dokument speichert.

ActiveDocument.XMLSaveThroughXSLT =

XMLSchemaReferences Gibt eine XMLSchemaReferences-Auflistung zurück, die die Schemas repräsentiert, die an ein Dokument angefügt sind.

Dim xmlsXMLSchemaReferences As XMLSchemaReferences
Set xmlsXMLSchemaReferences = ActiveDocument.XMLSchemaReferences

XMLShowAdvancedErrors Dient zum Zurückgeben oder Festlegen eines Werts vom Typ Boolean , der angibt, ob der Text der Fehlermeldung aus den integrierten Microsoft Word Fehlermeldungen oder aus der in Office enthaltenen MSXML 5,0-Komponente (Microsoft XML Core Services) generiert wird.

ActiveDocument.XMLShowAdvancedErrors = True

XMLUseXSLTWhenSaving Gibt einen Wert vom Typ Boolean zurück, der angibt, ob ein Dokument über eine Extensible Stylesheet Language Transformation (XSLT) gespeichert werden soll.

ActiveDocument.XMLUseXSLTWhenSaving = True

Documents.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der Dokumente in der Auflistung darstellt.

Dim lngCount As Long
lngCount = Documents.Count

Documents.Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Documents-Objekts darstellt.

Dim objParent As Object
Set objParent = Documents.Parent