[Resolvido]Mensagem de aviso para data de nascimento fora do padrão

Bom dia Mestres, blz?!

Estou tentando fazer um código para que, após a perda de foco da caixa de texto DATA_NASC, se a data está fora das datas Inicial e Final que estão no form (txtDataIni e txtDataFim), envie uma MsgBox alertando.
Fiz este código , mas não está filtrando corretamente.
Preciso de uma luza onde estou errando.

Segue o código que fiz:

Private Sub txtDATA_NASC_LostFocus()

If Format(Me.txtDATA_NASC.Value, "mm/dd/yyyy") <= Format(Me!txtDataIni, "mm/dd/yyyy") _
And Format(Me.txtDATA_NASC.Value, "mm/dd/yyyy") >= Format(Me!txtDataFim, "mm/dd/yyyy") Then
Me.lblDATA_NASC.ForeColor = vbBlack
Exit Sub
Else
MsgBox ("Data de Nascimento fora do limite para a idade!"), vbInformation + vbOKOnly, "Data de Nascimento Inválida"
Me.txtDATA_NASC.SetFocus
Me.lblDATA_NASC.ForeColor = vbRed
Exit Sub
End If

End Sub

Grato!
Abrasss!!!

Beleza feras, testando enquanto agurdava uma luz, acabei acertando e era uma coisinha tão ridícula (#) que até tentei apagar o tópico...HAHHAA
Resolvido.

Segue:

Private Sub txtDATA_NASC_LostFocus()

If Format(Me.txtDATA_NASC.Value, "#mm/dd/yyyy#") >= Format(Me!txtDataIni, "#mm/dd/yyyy#") _
And Format(Me.txtDATA_NASC.Value, "#mm/dd/yyyy#") <= Format(Me!txtDataFim, "#mm/dd/yyyy#") Then
   Me.lblDATA_NASC.ForeColor = vbBlack
   Exit Sub
Else
   MsgBox ("Data de Nascimento fora do limite para a idade!"), vbInformation + vbOKOnly, "Data de Nascimento Inválida"
   Me.txtDATA_NASC.Value = Empty
   Me.txtDATA_NASC.SetFocus
   Me.lblDATA_NASC.ForeColor = vbRed
   Exit Sub
End If

End Sub

Grato!