Propriedade Shape.TextEffect (Project)

Obtém propriedades de formatação de texto para a forma. TextEffectFormat só de leitura.

Sintaxe

expressão. TextEffect

expressão Uma variável que representa um objeto Shape.

Exemplo

O exemplo seguinte define a cor de primeiro plano do texto numa moldura de texto para vermelho, a cor de primeiro plano da forma da caixa de texto como um bronzeado amarelo e, em seguida, utiliza a propriedade TextEffect para definir as propriedades do tipo de letra.

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 propriedade

TEXTEFFECTFORMAT

Confira também

Shape ObjectShapeRange.TextEffect PropriedadeTextEffectFormat

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.