Как узнать, пересмотрен ли выбор Word в VBA

Я пишу процедуру VBA в Word 2010, которая ищет в документе поисковый запрос. Если он найден, я хочу запустить какой-то другой код, но только если ни одна часть результирующего текста не будет пересмотрена. Поэтому я не могу просто пройтись по редакциям документа, потому что мне нужно найти текст, который не пересматривается. Я хотел бы либо исключить пересмотренный текст из поиска (но я не смог найти параметр в Selection.Find, который сделал это), либо проверить, был ли выбранный текст изменен после выполнения поиска (но я не смог найти вариант под Selection.Range.Revisions, которые сделали это либо).

1 ответ

Решение

Кажется, на основании только что сделанного мною теста, ответ довольно прост. Вам нужно найти подходящий диапазон текста и проверить .Revisions property следующим образом (здесь, для Selection):

If Selection.Range.Revisions.Count > 0 Then
     'selected range is inside revision
Else 
     'selected range is not revised
End if
Другие вопросы по тегам