Check if there is autofiltered content

[carddard]

After autofiltering, in VBA, how do I check if there are rows?

If there are rows I need to do a certain formula.. If there aren't, I would skip.

Please advise!

Thanks!

 

[Chris Bode]

Check the following example....
Add a command button from control box and paste following codes in code window

Private Sub CommandButton1_Click()
    Dim row As Integer, col As Integer
    row = 1
    col = 1
    'column A contains name
    'column B contains age
    'select records with age=23 if record found apply formula B + 1 in column C
    While Sheet1.Cells(row, col).Value <> ""
        If CInt(Sheet1.Cells(row, col + 1).Value) = 23 Then
            Sheet1.Cells(row, col + 2).Formula = "=B" & row & " + 1"
        End If
        row = row + 1
    Wend
    
End Sub

Hope this helps

 

[Peter_SSs]

After autofiltering, in VBA, how do I check if there are rows?

If there are rows I need to do a certain formula.. If there aren't, I would skip.

Please advise!

Thanks!

Perhaps you could post your existing autofilter code?

... or at least tell us something about what range is being filtered?

Also, can you confirm that ...

how do I check if there are rows

... means "how do I check if there are visible rows after doing the AutoFilter"?