Need help with autofilter code to show me everything that is not my variable:
Rich (BB code):
Dim cellVal As String
Dim cSheet As Worksheet
Set cSheet = ActiveWorkbook.ActiveSheet
cellVal = cSheet.Range("A5").Value
With ActiveSheet.UsedRange
.AutoFilter Field:=1, Criteria1:="<> & cellVal &"
.Offset(1).SpecialCells(xlVisible).EntireRow.Delete
.AutoFilter
End With