Подскажите, пожалуйста, как сделать, чтобы в тексте после выражений типа ", инв. №АФ22-125/2021" ставилась запятая?
Буквы и цифры разные, но их количество и расположение одно и то же.
Запятая в начале и "инв." везде одни и те же, они нужны, чтобы выбирались выражения только с ними.
Написал вам два письма на почту с заголовком "Письмо с Форума по VBA, Excel и Word". Написал именно на почту, а не на форум.
Sub Макрос()
With ActiveDocument.Range.Find
.Text = ", инв. №^?^?^?^?^?^?^?^?^?^?^?^?^?^?"
.Replacement.Text = "^&,"
.MatchSuffix = True
.Execute Replace:=wdReplaceAll
End With
End Sub
Ок, гляну. Спасибо!