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