TextRange-Objekt (PowerPoint)

  • Artikel

Enthält den Text, der mit einer Form verknüpft ist, sowie Eigenschaften und Methoden zum Bearbeiten des Texts.

HinwBemerkungeneise

Im folgenden Beispiel werden folgende Aktionen beschrieben:

  • Zurückgeben eines Textbereichs bei einer angegebenen Form.

  • Zurückgeben eines Textbereichs aus der Markierung.

  • Zurückgeben von bestimmten Zeichen, Wörtern, Zeilen, Sätzen oder Absätzen aus einem Textbereich.

  • Suchen und Ersetzen von Text in einem Textbereich.

  • Einfügen von Text, Datum und Uhrzeit oder der Foliennummer in einen Textbereich.

  • Positionieren des Cursors in einem Textbereich.

Beispiel

Verwenden Sie die TextRange-Eigenschaftdes TextFrame-Objekts , um ein TextRange-Objekt für jede von Ihnen angegebene Form zurückzugeben. Verwenden Sie die Text-Eigenschaft, um die Textzeichenfolge im TextRange-Objekt zurückzugeben. Im folgenden Beispiel wird myDocument ein Rechteck hinzugefügt und der darin enthaltene Text festgelegt.

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140) _

    .TextFrame.TextRange.Text = "Here is some test text"

Da es sich bei der Text -Eigenschaft um die Standardeigenschaft des TextRange -Objekts handelt, sind die folgenden beiden Anweisungen gleichbedeutend.

ActivePresentation.Slides(1).Shapes(1).TextFrame _

    .TextRange.Text = "Here is some test text"

ActivePresentation.Slides(1).Shapes(1).TextFrame _

    .TextRange = "Here is some test text"

Verwenden Sie die HasTextFrame-Eigenschaft, um zu bestimmen, ob eine Form über einen Textrahmen verfügt, und verwenden Sie die HasText-Eigenschaft, um zu bestimmen, ob der Textrahmen Text enthält.

Mit der TextRange -Eigenschaft des Selection -Objekts können Sie den momentan markierten Text zurückgeben. Das folgende Beispiel kopiert die Markierung in die Zwischenablage.

ActiveWindow.Selection.TextRange.Copy

Verwenden Sie eine der folgenden Methoden, um einen Teil des Texts eines TextRange-Objekts zurückzugeben: Characters, Lines, Paragraphs, Runs, Sentences oder Words.

Verwenden Sie die Find- und Replace-Methoden, um Text in einem Textbereich zu suchen und zu ersetzen.

Verwenden Sie eine der folgenden Methoden, um Zeichen in ein TextRange-Objekt einzufügen: InsertAfter, InsertBefore, InsertDateTime, InsertSlideNumber oder InsertSymbol.

Methoden

Name
AddPeriods
ChangeCase
Characters
Copy
Cut
Delete
Suchen
InsertAfter
InsertBefore
InsertDateTime
InsertSlideNumber
InsertSymbol
Lines
LtrRun
Paragraphs
Paste
PasteSpecial
RemovePeriods
Replace
RotatedBounds
RtlRun
Runs
Select
Sentences
TrimText
Words

Eigenschaften

Name
ActionSettings
Anwendung
BoundHeight
BoundLeft
BoundTop
BoundWidth
Count
Font
IndentLevel
LanguageID
Length
ParagraphFormat
Parent
Start
Text

Siehe auch

PowerPoint-Objektmodellreferenz

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.