View Single Post
  #21   Report Post  
Posted to microsoft.public.word.newusers
Barnet Barnet is offline
external usenet poster
 
Posts: 26
Default Newbie macro help please

Doug wrote:

Use:

Dim prange As Range
With ActiveDocument
Set prange = .Sections(1).Footers(wdHeaderFooterPrimary).Range
..Fields.Add Range:=prange, Type:=wdFieldEmpty, Text:="page"
prange.ParagraphFormat.Alignment = wdAlignParagraphCenter
End With

If you want the page number on the right, replace wdAlignParagraphCenter
with wdAlignParagraphRight, similarly for left.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

Thanks so much Doug, I appreciate your efforts. Being completely unfamiliar
with Visual Basic, I need some more assistance in knowing what to do with
this code.

I can find the box to edit Macros. However, simply pasting in the code
doesn't seem to make anything happen when I then try to run the Macro

Would you be kind enough to tell me what to do with your code so that I can
make the macro work?

I assume that this post is to the newsgroup, so I hope it's OK that I ask
you here.

Thanks,

Barnet