Report.SelectionFont

Returns the font of the selected text in the report.

This property is read only.

Syntax Parameters Return value
- - Font

SVB Example

Formatting the font in a report: 

Option Base 1
Option Explicit
Sub Main
    Dim rpt As Report
    'set the font to be associated with the report
    Dim FancyFont As Font
    Set FancyFont = rpt.SelectionFont
    'alter the font to look "fancy"
    FancyFont.Name = "MS Comic Sans"
    FancyFont.Italic = True
    FancyFont.Color = RGB(100,100,100)
    'apply the font to the select text in the report
    rpt.SelectionFont = FancyFont
End Sub