Имеется много документов Word, в которых шрифт во фрагментах текста выделен красным цветом.
Вопрос такой: можно каким-либо способом автоматически сделать замену: чтобы красный шрифт был заменен на обычный, но только жирный?
Т.е., к примеру: .... город Воронеж ---> город Воронеж ... [Ответ]

Alt-f11, вставляешь в ThisDocument этот текст

Sub zamena()
Dim ch
For Each ch In ThisDocument.Characters
If ch.Font.Color = RGB(255, 0, 0) Then
ch.Font.Color = RGB(0, 0, 0)
ch.Font.Bold = True
End If
Next ch
End Sub

жмакаешь Run

Типа должно сработать [Ответ]