View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Piotr Lipski Piotr Lipski is offline
external usenet poster
 
Posts: 36
Default If - Then synthax

On Thu, 22 Jun 2006 12:20:26 -0500, Turquoise_dax wrote:

Dim cell As Range
For *Each cell In Range("B:B")*(...)
Next


I need to modify this call so the cycle goes from B10 to the last row
containing info.


dim rng as excel.range
set rng=range("b10")
do while rng.value<""
' put your code here...
' use rng.<some property to access the current cell
set rng=rng.offset(1,0)
loop

--
PL