Форум по VBA и MS Office

Word => Макросы в Word => Тема начата: Посетитель от 26 октября 2021, 14:48

Название: Word VBA Макросы. Как пройтись по предложениям?
Отправлено: Посетитель от 26 октября 2021, 14:48
Как с помощью макроса пройтись по предложениям?
Название: Word VBA Макросы. Как пройтись по предложениям?
Отправлено: Администратор от 26 октября 2021, 14:52
Нужно помнить, что предложение не имеет чётких границ. Я даже не знаю, как Ворд определяет границы предложения. К тому же внутри предложения могут быть точки. Например, для Ворда это три предложения:
Адрес: г. Москва, ул. Космонавтов.
Первое предложение: Адрес: г.
Второе предложение: Москва, ул.
Третье предложения: Космонавтов.

Вообще, для работы с предложениями есть объект "Sentences".

Пройтись по всем предложениям, которые находятся в основной части документа (есть ещё колонтитулы и другие места), можно так:

Sub Macro()

    Dim Sentence As Range
   
    For Each Sentence In ActiveDocument.Sentences
        ' Запись предложения в View - Immediate Window.
        Debug.Print Sentence.Text
    Next Sentence

End Sub
Название: Word VBA Макросы. Как пройтись по предложениям?
Отправлено: Посетитель от 26 октября 2021, 15:18
Благодарю за ответ.