Print area

T

Tom

Hi,

I have a macro that every time copy the data from one
sheet to a new file. But whenever i wanted to print, I gt
some parts of the data not printed out for the new file.
How do i code in VBA to print all?

Many Thanks.

regards,
Tom
 
N

N10

Range("A1").Select
ActiveSheet.PageSetup.PrintArea = ""
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$I$14"
'>>>>>>>>>>>>>>your code<<<<<<<<<<<<<<<<

ActiveSheet.PageSetup.PrintArea = ""
N10
 
Top