Repagination

[LtCommander]

Hello,
Well, I have an unusual repagination problem. I understand that
background repagination (in Normal View) may be turned off along with
the screen updations.


Sub MakeAllFast()
ActiveWindow.View.Type = wdNormalView
ActiveDocument.Repaginate
Application.ScreenUpdating = False
Application.Options.Pagination = False
End Sub

Sub MakeAllNormal()
Application.ScreenUpdating = True
Application.Options.Pagination = True
ActiveDocument.Repaginate
End Sub

I am working on a huge 200 page document which needs automation and I
simply call 'MakeAllFast' before the Find and Replace loops and
'MakeAllNormal' after the loops.
This works as expected and I do not see the "Word is repaginating ..."
message on my computer which runs Microsoft Word 2003.

However, the problem occurs when I install the template on Word 2000
based machines. Inspite of ensuring that background pagination is
turned off and Normal View is being used, I still keep getting the
"Word is repaginating..." message on these computers. I have no idea
why. What takes 30 seconds on my computer takes around 6-7 minutes on
the other computers that use Word 2000. I thought that background
repagination in normal view should work the same in all versions of
Word.

Can somebody please shed some light on this? I did break the code and
ensure that the options.pagination was false and activewindow.view.type
was 1 (Normal) on the 2000 machines before the main loop got executed.
I still got the "Repagination" message.

Thanks a lot for any help.
Vince

 

[Graham Mayor]

Am I missing something here? You seem to be forcing a repagination in both
macros
ActiveDocument.Repaginate
and are complaining because it does so?

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


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

 

[LtCommander]

Graham,
I am repaginating before turning the repagination off just to ensure
that the page numbers are correct before I enter the loop. I have
already tried removing that line from the MakeAllFast routine but of no
avail. Word 2000 still repaginates and Word 2003 does not.

Vince