¿Como poner una condición de fecha para una búsqueda en tabla para un Formulario en UserForm?

Tengo el siguiente codigo que logre hacerlo funcionar, pero quisiera aun mas filtarlo por fechas, ya tengo Txt_fecha1 y Txt_fecha2 (dos TextBox) para colocar los rangos de las fechas, pero como coloco la condicion en mi codigo para que me busque por el rango de fechas. Agradeceria mucho su ayuda.

If Nombres = lbl_tec3 _
And Sreal = "PREVENTIVO" Then
lbl_p3 = Application.CountIfs(Worksheets("DATOS").Range("p2:p" & final), Sreal, Worksheets("DATOS").Range("c2:c" & final), Nombres)

End If

Tomando que dentro de la tabla, la columna que registra las fechas es la columna D ó 4, habia probado este código pero me dice que no coinciden los tipos.

And CDate(Hoja1.Cells(j, 4).Value) >= CDate(Me.txtFecha1) _
And CDate(Hoja1.Cells(j, 4).Value) <= CDate(Me.txtFecha2) _