Thread: 2000 pages
View Single Post
  #4   Report Post  
Posted to microsoft.public.word.docmanagement
Doug Robbins - Word MVP Doug Robbins - Word MVP is offline
external usenet poster
 
Posts: 8,832
Default 2000 pages

I misread the question. Create one page full of w and then run the
following macro:

Dim i As Long
Dim w As String
With ActiveDocument
w = .Range.Text
For i = 1 To 2000
.Range.InsertAfter w
Next i
End With


--
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

"prat61" wrote in message
...
Is there a way to set word to fill a page 2000 times with the same text.
(i.e) "w"

I am trying to find what the file size would be