View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
mo_in_france[_2_] mo_in_france[_2_] is offline
external usenet poster
 
Posts: 3
Default Macro to delete rows if they don't begin with "0"

On 25 Feb, 13:33, <Andy wrote:
Hi - and thanks for reading this.
I have a macro where I am trying to delete rows that don't begin with "0".
These are text cells (hence the apostrophes). The sample below deletes the
rows if they DO begin with "0" and I can't find out how to make it delete if
they DON'T being with "0". I've searched the group for ages - without
success. I've tried Not Like - but that doesn't work.
Thanks for your help (it's probably easy for you!)

Application.ScreenUpdating = False
* For i = 90 To 3 Step -1
* * If Cells(i, 1).Value Like "0*" Then Rows(i).Delete
* Next
Application.ScreenUpdating = True


Do you really need a macro?

If you don't, then....

1) filter on the data such that the rows you don't want are visible
2) Select the visible rows
3) Delete the rows


Regards