How to get of all number rows in the autofilter range
 

Hello.
In the sheet i have autofilter And after appled autofilter I need get of all
number rows in .AutoFilter.Range.SpecialCells(xlCellTypeVisible)

Thank you for you time

How to get of all number rows in the autofilter range
 

Valery,

Not quite sure what you are looking for.... try, maybe, this:

Sub Macro1()
Dim myA As Range
Dim myC As Range
Dim myR As Range

Set myR = Intersect(Columns("B:B"), Range("B2").CurrentRegion) _
.SpecialCells(xlCellTypeVisible)
For Each myA In myR.Areas
For Each myC In myA.Cells
MsgBox "Cells in row " & myC.Row & " are visible."
Next myC
Next myA
End Sub

HTH,
Bernie
MS Excel MVP


"Valery" wrote in message
...
Hello.
In the sheet i have autofilter And after appled autofilter I need get of all
number rows in .AutoFilter.Range.SpecialCells(xlCellTypeVisible)

Thank you for you time