Range.Italic (Word)
True si la fuente o el intervalo tiene formato de cursiva.
Esta propiedad devuelve true, false o WdUndefined (una combinación de true y false) y se puede establecer en true, falseo wdToggle.
ActiveDocument.Words(1).Italic = True