Discussion :

[jevany]

Bonjour,
Je cherche à filtrer les données vides dans un formulaire à partir d'un bouton.
j'ai donc créer le bouton suivant :

Private Sub Nom_vide_Click()
Dim filtre
Me.FilterOn = False
filtre = " [nomprenom]= null "
DoCmd.ApplyFilter , filtre
End Sub

cela ne fonctionne pas mais cela fonctionne si je mets
filtre = " [nomprenom]= thierry"

une idée merci

[temar]

Salut !

As-tu essayé quelque chose du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
    filtre = " ([nomprenom] is null) "

ou encore

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

     filtre = " [nomprenom]= '' "

[jevany]

merci mais

filtre = " [nomprenom]= ' ' " ne fonctionne pas
filtre = " [nomprenom]= "" " ne fonctionne pas
filtre = " ([nomprenom] is null) " ne fonctionne pas

une autre idée ?

[Arkham46]

slt,

une petite recherche dans la FAQ? non?

[philben]

Bonjour,

Si vous voulez cacher les enr. avec donnée vide :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 
Private Sub Nom_vide_Click()
Me.Filter = "Len([nomprenom]) > 0"
Me.FilterOn = True
End Sub

Si vous souhaitez afficher que les enr. avec donnée vide :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 
Private Sub Nom_vide_Click()
Me.Filter = "Len([nomprenom]) = 0"
Me.FilterOn = True
End Sub

[jevany]

Merci,

cela fonctionne très bien pour trouver les données non vides
Me.Filter = "Len([nomprenom]) > 0"

mais cela ne fonctionne pas pour trouver les données vides
Me.Filter = "Len([nomprenom]) = 0 " ne fonctionne pas


pour info
Me.Filter = "Len([nomprenom]) = "" " ne fonctionne pas
Me.Filter = "Len([nomprenom]) = '' " ne fonctionne pas
Me.Filter = "Len([nomprenom]) = null " ne fonctionne pas

N'y a t il pas moyen de faire ceci

Me.Filter = "Len([nomprenom]) > 0" et puis de lui demander de rechercher les enregistrements ignorés ?

Merci anyway

[jevany]

Par contre ça fonctionne avec ceci


Me.Filter = "Len([nomprenom]) = is null "



Merci à tous les contributeurs

[jevany]

Merci à tous