[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
Word MVP web site http://word.mvps.org




mbefl2 wrote:
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!

[Stefan Blom[_3_]]

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

--
Stefan Blom
Microsoft Word MVP



"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org




mbefl2 wrote:
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]

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
Word MVP web site http://word.mvps.org



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


"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org




mbefl2 wrote:
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!

[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

"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org



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


"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org




mbefl2 wrote:
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!

[Stefan Blom[_3_]]

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

--
Stefan Blom
Microsoft Word MVP



"Suzanne S. Barnhill" wrote in message
...
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

"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org



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


"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org




mbefl2 wrote:
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!

[Suzanne S. Barnhill]

Of course.

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

"Stefan Blom" wrote in message
...
And even if it didn't work, assigning a different shortcut to the
InsertPageField command would be a simple task, of course. :-)

--
Stefan Blom
Microsoft Word MVP



"Suzanne S. Barnhill" wrote in message
...
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

"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org



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


"Graham Mayor" wrote in message
...
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
Word MVP web site http://word.mvps.org




mbefl2 wrote:
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!