Fantastic!!! I knew it would probably be something small that I left out.
Thanks for the help.

Gary Brown wrote:
Try putting...
.Zoom = False
just before your .Fit statements
When the below code runs it should set the sheet to print to 1 page wide 1000
long and landscape. It is changing to Landscape and may be 1000 tall but the
[quoted text clipped - 10 lines]
also tried putting it in it's own sub and just calling it last, middle, and
first. Please help.

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200807/1