Share via


Font Object [Publisher 2003 VBA Language Reference]

Multiple objects
Font
ColorFormat

Contains font attributes (font name, font size, color, and so on) for an object.

Using the Font Object

Use the Font property to return the Font object. The following instruction applies bold formatting to the selection.

Sub BoldText()
    Selection.TextRange.Font.Bold = True
End Sub

The following example formats the first paragraph in the active publication as 24-point Arial and italic.

Sub FormatText()
    Dim txtRange As TextRange
    Set txtRange = ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange
    With txtRange.Font
        .Bold = True
        .Name = "Arial"
        .Size = 24
    End With
End Sub

The following example changes the formatting of the Heading 2 style in the active publication to Arial and bold.

Sub FormatStyle()
    With ActiveDocument.TextStyles("Normal").Font
        .Name = "Tahoma"
        .Italic = True
        .Size = 15
    End With
End Sub

You can also duplicate a Font object by using the Duplicate property. The following example creates a new character style with the character formatting from the selection as well as italic formatting. The formatting of the selection isn't changed.

Sub DuplicateFont()
    Dim fntNew As Font
    Set fntNew = Selection.TextRange.Font.Duplicate
    fntNew.Italic = True
    ActiveDocument.TextStyles.Add(StyleName:="Italics").Font = fntNew
End Sub

Properties | AllCaps Property | Application Property | AttachedToText Property | AutomaticPairKerningThreshold Property | Bold Property | BoldBi Property | Color Property | DiacriticColor Property | Emboss Property | Engrave Property | ExpandUsingKashida Property | Italic Property | ItalicBi Property | Kerning Property | Name Property | Outline Property | Parent Property | Position Property | Scaling Property | Shadow Property | Size Property | SizeBi Property | SmallCaps Property | SubScript Property | SuperScript Property | Tracking Property | TrackingPreset Property | Underline Property | UseDiacriticColor Property

Methods | Duplicate Method | GetScriptName Method | Grow Method | Reset Method | SetScriptName Method | Shrink Method

Parent Objects | TextRange Object | TextStyle Object

Child Objects | ColorFormat Object