Eu tenho o seguinte código que seleciona dados de uma célula do Excel e substitui uma parte específica do texto no meu documento do Word (para fins desta questão, a célula do Excel foi substituída por uma seqüência de texto sem formatação).

Os dados ": vai para" são constantes, então os dados "aaa bbb" podem ser qualquer coisa até chegarmos ao "de" que também é constante. Em seguida, os dados após o "de", "ccc ddd eee" podem ser qualquer coisa até atingir o "-", que também é constante.

É possível fazer os dados "aaa bbb"NEGRITO & UPPER CASE, enquanto cria os dados "ccc ddd eee" emITALICS ?

": vai paraAAA BBB doccc 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