View Single Post
  #2   Report Post  
Posted to microsoft.public.word.docmanagement
Graham Mayor Graham Mayor is offline
external usenet poster
 
Posts: 19,312
Default Insert page number in one click

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!