Propriété Shape.TextEffect (Project)

Obtient les propriétés de mise en forme du texte pour la forme. Type de données TextEffectFormat en lecture seule.

Syntaxe

expression. TextEffect

Expression Variable qui représente un objet Shape .

Exemple

L’exemple suivant définit la couleur de premier plan du texte dans un cadre de texte sur rouge, la couleur de premier plan de la forme de zone de texte sur un bronzage jaunâtre, puis utilise la propriété TextEffect pour définir les propriétés de police.

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

Valeur de la propriété

TEXTEFFECTFORMAT

Voir aussi

Shape, objetShapeRange.TextEffect, propriétéTextEffectFormat

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.