F Frank Kabel Mar 2, 2004 #2 Hi Bob not quite sure what you want to achieve but may be the following will suit: sub foo() Dim rng as range Dim cell as range set rng = range("A1:A100") for each cell in rng 'do something with the cell range object next end sub
Hi Bob not quite sure what you want to achieve but may be the following will suit: sub foo() Dim rng as range Dim cell as range set rng = range("A1:A100") for each cell in rng 'do something with the cell range object next end sub
