Macro to delete rows based on a certain value in a cell

[excelnewbie1986]

Hi everyone,

I have an Excel spreadsheet with a column (column Z) that contains multiple values (C, G, M and S). I would like to create a Macro to delete the rows that contain the value of G in this particular column. So, for example, if cell Z18 has a value of G I'd like the Macro to delete the entire row 18 and move the next row of data up by one row to replace the blank row that's been left by the deletion. I know I can sort the spreadsheet and manually delete rows that contain G, but there are 84,000 rows of data, and over 500 instances of G that I want removing. I've never created a Macro before and would really appreciate your help in guiding me to create the Macro.

Thank you so much!!!
AP

 

[Fluff]

Hi & welcome to MrExcel.
How about

Sub delG()
Application.ScreenUpdating = False
   With Range("Z:Z")
      .Replace "G", "=GGG", xlWhole, , False, , False, False
      .SpecialCells(xlFormulas, xlErrors).EntireRow.Delete
   End With
End Sub

 

[excelnewbie1986]

Hi & welcome to MrExcel.
How about

Sub delG()
Application.ScreenUpdating = False
   With Range("Z:Z")
      .Replace "G", "=GGG", xlWhole, , False, , False, False
      .SpecialCells(xlFormulas, xlErrors).EntireRow.Delete
   End With
End Sub

Thank you so much! Works perfectly!

 

[Fluff]

Glad to help & thanks for the feedback