I have a spreadsheet with three columns of data. The data in column A has various account numbers. I need to delete all the account numbers ending in an X.
I have set up the following VBA code, but cannot get it to work. Is there anyone who can assist
Sub ClearX()
With Columns("A:C")
.AutoFilter Field1:=1, Criteria:="=X*"
End With
Range("A1:C65536").ClearContents
ActiveSheet.AutoFilterMode = False
Application.ScreenUpdating = True
End Sub
Your assistance will be most appreciated
Howard
I have set up the following VBA code, but cannot get it to work. Is there anyone who can assist
Sub ClearX()
With Columns("A:C")
.AutoFilter Field1:=1, Criteria:="=X*"
End With
Range("A1:C65536").ClearContents
ActiveSheet.AutoFilterMode = False
Application.ScreenUpdating = True
End Sub
Your assistance will be most appreciated
Howard