What am I missing to get this to work?

		Microsoft Office Forums > Microsoft Word > Word VBA
What am I missing to get this to work?

FAQ

Thread Tools

Display Modes

05-04-2012, 01:26 AM

macropod

Windows 7 64bit What am I missing to get this to work?

Office 2010 32bit

Administrator

Join Date: Dec 2010

Location: Canberra, Australia

Posts: 22,467

You shouldn't need to 'seek' either the header or document views. You may also need to specify which header to update. Try:

Code:

While ActualCopies <= mCopies
  If ActualCopies = 1 Then
    With ActiveDocument.Sections.First.Headers(wdHeaderFooterPrimary).Range
      .Text = "Customer Copy"
      .Paragraphs.First.Alignment = wdAlignParagraphCenter
    End With
  etc.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

« Previous Thread | Next Thread »

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Missing some work from work really need help	lukepierce222	Word	6	04-19-2012 08:41 AM
work vs regular work. and how regular work works	user0044	Project	5	03-06-2012 07:28 AM
Emails have gone MISSING!	skapoor	Outlook	1	01-06-2012 08:51 PM
Missing files	JIM1	PowerPoint	0	12-04-2011 03:01 PM
Package for CD missing??	judderbones	PowerPoint	1	03-24-2011 08:56 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 12:22 AM.