How to set range

[Guest]

I want to loop through the range of cells that have data. I know how to do
this with a "hard-coded" range:
Set r = Range("L2", "L50")
For n = 1 To r.Rows.coutn
<my code here>
Next n

My problem is that I may have more (or less) than 50 rows. How can I set r
equal to rows 2 through the last row with data (I don't want to perform the
code on the first row).

Thank you for your help,
Judy

 

[Bob Phillips]

For n = 1 To Cells(Rows.Count,"A").End(xlUp).Row
<my code here>
Next n

--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Guest]

Change
Set r = Range("L2", "L50")
to
Set r = Range("L2", Range("L65536").End(xlUp))

 

[Guest]

Thank you very much, this works for me.

Change
Set r = Range("L2", "L50")
to
Set r = Range("L2", Range("L65536").End(xlUp))

 

[Bob Phillips]

For r = 2 to Cells(Rows.Count,"L").End(xlUp)>Row

your code>

Next r

--

HTH

RP
(remove nothere from the email address if mailing direct)