Como criar uma macro em VBA para excluir linhas com critério de data?

Question

Olá, pessoal!

Alguém poderia me ajudar a encontrar um código que percorra uma planilha e ao encontrar uma data igual ou anterior à hoje ela exclua essa linha?

Estou tentando esse código, mas não funciona com a data, se colocar outra palavra funciona, mas a data não.

                                

Sub ApagarLinhas()
    Dim lLin As Long

    Application.ScreenUpdating = False

    With Sheets("EXEMPLO")
        For lLin = .Cells(.Rows.Count, "C").End(xlUp).Row To 11 Step -1
If .Cells(lLin, "B") = "HOJE()" Then .Rows(lLin).Delete 
If lLin Mod 100 = 0 Then DoEvents
        Next lLin
    End With
 Application.ScreenUpdating = True

End Sub

Obrigado, desde já!