Share via


Shape.TextEffect-Eigenschaft (Project)

Ruft Textformatierungseigenschaften für die Form ab. Schreibgeschützter TextEffectFormat-Wert.

Syntax

Ausdruck. Texteffect

Ausdruck Eine Variable, die ein Shape-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird die Vordergrundfarbe von Text in einem Textrahmen auf Rot und die Vordergrundfarbe der Textfeldform auf eine gelbliche Bräune festgelegt, und anschließend wird die TextEffect-Eigenschaft verwendet, um Schriftarteigenschaften festzulegen.

Sub FormatTextBox()
    Dim theReport As Report
    Dim textShape As shape
    Dim reportName As String
    
    reportName = "Textbox report"
    
    Set theReport = ActiveProject.Reports.Add(reportName)
    Set textShape = theReport.Shapes.AddTextbox(msoTextOrientationHorizontal, 30, 50, 350, 80)
    
    textShape.TextFrame2.TextRange.Text = "This is a test. It's only a test. "
    textShape.TextFrame2.TextRange.Characters.Font.Fill.ForeColor.RGB = &H2020CC
    textShape.Fill.ForeColor.RGB = &H88CCCC
    
    With textShape.TextEffect
        .FontName = "Courier New"
        .FontBold = True
        .FontItalic = True
        .FontSize = 28
    End With
End Sub

Eigenschaftswert

TEXTEFFECTFORMAT

Siehe auch

Shape-ObjektShapeRange.TextEffect-EigenschaftTextEffectFormat

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.