Find exact match within a column and select

[trw88]

I have a sheet with part numbers in column A and qty's in column B (this is the only data on the sheet). I want code to find the 0 qty's in column B and delete those rows. It has to be an exact match so that rows that contain 30, 10, etc. would not get deleted. Thanks in advance!

 

[corppunishment11]

Have you just done a filter and filter out the zeros in column B?

 

[Sufiyan97]

Try

Sub DelZeroColB()
'delete values where zero in value in column B

Dim lastrow As Long, r As Long
lastrow = Cells(Rows.Count, "B").End(xlUp).Row

For r = lastrow To 2 Step -1
If Cells(r, "B") = 0 Then
Rows(r).EntireRow.Delete
End If
Next r

End Sub

 

[Joe4]

If Cells(r, "B") = o Then

That looks like a lower case "o" (the letter "o").
It should be the number 0.

Also, you do not need "EntireRow" when using row.
You can just use:

Rows(r).Delete

 

[Sufiyan97]

That looks like a lower case "o" (the letter "o").
It should be the number 0.

Also, you do not need "EntireRow" when using row.
You can just use:

Rows(r).Delete

Thank you Joe
Changed it

 

[trw88]

Thank you Joe
Changed it

Thank you both! Exactly what I was looking for.

 

[Sufiyan97]

That looks like a lower case "o" (the letter "o").
It should be the number 0.

Also, you do not need "EntireRow" when using row.
You can just use:

Rows(r).Delete

Will it make any difference?

EntireRow and
Rows(r).Delete

 

[Joe4]

Will it make any difference?

EntireRow and
Rows(r).Delete

Rows(r).EntireRow.Delete
and
Rows(r).Delete
will do the exact same thing.

If you are referencing the row already using "Rows", you do not need to use "EntireRow", it is completely unnecessary (it is redundant, as the row is already implied).

You typically use "EntireRow" when you are using a single cell references, i.e.
Range("A10).EntireRow.Delete
or
Cell.EntireRow.Delete
which is telling it whatever row that single cell is in, delete the whole row.

 

[Sufiyan97]

Rows(r).EntireRow.Delete
and
Rows(r).Delete
will do the exact same thing.

If you are referencing the row already using "Rows", you do not need to use "EntireRow", it is completely unnecessary (it is redundant, as the row is already implied).

You typically use "EntireRow" when you are using a single cell references, i.e.
Range("A10).EntireRow.Delete
or
Cell.EntireRow.Delete
which is telling it whatever row that single cell is in, delete the whole row.

Thank you very much Joe for explaining

 

[Sufiyan97]

Thank you both! Exactly what I was looking for.

You're Welcome
Glad we could help