Find, select & delete all cells with specific value.

[Liam_1988]

Hi everyone,

I've search through the available articles and can't find exactly what I'm looking for. I've also tried to record a macro and edit the output but nothing is working.

I'm trying to write a macro that has multiple functions.

The issue I'm facing is that my data set is basically an event log, so the amount of rows can fluctuate from set to set, but it;s always only in column A.

I want the Macro to do the following:
(1) Find, select and delete 7 different sets of cell with specific text. The first 6 only have 1 instance within the data set the 6th can have multiple instances.
(2) Find the term "Assigned" and move the cell over 1 column to the right and up 1 row (multiple instances of "Assigned" within the data set so needs to find and move all).
(3) Find any cell with only a numerical value and move the cell over 1 column to the right and up 1 row (multiple instances within the data set so needs to find and move all).
(4) Find the term "True" and move the cell over 1 column to the right and up 1 row (multiple instances of "True" within the data set so needs to find and move all).
(5) Find all cells that contain "447" and convert it to Number format to 0 decimal points.

I've managed to get the macro to action individual instances of data and select and delete them, but I'm really struggling with find the multiples.

So far this is working fine for all my single instances just by editing what it's looking for (I've obviously just changed the specific data and the numeric after "FIND_DELETE"):
Sub FIND_DELETE1()
'
' FIND_DELETE Macro
' File Import Flip 1
'

'
Cells.Find(What:="File Import Flip 1", After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False).Activate
Selection.Delete Shift:=xlUp
End Sub

I have a semi limited knowledge of VBA that is entirely self taught so please be kind Haha

 

[Liam_1988]

For clarity I'm not asking someone to write the whole thing I specifically need help with the find and select multiple cells with specific text element. The rest of the information is for context. I've written the code for all other elements .