Characters Method Example

This example formats as bold the third character in the first shape’s text frame on the active worksheet.

With ActiveSheet.Shapes(1).TextFrame
    .Characters.Text = "abcdefg"
    .Characters(3, 1).Font.Bold = True
End With