Hide footnote pane in Draft View

New Daddy
4StarLounger
Posts: 437
Joined: 05 Nov 2012, 20:02

Hide footnote pane in Draft View

Post by New Daddy »

I spend most of my writing time in the Draft View, as it provides the largest amount of real estate + the styles area. But I think the biggest downside to the Draft View is when you have to work on footnotes. Does anyone know of a quick method (or macro) to hide the footnote pane and go back to where you were before opening the footnote pane? (I think a macro that will close the footnote pane and put the active cursor back to where it was right before opening the footnote pane would be tremendously valuable.)

User avatar
HansV
Administrator
Posts: 78241
Joined: 16 Jan 2010, 00:14
Status: Microsoft MVP
Location: Wageningen, The Netherlands

Re: Hide footnote pane in Draft View

Post by HansV »

The footnote pane has a close button...

For a macro, try this:

Code: Select all

Sub CloseFootnotePane()
    If Selection.StoryType = wdFootnotesStory And _
            ActiveWindow.View = wdNormalView Then
        ActiveWindow.ActivePane.Close
    End If
End Sub
Best wishes,
Hans

New Daddy
4StarLounger
Posts: 437
Joined: 05 Nov 2012, 20:02

Re: Hide footnote pane in Draft View

Post by New Daddy »

HansV wrote:The footnote pane has a close button...

For a macro, try this:

Code: Select all

Sub CloseFootnotePane()
    If Selection.StoryType = wdFootnotesStory And _
            ActiveWindow.View = wdNormalView Then
        ActiveWindow.ActivePane.Close
    End If
End Sub
super! Yes, it has a close button, but I'd like to keep my fingers on the keyboard as much as I can without having to touch the mouse.