Filtre par date

[yieiii]

Bonsoir, j'utilise ce code pour filtrer un sous-formulaire

Code :

1
2
3
4
5
6
7
If Not IsNull(Me.R_Echéance) And Me.R_Echéance <> "" Then
 
        If f <> "" Then
            f = f & " AND [Date échéance] LIKE ""*" & Me.R_Echéance & "*"""
        Else
            f = "[Date échéance] LIKE ""*" & Me.R_Echéance & "*"""
        End If

pour le texte et les num, pas de problèmes mais cela ne fonctionne par pour les dates. Que puis-je modifier tout en gardant ce principe de filtre.

merci

[Philippe JOCHMANS]

Bonjour

Que veux-tu faire ?

En effet pour les dates le Like ne veut rien dire, il faut soit une égalité, ou > ou <.

De plus les dates dans du code VB doit être au format US (mm/dd/yyyy) grâce à la fonction format (la FAQ, les tutos et le forum regorgent d'exemples.

Philippe

[yieiii]

je souhaiterais via une zone de texte dans laquelle je rentrerai une date filtrer mon sous formulaire dans lequel se trouve un colonne date.

je vais remplacer le LIKE par = par contre pour le format, peux-tu m'orienter ?

Ma zone de texte dans laquelle j'entre ma date de filtre est paramétrée en date abrégée, mais j'imagine qu'il faut aussi ajouter quelque chose dans le code ?

[Philippe JOCHMANS]

Re

Merci de faire des recherches, la FAQ est là pour cela.

Quel format de dates utiliser pour les requêtes, les calculs VBA, les contrôles de formulaires ?
Comment formater les dates (en version US) pour les inclure dans une requête

Philippe