Assigning shortcut to Original mode in Tracking group

		Microsoft Office Forums > Microsoft Word > Word
Assigning shortcut to Original mode in Tracking group

FAQ

Thread Tools

Display Modes

05-26-2019, 07:12 AM

gmayor

Windows 10 Assigning shortcut to Original mode in Tracking group

Office 2016

Expert

Join Date: Aug 2014

Posts: 4,144

OK, I see what you mean - maybe the following will work for you https://www.gmayor.com/installing_macro.htm

Code:

Sub ToggleRevisions()
    With ActiveWindow.View.RevisionsFilter
        If .Markup = 0 Then
            .Markup = wdRevisionsMarkupAll
            .View = wdRevisionsViewFinal
        Else
            .Markup = wdRevisionsMarkupNone
            .View = wdRevisionsViewOriginal
        End If
    End With
End Sub

__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Why are Portrait mode JPG Images changed to landscape mode	KHH0725	PowerPoint	0	02-22-2017 01:51 PM
How to send "clean" copy after tracking/ redlining changes in review mode	lindapaul	Word	2	06-09-2016 02:34 PM
Microsoft Office Word Online Text Space is Different in Reading Mode from When it's in Editing Mode	darkjanggo	Word	1	12-15-2015 05:06 PM
Assigning a single task to a team or group	djcozens	Project	1	07-09-2012 05:44 AM
Word won't come back to normal mode from proofreading mode	prg4hire	Word	2	09-25-2010 09:46 AM