Hi again, hope everyone is well.....how can add a few more columns to the range below?
Sub CommandButton2_Click()
With Range("BX9:BX1009")
.AutoFilter Field:=1, Criteria1:="=0.00"
.SpecialCells(xlCellTypeVisible).EntireRow.Delete
End With
End Sub</pre>
Sub CommandButton2_Click()
With Range("BX9:BX1009")
.AutoFilter Field:=1, Criteria1:="=0.00"
.SpecialCells(xlCellTypeVisible).EntireRow.Delete
End With
End Sub</pre>