(2010) доступ к флагом для «показать разметку»?

Question

Я пытался создать комбинацию клавиш для команды «display for review» на вкладке «Обзор»> «Отслеживание». В конечном счете, я хотел бы переключиться между представлениями «final» и «final: show markup» без использования альт-последовательности или макроса.

Я нашел команды DisplayFinalDoc и DisplayOriginalDoc, но ни одна из команд не управляет флагом «показать разметку» (или, тем не менее, это обрабатывается в Word). Команда DisplayForReview, похоже, ничего не влияет.

Есть ли способ прямого доступа и изменения флага «показать разметку» в Word 2010?

Sub ShowMarkupToggle() 
' 
' ShowMarkupToggle Macro 
    With ActiveWindow.View 
     If .ShowRevisionsAndComments = True Then 
      .ShowRevisionsAndComments = False 
      .RevisionsView = wdRevisionsViewFinal 
     Else 
      .ShowRevisionsAndComments = True 
      .RevisionsView = wdRevisionsViewFinal 
     End If 
    End With 
End Sub 

код работает, но я интересно, если есть способ получить доступ к .ShowRevisionsAndCommens собственности без необходимости сохранить документ макро-включен, так как это щурит моей работы (я ! писатель по профессии, не программист)

Answer 1

Вы говорите:

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

Вы не можете использовать макрос. Но ваш рабочий документ (где вы пишете) не должен быть документом docm. Вот как:

1. Сохранить макрос ShowMarkupToggle в DOCM документе под названием " My_Macros.docm".
2. Назначить ярлык вашему макросу в документе «My_Macros.docm».
3. Переместить «My_Macros.docm» в следующую папку: C:\Users\yru\AppData\Roaming\Microsoft\Word\STARTUP.

Теперь, когда вы открываете любой документ Word (docx), ваш макрос ShowMarkupToggle и соответствующий ярлык будут доступны для использования.

Кстати, у меня есть один и тот же макрос, назначенный ярлык ALT + T, и вот как я переключая:

' Toggle Track Changes FinalShowingMarkup and Final states. 
' Shortcut: ALT+T 

Sub Alt_T_TC_Toggle() 
    With ActiveWindow.View 
     .ShowRevisionsAndComments = Not .ShowRevisionsAndComments 
     .RevisionsView = wdRevisionsViewFinal 
    End With 
End Sub 

A Примечание: Если вам необходимо изменить макрос для какой-либо причины, вам нужно для перемещения документа из указанной выше папки из соображений безопасности. Когда вы закончите с изменениями, переместить его обратно.

(Это один макрос, который был огромный экономии времени для меня, хорошо стоит время, которое я провел крафта его.)