Propiedad Shape.TextEffect (Project)

Obtiene las propiedades de formato de texto de la forma. TextEffectFormat de solo lectura.

Sintaxis

expresión. TextEffect

Expresión Variable que representa un objeto Shape .

Ejemplo:

En el ejemplo siguiente se establece el color de primer plano del texto de un marco de texto en rojo, el color de primer plano de la forma del cuadro de texto en un bronceado amarillento y, a continuación, se usa la propiedad TextEffect para establecer las propiedades de fuente.

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

Valor de propiedad

TEXTEFFECTFORMAT

Consulte también

Propiedad Shape Object ShapeRange.TextEffectTextEffectFormat

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.