How to specify Print Area with a Range

  • Thread starter Thread starter Terry
  • Start date Start date
T

Terry

I would like help with the syntax for specifying the Print Area from a Range
please.

Set rng = appExcel.ActiveCell.Offset(rowOffset:=-2, columnOffset:=0)
Set rngStart02 = Range(rng, rng.Offset((intSummaryLineCount + 9),
(intConsCounted + 5)))
rngStart02.Select ' just to see if the range is correct

'sht1.PageSetup.PrintArea = ?

Regards
 
Found the answer,
Set rng = appExcel.ActiveCell.Offset(rowOffset:=-2, columnOffset:=0)
Set rngStart02 = Range(rng, rng.Offset((intSummaryLineCount + 9),
(intConsCounted + 5)))
rngStart02.Select ' just to see if the range is correct

'sht1.PageSetup.PrintArea = rngStart02.Address
 
Back
Top