PDA

View Full Version : one sheet print



lior03
01-28-2007, 01:45 AM
hello
suppose i have a report of 50 rows and 5 columns.is there a way in vba to print the report on one page only , instead of 4 it offerd me?
THANKS

westconn1
01-28-2007, 02:40 AM
try something like this
Dim mystr As PageSetup
Dim s As Worksheet
Set s = Sheets("mysheet")
s.PageSetup.FitToPagesTall = 1
s.PageSetup.FitToPagesWide = 1
s.PrintOut

mdmackillop
01-28-2007, 03:12 AM
If you can change the layout try
http://vbaexpress.com/kb/getarticle.php?kb_id=819