Insert page number in one click

[mbefl2]

OK, I admit it: I'm lazy. I'm finding it very annoying in Word 2007 that I
have to click three different times to insert a page number at the current
location in my header (Page number, Current position, Plain number). Is there
any way I can create a shortcut or macro to just skip right to Plain Number
and have the page number inserted right there? Thanks!

 

[Graham Mayor]

Add the following macro to a QAT button or keyboard shortcut to insert the
page number at the cursor

Sub InsPageNo()
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldPage, _
PreserveFormatting:=False
ActiveWindow.View.ShowFieldCodes = False
End Sub

http://www.gmayor.com/installing_macro.htm

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Stefan Blom]

It's even quicker to use the built-in shortcut: Alt+Shift+P (assigned to the
InsertPageField command).

 

[Graham Mayor]

Hmmm. That brings up Media Player for me? But if it works - it is certainly
simpler than a macro

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[Suzanne S. Barnhill]

Works here. There's *something* that starts Media Player, though, because
I've done it inadvertently.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org

 

[Stefan Blom]

And even if it didn't work, assigning a different shortcut to the
InsertPageField command would be a simple task, of course.

 

[Suzanne S. Barnhill]

Of course.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org