Grow Method Example

This example increases the font size of the fourth word in a new document.

Set myRange = Documents.Add.Content
myRange.InsertAfter "This is a test of the Grow method."
MsgBox "Click OK to increase the font size of the fourth word."
myRange.Words(4).Font.Grow

This example increases the font size of the selected text.

If Selection.Type = wdSelectionNormal Then 
    Selection.Font.Grow
Else
    MsgBox "You need to select some text."
End If