Тема: Замена текста, помеченного как удаленный, на зачеркнутый
Помагите кто-нибудь,пожалуста, со следующей задачей:
- в документе в режиме исправлений есть текст, который стандарными средствакми Word помечен как вставленный (подчеркиванием) и текст, который помечен как удаленный (зачеркнутый)
- нужно текст, помеченный вставленным, заменить на текст с принятой вставкой, но отформатированный жирным и подчеркиванием
- текст, помеченный как удаленный, нужно оставить, но отформатировать зачеркиванием.
Простенький макрос по удаленному тексту почему-то не работает:
Sub формат_удаленного()
WordBasic.RejectChangesSelected
Selection.Font.StrikeThrough = wdToggle
Selection.MoveRight Unit:=wdCharacter, Count:=1
End Sub
Этот макрос сразу после написания работает в документе (заменяет выеделенный текст, помеченный как удаленный, на тот же текст, но зачеркнутый). После перезагрузки Word перестает работать.
Что с ним не так?
В идеале нужно было бы, чтобы не только выделнный, а весь текст, который был помечен как удаленный, по всему документу был сохранен, но отформатирован зачеркнутым. Но на это у меня мозгов вообще не хватило.