View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Mark Hanley Mark Hanley is offline
external usenet poster
 
Posts: 6
Default Iterate over irregular shaped range problem

I have set up a number of named ranges - each of which is an irregular
shape (as in not rectangular).

I have found that one can iterate through all cells in a rectangular
range with a loop like:

' Set all cells in named range to contain 'hello'
set ws = Sheets("aWorksheet")
For i = 1 To ws.Range("aRegularRange").Count
ws.Range("aRegularRange").Cells(i).Value = "hello"
Next i

BUT...

When I try to do the same with a non-rectangular range, it simply
moves down the first column in the range and keeps going downwards and
out of the range.

Is there a way round this? Is the Values property not supposed to be
used with just one argument? Is there a way of iterating through an
irregular range by specifying a single index value?

N.B - I can't use a 'For Each' as I want to jump through the cells in
regular intervals.

Thanks

Mark