I tried doing that but it messed up all my fonts and margins and header.

This is what I got now: ActiveSheet.PageSetup.PrintArea = "$A$1:$T$" &
Cells.SpecialCells(xlCellTypeLastCell).Row

but this is telling me my last row is 345 but i only have data up to 142.
Its reading blank fields or something.

"Bob Umlas" wrote:

If the print area is left undefined, it will print everything on the sheet.

"Jase" wrote in message
...
I am trying to figure out a way to manually adjust my print area on a
dynamic
data sheet. I was hoping to implement some code that says find the last
row
for the print area.

Any help?

thanks,

jase