Filtre elaboré entre 2 dates

J'ai besoin d'un coup de main, j'essaye desesperement de lancer un filtre elaboré en VBA sur 2 dates, j'ai beau le triturer dans tous les sens en manuel ca marche, par VBA pas moyen . je dois louper quelque chose
Pourtant ca semble simple, 2 textbox pour les 2 dates et un bouton pour lancer le filtre
Private sub TextBox1_AfterUpdate()

[g2] = ">=" & CDate(Format(TextBox1.Value, "dd/mm/yyyy"))

End Sub


Private Sub TextBox2_AfterUpdate()
'
[H2] = "<" & CDate(Format(TextBox2.Value, "dd/mm/yyyy"))


End Sub
Private Sub CommandButton1_Click()

Range("feuil3!A4:C39").AdvancedFilter , Criteriarange:= _
Range("Feuil3!g1:h2"), Unique:=False
End Sub