TextRange2.Runs-Eigenschaft (Office)

Ruft ein TextRange2 -Objekt, das die angegebene Untermenge von Textläufe darstellt. Einen Textlauf besteht aus einem Bereich von Zeichen, die dieselben Schriftattribute aufweisen. Schreibgeschützt.

Syntax

Ausdruck verwendet werden. Ausführungen (Start, Länge)

Ausdruck Ein Ausdruck, der ein TextRange2-Objekt zurückgibt.

Parameter

Rückgabewert

TextRange2

Hinweise

Wenn sowohl "Start " als auch "Länge" nicht angegeben werden, beginnt der zurückgegebene Bereich mit der ersten Ausführung und endet mit dem letzten Absatz im angegebenen Bereich.

Wenn "Start" angegeben ist, " Länge" jedoch weggelassen wird, enthält der zurückgegebene Bereich eine Ausführung.

Wenn "Length " angegeben ist, "Start " aber weggelassen wird, beginnt der zurückgegebene Bereich mit der ersten Ausführung im angegebenen Bereich.

Wenn Start größer als die Anzahl der Ausführungen im angegebenen Text ist, beginnt der zurückgegebene Bereich mit der letzten Ausführung im angegebenen Bereich.

Wenn die Länge größer als die Anzahl der Ausführungen vom angegebenen Startlauf bis zum Ende des Texts ist, enthält der zurückgegebene Bereich alle diese Durchläufe.

Ein Lauf besteht aus allen Zeichen ab dem ersten Zeichen nach einer Schriftänderung bis zum vorletzten Zeichen mit denselben Schriftattributen. Betrachten Sie z. B. den folgenden Satz:

Dieses kursive Wort ist nicht fett.

Darin besteht der erste Textlauf nur dann aus dem Wort "Das", wenn das Leerzeichen nach "Das" nicht kursiv formatiert ist (ist das Leerzeichen kursiv, besteht der erste Textlauf lediglich aus den beiden ersten Zeichen: "Da"). Entsprechend enthält der zweite Textlauf nur dann das Wort "kursive", wenn das nachfolgende Leerzeichen kursiv formatiert ist.

Beispiel

In diesem Beispiel wird der zweite Lauf in der zweiten Form der ersten Folie in der aktiven Präsentation als fett und kursiv formatiert, wenn er bereits kursiv ist.

With Application.ActivePresentation.Slides(1).Shapes(2) _ 
        .TextFrame.TextRange2 
    With .Runs(2).Font 
        If .Italic Then 
            .Bold = True 
        End If 
    End With 
End With

Siehe auch

• TextRange2-Objektmember

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.