Bruno,
I just tried your code and it's did not work in my tests about merge and about find & replace.
If you want I can the code of find & replace
>You should try to preview the job before printing.
>The problem look similar to one that we could solve only by issuing:
>
>
>#INCLUDE COSTWORD.H
>LOCAL ln
>
>WITH oword
> FOR ln = 1 TO 2
> .ActiveDocument.PrintPreview
> .ActiveDocument.ClosePrintPreview
> .Selection.HomeKey(wdStory)
> ENDFOR
>ENDWITH
>
>
>
>HTH