May not be the best code, but this works for me.
With xDoc
With ActiveDocument.Range
.Characters.Last.InsertBreak Type:=wdPageBreak
.InsertAfter Chr(10)
End With
End With

-----Original Message-----
I am printing comments from worksheets to Word and want
to
insert a page break in word to seperate comments on
different sheets.

The code Selection.InsertBreak type:=wdPageBreak does
not
work. It works when used in word without the connection
to
Excel.

Any idea?

Thanks for your help.
.