Delete entire row on condition

I'm not a programmer so this is probably simple.

I need to delete the entire row if the following conditions are met:
- Cell C and the row is blank or has the "no info" text in it and
- Cell D is blank

I use excel 2003

Thanks
bouitac

Public Sub ProcessData2()
Const TEST_COLUMN As String = "A"    '<=== change to suit
Dim i As Long
Dim LastRow As Long

    With Application
        
        .ScreenUpdating = False
        .Calculation = xlCalculationManual
    End With
    
    With ActiveSheet
        
        LastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
        For i = LastRow To 1 Step -1
        
            If (.Cells(i, "C").Value = "" Or .Cells(i, "C").Value = "no info") And _
                .Cells(i, "D").Value = "" Then
            
                .Rows(i).Delete
            End If
        Next i
        
    End With
    
    With Application
        
        .Calculation = xlCalculationAutomatic
        .ScreenUpdating = True
    End With
    
End Sub

Thank you very much that worked great!

Bouitac