Maybe....

Option Explicit
Sub testme01()
Open "LPT1:" For Output As #1
Print #1, "yourstringhere"
Close #1
End Sub

But why not just page to landscape using file|page setup. If you need a macro,
you can record a macro when you do it manually.



mikeburg wrote:

Is there a way to send a printer escape command to a printer via VBA?

For example, in Lotus 123 we could put ||\027&l1O in the 1st cell of a
spreadsheet which would set the printer to landscape mode.

Thanks for everyones help! mikeburg

--
mikeburg
------------------------------------------------------------------------
mikeburg's Profile: http://www.excelforum.com/member.php...o&userid=24581
View this thread: http://www.excelforum.com/showthread...hreadid=473633

--

Dave Peterson