Create a keystroke to return to the document from a footnote or e.

B

Beneficial

When typing a document and adding either footnotes or endnotes, it is
necessary to scroll back to the document when the footnote is typed. I would
like to have a keystroke to return me to the document rather than having to
scroll to get back to where I left off typing.
 
J

Jay Freedman

Beneficial said:
When typing a document and adding either footnotes or endnotes, it is
necessary to scroll back to the document when the footnote is typed.
I would like to have a keystroke to return me to the document rather
than having to scroll to get back to where I left off typing.

Depending on how many distinct actions you've done in the footnote, the
GoBack shortcut Shift+F5 may get you back to the document (it tracks the
last three edits).

Double-clicking the footnote symbol (number, asterisk, whatever) at the
start of the footnote will always take you to the matching symbol in the
text, and vice versa.
 
K

Klaus Linke

Beneficial said:
When typing a document and adding either footnotes or endnotes,
it is necessary to scroll back to the document when the footnote is
typed. I would like to have a keystroke to return me to the document
rather than having to scroll to get back to where I left off typing.


Hi,

You can also use a macro, and have the same macro insert the footnote, and return to the text -- see below.
That way, you can use the same keyboard shortcut for both.

The InsertFootnoteNow command (Alt+Ctrl+F) used to work like this in older versions (before Word2000?).

Greetings,
Klaus


If Selection.StoryType = wdFootnotesStory Then
' return to main text:
With ActiveWindow
Select Case .ActivePane.View.Type
Case wdPrintView, wdReadingView, _
wdWebView, wdPrintPreview
.View.SeekView = wdSeekMainDocument
Case Else
.ActivePane.Close
End Select
End With
If Selection.Characters.Last.Style = _
ActiveDocument.Styles(wdStyleFootnoteReference) Then
Selection.Move Unit:=wdCharacter, Count:=1
End If
Else
' insert footnote:
Selection.Footnotes.Add Range:=Selection.Range
End If
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top