Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access filtre dan un formulaire

filtre dan un formulaire

7 réponses
Avatar
daniel
Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
ze_titi
Bonjour,

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Pourquoi un '%' dans ton filtre ? PATIENT est une chaîne de caractère ?

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance





Avatar
daniel
Patient est le nom du champs et le % est pour dire séléctionner tout ce qui
est derrère la chaine
(Ce que j'ai vu dans une doc)


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Bonjour,

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Pourquoi un '%' dans ton filtre ? PATIENT est une chaîne de caractère ?

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance







Avatar
ze_titi
Dans ce cas, utilise * et non % et remplace texte18.Text par texte18.Value.

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True


Ca fonctionne comme ça ?
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Patient est le nom du champs et le % est pour dire séléctionner tout ce qui
est derrère la chaine
(Ce que j'ai vu dans une doc)


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Bonjour,

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Pourquoi un '%' dans ton filtre ? PATIENT est une chaîne de caractère ?

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance












Avatar
daniel
Désolé pour le dérangement mais cela ne marche pas.

Voici le code exact:
Texte13 est le champs texte.
Dans la table il y a une colonne : NOM:
private sub texte13_change()
Dim strFilter As String
strFilter = Texte1.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True
end sub

Rien ne se passe..


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Dans ce cas, utilise * et non % et remplace texte18.Text par
texte18.Value.

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True


Ca fonctionne comme ça ?
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Patient est le nom du champs et le % est pour dire séléctionner tout ce
qui
est derrère la chaine
(Ce que j'ai vu dans une doc)


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message
de
news:
Bonjour,

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Pourquoi un '%' dans ton filtre ? PATIENT est une chaîne de caractère ?

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance














Avatar
ze_titi
j'ai oublié quelque chose... Désolé...

private sub texte13_change()
Dim strFilter As String
strFilter = Texte13.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True
me.requery
me.repaint
end sub

Par contre, tu me parles d'une colonne NOM dans ta table... Pourquoi
filtres-tu sur la colonne PATIENT ?
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Désolé pour le dérangement mais cela ne marche pas.

Voici le code exact:
Texte13 est le champs texte.
Dans la table il y a une colonne : NOM:
private sub texte13_change()
Dim strFilter As String
strFilter = Texte1.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True
end sub

Rien ne se passe..


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Dans ce cas, utilise * et non % et remplace texte18.Text par
texte18.Value.

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True


Ca fonctionne comme ça ?
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Patient est le nom du champs et le % est pour dire séléctionner tout ce
qui
est derrère la chaine
(Ce que j'ai vu dans une doc)


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message
de
news:
Bonjour,

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Pourquoi un '%' dans ton filtre ? PATIENT est une chaîne de caractère ?

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance



















Avatar
daniel
Super grand merci ça marche.
J'ai remplacé le PATIENT = par PATIENT LIKE

"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
j'ai oublié quelque chose... Désolé...

private sub texte13_change()
Dim strFilter As String
strFilter = Texte13.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True
me.requery
me.repaint
end sub

Par contre, tu me parles d'une colonne NOM dans ta table... Pourquoi
filtres-tu sur la colonne PATIENT ?
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Désolé pour le dérangement mais cela ne marche pas.

Voici le code exact:
Texte13 est le champs texte.
Dans la table il y a une colonne : NOM:
private sub texte13_change()
Dim strFilter As String
strFilter = Texte1.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True
end sub

Rien ne se passe..


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message
de
news:
Dans ce cas, utilise * et non % et remplace texte18.Text par
texte18.Value.

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "*'"
Me.Filter = strFilter
Me.FilterOn = True


Ca fonctionne comme ça ?
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Patient est le nom du champs et le % est pour dire séléctionner tout
ce
qui
est derrère la chaine
(Ce que j'ai vu dans une doc)


"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le
message
de
news:
Bonjour,

Dim strFilter As String
strFilter = Texte18.value
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Pourquoi un '%' dans ton filtre ? PATIENT est une chaîne de
caractère ?

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la
table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle
ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance





















Avatar
ze_titi
Merci du retour !

Bon code
--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour à tous,

Débutant dans access, j'aimerais créer un Textbox qui filtre la table
affichée dans un formulaire.
Dans l'en-tête du formulaire, j'ai inséré une zone de texte. Celle ci
constitue le filtre
J'ai essayé

Dim strFilter As String
strFilter = Texte18.Text
strFilter = "PATIENT = '" & strFilter & "%'"
Me.Filter = strFilter
Me.FilterOn = True

Ma table est vide

Help ???


Merci d'avance