次の方法で共有


Shape.TextEffect プロパティ (Project)

図形のテキスト書式設定プロパティを取得します。 読み取り専用 TextEffectFormat

構文

TextEffect

Shape オブジェクトを表す変数。

次の使用例は、テキスト 枠内のテキストの前景色を赤に設定し、テキスト ボックス図形の前景色を黄色のタンに設定し、 TextEffect プロパティを使用してフォント プロパティを設定します。

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

プロパティ値

TEXTEFFECTFORMAT

関連項目

Shape オブジェクトShapeRange.TextEffect プロパティTextEffectFormat

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。