Klasse TextFrame2 (PowerPoint VBA)

Die Klasse TextFrame2 stellt den Textrahmen in einem Shape - oder ShapeRange -Objekt dar. Enthält den Text im Textrahmen und macht die Eigenschaften und Methoden verfügbar, die die Ausrichtung und Verankerung des Textrahmens steuern.

Set

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

Dim tf2 as TextFrame2
Set tf2 = ActiveWindow.RangeFromPoint.TextFrame2

Die folgenden Prozeduren können zum Festlegen der TextFrame2 Klassenvariablen verwendet werden : ChartFormat.TextFrame2, Shape.TextFrame2 und ShapeRange.TextFrame2

Themas

Die folgenden Prozeduren in dieser Klasse wurden zusammengefasst und auf eine separate Themenseite beschrieben

Format with its procedures PathFormat, WarpFormat und WordArtFormat

Eigenschaften

AutoSize Gibt einen Wert zurück oder legt einen Wert fest, der angibt, ob die Größe der angegebenen Form automatisch geändert und an den Text innerhalb ihrer Begrenzung angepasst wird. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.AutoSize = msoAutoSizeMixed

Column Gibt das Column -Objekt zurück, das die Spalten des angegebenen Textrahmens darstellt. Schreibgeschützt.

Dim tc2Column As Office.TextColumn2
Set tc2Column = ActivePresentation.Slides(1).Shapes(1).TextFrame2.Column

HasText Gibt an, ob die Form, die den angegebenen Textrahmen enthält, mit Text verknüpft ist. Schreibgeschützt.

Dim mtsHasText As Office.MsoTriState
mtsHasText = ActivePresentation.Slides(1).Shapes(1).TextFrame2.HasText

HorizontalAnchor Gibt die horizontale Ausrichtung für Text in einem Textrahmen zurück oder legt diese fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.HorizontalAnchor = msoHorizontalAnchorMixed

MarginBottom Gibt den Abstand (in Punkt) zwischen dem unteren Rand des Textrahmens und dem unteren Rand des beschrifteten Rechtecks der Form zurück, die den Text enthält, oder legt diesen fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.MarginBottom = 6

MarginLeft Gibt den Abstand (in Punkt) zwischen dem linken Rand des Textrahmens und dem linken Rand des beschrifteten Rechtecks der Form zurück, die den Text enthält, oder legt diesen fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.MarginLeft = 6

MarginRight Gibt den Abstand (in Punkt) zwischen dem rechten Rand des Textrahmens und dem rechten Rand des beschrifteten Rechtecks der Form zurück, die den Text enthält, oder legt diesen fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.MarginRight = 6

MarginTop Gibt den Abstand (in Punkt) zwischen dem oberen Rand des Textrahmens und dem oberen Rand des beschrifteten Rechtecks der Form zurück, die den Text enthält, oder legt diesen fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.MarginTop = 6

NoTextRotation Gibt an, ob Text mit der TextFrame2 Drehung gedreht werden soll. Einer der folgenden MsoTriState -Konstanten. Lese-/Schreibzugriff.

ActiveWindow.RangeFromPoint.TextFrame2.NoTextRotation = msoTrue

Orientation Gibt die Textausrichtung zurück oder legt sie fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.Orientation = msoTextOrientationMixed

Parent Gibt das übergeordnete Objekt des angegebenen Textrahmens zurück. Schreibgeschützt.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.TextFrame2.Parent

Ruler Gibt ein Ruler2 -Objekt, das das Lineal für den angegebenen Text darstellt. Schreibgeschützt.

Dim rlrRuler As Office.Ruler2
Set rlrRuler = ActivePresentation.Slides(1).Shapes(1).TextFrame2.Ruler

TextRange Gibt ein TextRange2-Objekt (PowerPoint)- Objekt zurück, das den Text im angegebenen Textrahmen darstellt. Schreibgeschützt.

Dim tr2TextRange As Office.TextRange2
Set tr2TextRange = ActivePresentation.Slides(1).Shapes(1).TextFrame2.TextRange

ThreeD Gibt ein ThreeDFormat -Objekt zurück, das die dreidimensionale Formatierung der übergeordneten Form darstellt. Schreibgeschützt.

Dim tdfThreeD As ThreeDFormat
Set tdfThreeD = ActiveWindow.RangeFromPoint.TextFrame2.ThreeD

VerticalAnchor Gibt die vertikale Ausrichtung für Text in einem Textrahmen zurück oder legt diese fest. Lese-/Schreibzugriff.

ActivePresentation.Slides(1).Shapes(1).TextFrame2.VerticalAnchor = msoVerticalAnchorMixed

WordWrap Bestimmt, ob Textzeilen durch automatischen Umbruch der Form angepasst werden. Lese-/Schreibzugriff.

ActiveWindow.RangeFromPoint.TextFrame2.WordWrap = msoTrue