Does any one know how to achive the same thing as below
With ActiveSheet.PageSetup
.PrintArea = "$A$1:$b$80"
.FitToPagesWide = 1
.FitToPagesTall = 1
.PrintTitleRows = "$1:$1"
End With
by using faster ExecuteExcel4Macro or Application.Dialog(xlDialogPageSetup) ?
im am using excel 2003.
many thanks
With ActiveSheet.PageSetup
.PrintArea = "$A$1:$b$80"
.FitToPagesWide = 1
.FitToPagesTall = 1
.PrintTitleRows = "$1:$1"
End With
by using faster ExecuteExcel4Macro or Application.Dialog(xlDialogPageSetup) ?
im am using excel 2003.
many thanks