VBA to Delete/Remove Table Row Dependent on 1st Column of Table Data

[redneck9407]

Hello,

I use an excel workbook at work to simplify some of our routine task. This one in particular is used when a project becomes active and material for the project is being approved/released for order. I currently have the 1st column in the Table set as an IF/OR statement because of some misc and shipping fields our software spits out when we perform a Pick List export. Right now the IF statement will place the "Delete" in the 1st cell of the row as seen below. I would like to create a VBA macro to then delete these table rows based on it saying "Delete". The code must all unprotect and re-protect the sheet as well since we have some staff that likes to delete the wrong items. I believe I can handle the protection items but the deletion of these rows has kicked my butt, any help is kindly appreciated!!

 

[XLfriend777]

Hello redneck9407 and welcome to the forum. If I understand your problem you might try something like the code below that looks for the word "Delete" in the first column and then deletes the entire row before moving to the next row. Try this on sample data as macros are not reversible. Hope this helps you get started.

Sub DeleteRowsWithDelete()
i = 1
While i < 30
Cells(i, 1).Select
    If Cells(i, 1).Value = "Delete" Then
    Cells(i, 1).EntireRow.Delete
    i = i - 1
    
    End If
i = i + 1
Wend
End Sub