Здравствуйте!
Подскажите пожалуйста, как в выбранном фрагменте первые слова абзацев, содержащих в конце точку, поместить в квадратные скобки.
Макрос работает так. Поставьте курсор после первого слова (выделять не надо никакой фрагмент) и запустите макрос.
Макрос поставит скобку в начале абзаца и в том месте, где находится курсор.
Sub Макрос1()
Selection.Paragraphs(1).Range.InsertBefore Text:="["
Selection.InsertAfter Text:="]"
End Sub