Delete row based on Cell value

A line such as:

Dim LastRow as Long
LastRow = Sheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row

will get the last used row in column A (i.e., column 1).
Then,

Dim TestCell  As Range, Ndx As Long
For Ndx= LastRow to 1 Step -1
   If Cells(Ndx, [test column number here] = some test value Then
        ..etc.
   Next Ndx

Will start the test from the BOTTOM of the range. Because moving from the top down, the row below a deleted row will move up to its place and thus be skipped when Ndx increments to the next value.