Email Print orientation

[ukdane]

Hi,
I have some code which generates an email from Excel, and includes a table in the body of the email. (based on an htm file) Thanks to some code I found elsewhere on this site.

HOWEVER I have a problem, the table is longer that an email print in portrait.
HOW can I set the email to default print in LANDSCAPE using VBA code?


With EmailItem
.bodyformat = 2 'olFormatHTML
.HTMLBody = RangetoHTML(rng) & signature
'.Orientation = xlLandscape this doesn't work.
.Attachments.Add TempFile
.Display
End With


Thanks in advance.

Edit: It also needs to fit to width (not height)