Code to Delete a Row in Excel

[cs1ctp]

Hi,

I have the following code:

For i = lRowNum To ActiveSheet.UsedRange.Rows.Count - 1
                If Cells(i, 1).Value = ComboBox1.Value Then
                        Delete Whole Row
                    Exit For
                End If
            Next i

There is a For loop that searched down cells in a spreadsheet. When I find a match, I simply want to delete the whole row but am not sure of the code.

Can anyone help?

Chris

 

[miguems]

Check this ...

Sub DelEmptyRow()
Rng = Selection.Rows.Count
ActiveCell.Offset(0, 0).Select
Application.ScreenUpdating = False
For i = 1 To Rng
If ActiveCell.Value = "" Then 'You can replace "" with 0 to delete rows with 'the value zero
Selection.EntireRow.Delete
Else
ActiveCell.Offset(1, 0).Select
End If
Next i
Application.ScreenUpdating = True
End Sub

I got this from: http://www.angelfire.com/biz7/julian_s/julian/julians_macros.htm
There's a lot of examples there. I hope it helps.
M.