TextRange.Font property (PowerPoint)

Returns a Font object that represents character formatting. Read-only.

Syntax

expression.Font

expression A variable that represents a TextRange object.

Return value

Font

Example

This example sets the formatting for the text in shape one on slide one in the active presentation.

With ActivePresentation.Slides(1).Shapes(1)

    With .TextFrame.TextRange.Font

        .Size = 48

        .Name = "Palatino"

        .Bold = True

        .Color.RGB = RGB(255, 127, 255)

    End With

End With

This example sets the color and font name for bullets in shape two on slide one.

With ActivePresentation.Slides(1).Shapes(2)

    With .TextFrame.TextRange.ParagraphFormat.Bullet

        .Visible = True

        With .Font

            .Name = "Palatino"

            .Color.RGB = RGB(0, 0, 255)

        End With

    End With

End With

See also

TextRange Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.