Word 2007 VBA - Haciendo texto BOLD & other ITALIC

Tengo el siguiente código que selecciona los datos de una celda de Excel y reemplaza una parte específica del texto en mi documento de Word (para los fines de esta pregunta, la celda de Excel ha sido reemplazada por una cadena de texto sin formato).

El dato ": va a" es constante, luego el dato "aaa bbb" puede ser cualquier cosa hasta que alcancemos el "de" que también es constante. Luego, los datos después del "de", "ccc ddd eee" pueden ser cualquier cosa hasta que toque "-", que también es constante.

¿Es posible hacer los datos "aaa bbb"?NEGRITA & MAYÚSCULO, mientras hace que los datos de "ccc ddd eee"CURSIVA ?

": va aAAA BBB deccc ddd eee - "

Selection.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
    .Text = "MOTMDIV1"
    .Replacement.Text = ": goes to aaa bbb of ccc ddd eee - "
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = True
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With

Selection.Find.Execute Replace:=wdReplaceAll

Respuestas a la pregunta(1)

Su respuesta a la pregunta