formulaire de recherche avec les dates
Bonjour,
J'ai crée un formulaire de recherche, et je souhaite pouvoir faire des recherches par date, mais cela ne fonctionne pas car il transforme les dates en anglais. Comment faire ?
Voici mon code (il doit y avoir certainement mieux, mais je suis un amateur)
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
| ' filtre date de signature
If Not IsNull(Me.Txt_Date_Signature_Debut) Then
If strfiltre <> "" Then strfiltre = strfiltre & " and "
strfiltre = strfiltre & "([t_mont_date_signature]>=" & _
"#" & Me.Txt_Date_Signature_Debut & "#" & ")"
End If
If Not IsNull(Me.Txt_Date_Signature_Fin) Then
If strfiltre <> "" Then strfiltre = strfiltre & " and "
strfiltre = strfiltre & "([t_mont_date_signature]<=" & _
"#" & Me.Txt_Date_Signature_Fin & "#" & ")"
End If
With Me.F_Résultat_recherche_2.Form
.Filter = strfiltre
.FilterOn = True
End With
End Sub |
Si quelqu'un à une solution, merci d'avance !