OVH Cloud OVH Cloud

Pbm avec une requete en vba

2 réponses
Avatar
JV
Bonjour à tous

je débute désolé !
j'ai un formulaire avec un bouton sur lequel je souhaite faire un filtre
sur l'action clic j'ai mis ce code :
DoCmd.ApplyFilter "", "[Nom] Like ""*"" & [saisir le nom recherché] &
""*"""

ce qui me permet de saisir le nom avec seulement qques caractères quel que
soit leur place
dans la chaine. Jusque là OK

probleme lorsque je saisie par ex : mart

j'ai les martin, martino, martina, martini etc........

et quans je me déplace d'enregistrements en enregistrements par le biais
d'un autre bouton
DoCmd.GoToRecord , , acNext

et que j'arrive à la fin de mes enregistrements filtrés martu, marti
il ne m'en trouve plus (ce qui est normal puisque j'ai fini de consulter les
30 réponses) et m'affiche une érreur
erreur d'exécution 94 : utilisation incorrecte de null

je comprends a peu près pourquoi (plus de réponses à afficher), mais je ne
sais pas comment contourner le pbm

Merci d'avance

JV

2 réponses

Avatar
Raymond [mvp]
Bonjour.

ce que tu peux faire:
mettre un on error pour te déplacer sur le dernier pour rester au bout ou
sur le premier pour boucler
On Error GoTo ToLast
DoCmd.GoToRecord , , acNext
Exit Sub
ToLast:
DoCmd.GoToRecord , , acLast ' ou acFirst
DoCmd.GoToRecord , , acFirst ' ou acLast
End Sub
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"JV" a écrit dans le message de news:
425e2978$0$28109$
Bonjour à tous

je débute désolé !
j'ai un formulaire avec un bouton sur lequel je souhaite faire un filtre
sur l'action clic j'ai mis ce code :
DoCmd.ApplyFilter "", "[Nom] Like ""*"" & [saisir le nom recherché] &
""*"""

ce qui me permet de saisir le nom avec seulement qques caractères quel que
soit leur place
dans la chaine. Jusque là OK

probleme lorsque je saisie par ex : mart

j'ai les martin, martino, martina, martini etc........

et quans je me déplace d'enregistrements en enregistrements par le biais
d'un autre bouton
DoCmd.GoToRecord , , acNext

et que j'arrive à la fin de mes enregistrements filtrés martu, marti
il ne m'en trouve plus (ce qui est normal puisque j'ai fini de consulter
les 30 réponses) et m'affiche une érreur
erreur d'exécution 94 : utilisation incorrecte de null

je comprends a peu près pourquoi (plus de réponses à afficher), mais je ne
sais pas comment contourner le pbm

Merci d'avance

JV




Avatar
JV
excellent
merci raymond

"Raymond [mvp]" a écrit dans le message de
news: OpX94%
Bonjour.

ce que tu peux faire:
mettre un on error pour te déplacer sur le dernier pour rester au bout ou
sur le premier pour boucler
On Error GoTo ToLast
DoCmd.GoToRecord , , acNext
Exit Sub
ToLast:
DoCmd.GoToRecord , , acLast ' ou acFirst
DoCmd.GoToRecord , , acFirst ' ou acLast
End Sub
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"JV" a écrit dans le message de news:
425e2978$0$28109$
Bonjour à tous

je débute désolé !
j'ai un formulaire avec un bouton sur lequel je souhaite faire un filtre
sur l'action clic j'ai mis ce code :
DoCmd.ApplyFilter "", "[Nom] Like ""*"" & [saisir le nom recherché] &
""*"""

ce qui me permet de saisir le nom avec seulement qques caractères quel
que soit leur place
dans la chaine. Jusque là OK

probleme lorsque je saisie par ex : mart

j'ai les martin, martino, martina, martini etc........

et quans je me déplace d'enregistrements en enregistrements par le biais
d'un autre bouton
DoCmd.GoToRecord , , acNext

et que j'arrive à la fin de mes enregistrements filtrés martu, marti
il ne m'en trouve plus (ce qui est normal puisque j'ai fini de consulter
les 30 réponses) et m'affiche une érreur
erreur d'exécution 94 : utilisation incorrecte de null

je comprends a peu près pourquoi (plus de réponses à afficher), mais je
ne sais pas comment contourner le pbm

Merci d'avance

JV