VBA to Scale to Paper Size?

[Sandi V]

I tried to record a macro to run the File, Print, Scale to Legal paper size,
but the resulting VBA shows nothing:

Sub PrintLegal()
'
' PrintLetter Macro
' Macro recorded 7/10/2009 by sandiv
'
End Sub

Does anybody know the VBA code to do this?
Thanks in advance!

Sandi

 

[Stefan Blom]

The following code should do the trick:

ActiveDocument.PrintOut _
printzoompaperwidth:=8.5 * 1440, _
printzoompaperheight:=14 * 1440