How to specify Print Area with a Range

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
 
T

Terry

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

How to calculate a Range from Row and Column count 4
VBA adding Conditional Format to Range referencing another column value 3
Dynamic Print Area 5
Copying Filtered Data from multiple worksheets 3
Print Area Range Selection 2
1st attempt vba-how do i whatnext in this sub 1
Sheet selection help 6
How to copy and paste a partial row (i.e. not the EntireRow) 5

Top