Tanto quanto eu sei, você pode usar o Word para procurar uma seqüência de caracteres em itálico e substituí-lo por um não-itálico, mas você não pode substituí-lo com uma seqüência de caracteres parcialmente em itálico. Portanto, a solução alternativa de dois passos a seguir pode ser a única coisa que você pode fazer usando o VBA:
-
Pesquise "Ver, por exemplo," (Fonte: Itálico) e substitua tudo por "Ver, por exemplo, ~~" (Fonte: Itálico)
-
Pesquise por "~~" (Fonte: Itálico) e substitua todos por "," (Fonte: Não Itálico)
Nota: É claro que você pode usar qualquer string única no lugar de "~~".