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.
Fügt horizontalen Text in einen Vertikalen Textstrom ein und gibt den neuen horizontalen Text als Field-Objekt zurück.
Syntax
Ausdruck. AddHorizontalInVertical (Bereich, Text)
Ausdruck Eine Variable, die ein Fields-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Range | Erforderlich | TextRange | Der Textbereich, in den der horizontale Text eingefügt werden soll. |
| Text | Erforderlich | String | Der Text, der horizontal eingefügt werden soll. |
Rückgabewert
Feld
Beispiel
In diesem Beispiel wird der Text Horizontaler Test nach dem vorhandenen vertikalen Text in Form 1 auf Seite 1 der aktiven Publikation horizontal eingefügt.
Dim rngTemp As TextRange
Dim fldTemp As Field
With ActiveDocument.Pages(1).Shapes(1)
Set rngTemp = .TextFrame.TextRange.InsertAfter("")
Set fldTemp = .TextFrame.TextRange.Fields _
.AddHorizontalInVertical(Range:=rngTemp, Text:="Horizontal Test")
End With
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.