Reference the next visible cell

[Otto Moehrbach]

Excel XP & Win XP
I have a variable number of columns after Column B hidden. With the active
cell, B4, how can I reference the next visible cell in row 4?
Thanks for your time. Otto

 

[Ron de Bruin]

You can try this Otto with the cell in B active

Sub test()
Dim rng As Range
Set rng = Range(Cells(ActiveCell.Row, ActiveCell.Column + 1), Cells(ActiveCell.Row, Columns.Count))
rng.SpecialCells(xlCellTypeVisible).Cells(1).Select
End Sub

 

[Otto Moehrbach]

Thanks Ron. I'll give that a try in the morning. Otto

 

[Guest]

Hi, It's ok.
I found the answer
" For Each cell In myRng" each cell return the correct row number.

Thanks a lot
shlomit