Sorry, but the name of the document will give you an idea of what I think
about what you want to do:
Dim DaftDoc As Document, i As Long
Set DaftDoc = Documents.Add
With DaftDoc
For i = 1 To 50
.Range.Collapse wdCollapseEnd
Selection.InsertBreak Type:=wdPageBreak
Next i
Selection.EndKey Unit:=wdStory
End With

Signature
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
> Hi there
>
[quoted text clipped - 6 lines]
>
> brett
brett - 05 Sep 2005 22:51 GMT
>Dim DaftDoc As Document, i As Long
>Set DaftDoc = Documents.Add
[quoted text clipped - 5 lines]
> Selection.EndKey Unit:=wdStory
>End With
Thank you very much
I give that a try tommorrow, thanks for the note on the document title
:)
It is a what I have been asked to create (I am a university student on
a placment), who am I to tell my boss what he wants is, as Doug
Robbins called it, "Daft".
Thank again
Brett