Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt die Beschriftungskategorie (z. B. Abbildung, Tabelle oder Gleichung) der angegebenen Beschriftung zurück oder legt sie fest. Variant mit Lese-/Schreibzugriff.
Syntax
Ausdruck. CaptionLabel
Ausdruck Eine Variable, die ein AutoCaption-Objekt darstellt.
Hinweise
Diese Eigenschaft kann durch eine Zeichenfolge oder eine WdCaptionLabelID-Konstante festgelegt werden.
Beispiel
In diesem Beispiel werden der Name (z. B. "Microsoft Excel-Tabelle") und die Beschriftungskategorie (z. B. "Abbildung") für jedes Element angezeigt, dem beim Einfügen automatisch eine Beschriftung hinzugefügt wird.
Dim acLoop As AutoCaption
For Each acLoop In AutoCaptions
If acLoop.AutoInsert = True Then MsgBox acLoop.Name _
& vbCr & "Label = " & acLoop.CaptionLabel.Name
Next acLoop
In diesem Beispiel wird die Beschriftungskategorie für Word-Tabellen auf "Table" festgelegt und dann unmittelbar nach der Markierung eine neue Tabelle eingefügt.
With AutoCaptions("Microsoft Word Table")
.AutoInsert = True
.CaptionLabel = wdCaptionTable
End With
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, _
NumColumns:=3
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.