Есть ли способ использовать Word Interop или VBA для получения исходного текста абзаца (или любого диапазона), содержащего изменения?

#vba #interop #ms-word #revision

#vba #взаимодействие #ms-word #пересмотр

Вопрос:

Похоже, что доступ к диапазонам изменений дает мне только обновленный текст. Я хотел бы видеть текст таким, каким он был изначально, чтобы я мог создать отчет, в котором говорится что-то вроде «Изменить на» .

Ответ №1:

Я полагаю, что как только вы получите объект range, вы сможете получить доступ к изменениям, внесенным в этот диапазон, через Range.Изменения.

затем вам нужно будет перечислить изменения и посмотреть на ТИП изменения, чтобы определить, какого рода это было изменение.

Если вам нужна исходная версия, возможно, вам придется открыть вторую копию документа, выбрать свой диапазон, затем ОТКЛОНИТЬ все изменения в этом диапазоне, прочитать значение диапазона и удалить эту копию документа.

Комментарии:

1. Проблема заключается в доступе к ИСХОДНОМУ тексту!

Ответ №2:

Отклонение изменения изменит

Range.text

к исходному тексту.

Затем вы можете отменить изменения, чтобы вернуть ему исправленный текст.