How to delete cells with a given data?
in [General]
|
Prev: Saving an Excel Spreadsheet outside of Excel Recent Documents
Next: Changing Arbic numeral to Hindi numeral
From: Teka on 2 Apr 2010 04:03 I'm trying to delete series of cells with a given word inside, but there are too many to FIND one by one and delete them.
From: Gary''s Student on 2 Apr 2010 05:43 This little macro will clear any cell that contains "sadness": Sub MakeHappy() Dim rr As Range, r As Range Dim s As String, rClear As Range Set rr = ActiveSheet.UsedRange s = "sadness" For Each r In rr If InStr(r.Value, s) > 0 Then If rClear Is Nothing Then Set rClear = r Else Set rClear = Union(rClear, r) End If End If Next If rClear Is Nothing Then Else rClear.Clear End If End Sub hopefuly it will make you "happy"! -- Gary''s Student - gsnu201001 "Teka" wrote: > I'm trying to delete series of cells with a given word inside, but there are > too many to FIND one by one and delete them.
From: ozgrid.com on 2 Apr 2010 05:52 Use Edit Replace and replace with nothing. E.g "Cat" part cell match. -- Regards Dave Hawley www.ozgrid.com "Teka" <Teka(a)discussions.microsoft.com> wrote in message news:C351DEBA-9CD6-4887-BBC4-52FB5D5FA077(a)microsoft.com... > I'm trying to delete series of cells with a given word inside, but there > are > too many to FIND one by one and delete them.
From: Dave Peterson on 2 Apr 2010 08:41 What does delete mean? 1. Delete the contents of the cell? 2. Delete the cell (and move up or move left)? 3. Delete the entirerow? If it's #1, you can: Select the range Edit|replace What: *yourwordhere* (the asterisks are wild card. You want to include them.) with: (leave blank) replace all Teka wrote: > > I'm trying to delete series of cells with a given word inside, but there are > too many to FIND one by one and delete them. -- Dave Peterson
From: Gord Dibben on 2 Apr 2010 10:00
Edit>Find>Find All With the "found" dialog box open hit CTRL + a to select all "founds" Edit>Delete or Edit>Clear Contents or your choice. Gord Dibben MS Excel MVP On Fri, 2 Apr 2010 01:03:01 -0700, Teka <Teka(a)discussions.microsoft.com> wrote: >I'm trying to delete series of cells with a given word inside, but there are >too many to FIND one by one and delete them. |