Para pesquisar e corrigir vírgulas não seguidas por um espaço. Marque "Usar curingas" e use o seguinte:
Find what: (,)([! ])
Replace with:
(Nota: Existe um espaço depois de '!' em Localizar o que)
Se o seu texto contiver idiomas / scripts CTL (como o Hindi / Devanagari) acima não funcionar (não sei por quê?), use isso (também funcionará com os idiomas do script latino):
Find what: (,)([! ]?)
Replace with:
Se o texto contiver poesia, a vírgula poderá aparecer no final das linhas (na sub-rotina), não deverá ser seguida por espaço, portanto, deve-se adicionar uma condição para evitar vírgulas no final das linhas:
Find what: (,)([! ^l]?)
Replace with:
Se as vírgulas aparecendo no final dos parágrafos também devem ser evitadas, então adicione ^ 13 (marca de parágrafo) com ^ l, no entanto, há baixa possibilidade para isso, só é possível quando o digitador deu quebras de parágrafo (em vez de linha breaks) no final de cada linha.
Mais um caso, se o seu texto contiver números que contenham vírgula (para indicar centenas, o separador de mil) use isso para evitar vírgulas indesejadas:
Find what: ([!0-9],)([! ^l][!0-9])
Replace with: