extend selection
 

I have contiguous data starting in c5. The last row and
the number of columns is not known.

I can select the data cells with the following code:
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select

However, how do I extend this selection by one row.

Say that I have selected range C5:J14. How would I be able
to select C5:J15? I would like to extend the selection
without hardcoding it by one row so that I can get the row
totals.

Thanks for your help.

extend selection
 

Indu,

Add this line to your code

Selection.Resize(Selection.Rows.Count + 1,
Selection.Columns.Count).Select

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"indu aronson" wrote in message
...
I have contiguous data starting in c5. The last row and
the number of columns is not known.

I can select the data cells with the following code:
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select

However, how do I extend this selection by one row.

Say that I have selected range C5:J14. How would I be able
to select C5:J15? I would like to extend the selection
without hardcoding it by one row so that I can get the row
totals.

Thanks for your help.