TextRange.Font

Property Font As String

Member of TextRange

The Font property returns of sets the name of the font for a text range.

The following VBA example sets the paragraph font to 24-point Arial.

Sub Test()

Dim d As Document

Dim s As Shape

Dim t As Text

Set d = CreateDocument

Set s = d.ActiveLayer.CreateParagraphText(3, 3, 5, 5, "This is an example.")

Set t = s.Text

t.Story.Font = "Arial"

t.Story.Size = 24

End Sub