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 Formulaire refuse de s'ouvrir

Formulaire refuse de s'ouvrir

5 réponses
Avatar
BEAUCHAND
Bonjour!
Je travaille avec Access 2000 sur Windows XP.

Voici mon problème:
Je veux ouvrir un deuxième formulaire à partir d'un formulaire principal
(MASTERQUERY FORM).
Le formulaire A, B ou C doit s'ouvrir, selon la station choisie, en
affichant une liste de montant se situant entre des séquences spécifiques.
Voici le code:
Me.SeqToFind.Requery
Me.SeqDeToFind.Requery
Me.SeqAToFind.Requery
Select Case STATION
Case "A": DoCmd.OpenForm "Par Liste A", acNormal, "", "[Seq_no] Between
[Forms]![MASTERQUERY FORM].[SeqDeToFind] And [Forms]![MASTERQUERY
FORM].[SeqAToFind]", , acNormal
Case "B": DoCmd.OpenForm "Par Liste B", acNormal, "", "[Seq_no] Between
[Forms]![MASTERQUERY FORM].[SeqDeToFind] And [Forms]![MASTERQUERY
FORM].[SeqAToFind]", , acNormal
Case "C": DoCmd.OpenForm "Par Liste C", acNormal, "", "[Seq_no] Between
[Forms]![MASTERQUERY FORM].[SeqDeToFind] And [Forms]![MASTERQUERY
FORM].[SeqAToFind]", , acNormal
End Select

[SeqDeToFind] et [SeqAToFind] contiennent une formule se référant à
[SeqToFind]

Lorsque je clique sur le bouton activant le code je reçois le message suivant:
Run-Time error '2501'
The OpenForm action was canceled.

J'ai un autre bouton qui fait la même chose sauf que les champs utilisés
pour filtrer le formulaire ne sont pas les mêmes. Et il fonctionne bien.

Merci à l'avance!
Signaler un problème avec ce contenu

5 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
Gafish
BEAUCHAND wrote:
Bonjour!


Bonjour,

Case "A": DoCmd.OpenForm "Par Liste A", acNormal, "", "[Seq_no]
Between [Forms]![MASTERQUERY FORM].[SeqDeToFind] And
[Forms]![MASTERQUERY FORM].[SeqAToFind]", , acNormal


Pour ton dernier paramètre déja, acNormal n'existe pas (en tout cas sous 97)
tu as
acDialog
acHidden
acIcon
acWindowNormal

Ensuite pour
"[Seq_no] Between [Forms]![MASTERQUERY FORM].[SeqDeToFind] And ..."
essaie plutôt :
"[Seq_no] Between " & [Forms]![MASTERQUERY FORM].[SeqDeToFind] & " And ..."
idem pour toutes les fois où tu vas faire appel à [Forms]!...

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
BEAUCHAND
Bonjour,
Je travaille sous access 2000 donc "acNormal" fonctionne.

j'ai essayé:
DoCmd.OpenForm "Par Liste A", acNormal, "", "[Seq_no] Between " &
[Forms]![MASTERQUERY FORM].[SeqDeToFind] & " And " & [Forms]![MASTERQUERY
FORM].[SeqAToFind], , acNormal

et je reçois encore le même message d'erreur.

Merci et bonne journée!
"Gafish" wrote:

BEAUCHAND wrote:
Bonjour!


Bonjour,

Case "A": DoCmd.OpenForm "Par Liste A", acNormal, "", "[Seq_no]
Between [Forms]![MASTERQUERY FORM].[SeqDeToFind] And
[Forms]![MASTERQUERY FORM].[SeqAToFind]", , acNormal


Pour ton dernier paramètre déja, acNormal n'existe pas (en tout cas sous 97)
tu as
acDialog
acHidden
acIcon
acWindowNormal

Ensuite pour
"[Seq_no] Between [Forms]![MASTERQUERY FORM].[SeqDeToFind] And ..."
essaie plutôt :
"[Seq_no] Between " & [Forms]![MASTERQUERY FORM].[SeqDeToFind] & " And ..."
idem pour toutes les fois où tu vas faire appel à [Forms]!...

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Gafish
BEAUCHAND wrote:
Bonjour,
Je travaille sous access 2000 donc "acNormal" fonctionne.

j'ai essayé:
DoCmd.OpenForm "Par Liste A", acNormal, "", "[Seq_no] Between " &
[Forms]![MASTERQUERY FORM].[SeqDeToFind] & " And " &
[Forms]![MASTERQUERY FORM].[SeqAToFind], , acNormal

et je reçois encore le même message d'erreur.

Merci et bonne journée!



Seq_No est de quel type ?
Verifie aussi tes SeqDeToFind et AToFind, essaie peut-être de les
convertir.
En fait, l'erreur que tu as intervient souvent quand il y a un problème dans
le where de la source, donc il faut creuser voir quel est ce problème.

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
BEAUCHAND
"Gafish" wrote:

BEAUCHAND wrote:
Bonjour,
Je travaille sous access 2000 donc "acNormal" fonctionne.

j'ai essayé:
DoCmd.OpenForm "Par Liste A", acNormal, "", "[Seq_no] Between " &
[Forms]![MASTERQUERY FORM].[SeqDeToFind] & " And " &
[Forms]![MASTERQUERY FORM].[SeqAToFind], , acNormal

et je reçois encore le même message d'erreur.

Merci et bonne journée!



Seq_No est de quel type ?
Verifie aussi tes SeqDeToFind et AToFind, essaie peut-être de les
convertir.
En fait, l'erreur que tu as intervient souvent quand il y a un problème dans
le where de la source, donc il faut creuser voir quel est ce problème.

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Bonjour,


Seq_No est une Clé Primaire LONG INTEGER.
SeqDeToFind et SeqAToFind sont des Text Box contenant une formule.

Merci.




Avatar
Gafish
BEAUCHAND wrote:
Seq_No est une Clé Primaire LONG INTEGER.
SeqDeToFind et SeqAToFind sont des Text Box contenant une formule.


Contenant une formule c'est à dire ? Une formule ou le résultat d'une
formule ? Est-ce que tu peux détailler ?

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr