VBA Code for Deleting a Row

  • Thread starter Thread starter christopher.margol
  • Start date Start date
C

christopher.margol

I would like to use a macro to delete any row that has the word
"delete" in one of its cells. What would this code be? Thanks!
 
Sub zero()
Set r = ActiveSheet.UsedRange
nLastRow = r.Rows.Count + r.Row - 1
For i = nLastRow To 1 Step -1
For j = 1 To Columns.Count
v = Cells(i, j).Value
If InStr(1, v, "delete") > 0 Then
Cells(i, j).EntireRow.Delete
Exit For
End If
Next
Next
End Sub
 
Try recording a macro
data>filter>autofilter>filter on delete>delete>autofiter
or
look in the vba help index for FINDNEXT.
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Word VBA for deleting Selected Row 0
Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
Delete rows based on contents of Col A 0
Deleting Rows on condition 0
Deleting Rows based on a Value 1
vba delete 2
vba to delete rows 1
Macro to delete row 13

Back
Top