FontItalic Property Example
This example sets the font to italic for the shape named "WordArt 4" on myDocument.
myDocument
Set myDocument = ActivePresentation.Slides(1) myDocument.Shapes("WordArt 4").TextEffect.FontItalic = True