Inspect a range cell by cell

[Alejandraoskan]

Hi,

I have the following issue, I need to loop throught a range and get 2 things done:

1)the value of the cell
2)select the cell (so I know where I am at all times)

this is my first idea

for cell in range("a1:a50")
cell.select
msgbox cell.value
next

but it doesn'work the selection never moves

this maybe an issue with msgbox and modal behavior but can't not find a solution

appreciate any help

 

[Smitty]

You're missing the Each:

Dim c as Range
For Each c in Range...

It's also not a good ideal to use Cell as a variable, nor is it necessary to select objects in order to work with them. You could just as easily use:

MsgBox "Cell " & c.Address & "Value =" & c.Value

HTH,

 

[Alejandraoskan]

yes that works well,

but sometimes is usefull to be able to select the cell to follow/trace a loop so I guess there is no easy way around , the msgbox blocking the UI refresh that will enable us to see how each cell gets selected

Thanks,

 

[Smitty]

Why do you need to see things being selected?