(VFP) Fit to Page in Excel and Word

Excel
WITH oSheet.PageSetup
* Fit to Page
.Zoom = .F.
.FitToPagesWide = 1
.FitToPagesTall = 1
ENDWITH

*------------------------------------

* Word
oWord.ActiveDocument.FitToPages()