FontItalic Property Example

This example sets the font to italic for the shape named "WordArt 4" in myDocument.

Set myDocument = ActiveDocument
myDocument.Shapes("WordArt 4").TextEffect.FontItalic = True