Comments on: Limiting a Range for Looping

By: Dick

Dick — Wed, 20 Oct 2004 05:51:00 +0000

Ben: I’m ashamed that I’ve never used that. It’s much better.

Ben — Tue, 19 Oct 2004 13:23:00 +0000

Hi,

thanks for your suggestion, but I prefer this line of code

For Each rCell in Sheet1.UsedRange.Columns(1).Cells

You don't have to estimate the intersection of the UsedRange and the whole column A.

Anyway, have a nice weekend!

Greetz

J.E. McGimpsey — Thu, 07 Oct 2004 22:41:00 +0000

Note that SpecialCells is even more limiting, as it only evaluates UsedRange, so

For Each rCell In Sheet1.Columns(1).SpecialCells( _
xlCellTypeConstants, xlTextValues)

will be even faster if there are blank or numeric cells. It also avoids an intermediate reference resolution.