Pb bouton d'options pour afficher ou non un formulaire

Bonjour,
Je ne comprends pas ce qui se passe dans ma base de données.
J'ai une base qui fonctionne depuis des années et depuis le passage de la version 97 à Access 2003, il y a quelques jours, un formulaire ne fonctionne plus parfaitement.

Dans ce formulaire il y a un groupe d'options avec deux boutons.
Ces boutons permettent de faire un choix et en fonction du choix les formulaires se trouvant dans une page d'onglet s'affichent ou non.

Une macro "bascule" se trouve dans le groupe d'options au niveau de sur entrée et sur clic
La macro rend visible l'un et invisible l'autre tout simplement.

Lorsque j'appuie sur les boutons pas de problème, mais lorsque je fais un choix dans une liste déroulante pour me positionner sur une fiche, les boutons s'activent, mais le dernier formulaire visible reste visible et je dois réappuyer sur le bon bouton pour que le formulaire s'affiche.

Pourriez-vous m'aider s'il vous plait ?

Merci:P

Citation:

---

Envoyé par Patrick78

lorsque je fais un choix dans une liste déroulante pour me positionner sur une fiche, les boutons s'activent, mais le dernier formulaire visible reste visible et je dois réappuyer sur le bon bouton pour que le formulaire s'affiche.

---

Je ne suis pas sur de tout comprendre là dedans. Lorsque tu utilise ta liste déroulante, tu ouvres un nouveau formulaire ?
Et c'est à ce moment là que les boutons s'activent alors qu'ils ne devraient pas ?
Tu devrais peut-être contrôler le chargement du formulaire dans l'évenement :

Code:

---

1 2 3

Private Sub Form_Current() End Sub

---

Ou encore vérifier les propriétés de tes boutons au chargement du formulaire. Je ne vois pas trop quoi dire d'autre avec ces infos...dsl
http://www.stci.qc.ca/smilies/smilies%20%28255%29.gif

Citation:

---

Envoyé par nicou50

Je ne suis pas sur de tout comprendre là dedans. Lorsque tu utilise ta liste déroulante, tu ouvres un nouveau formulaire ?
Et c'est à ce moment là que les boutons s'activent alors qu'ils ne devraient pas ?
Tu devrais peut-être contrôler le chargement du formulaire dans l'évenement :

Code:

---

1 2 3

Private Sub Form_Current() End Sub

---

Ou encore vérifier les propriétés de tes boutons au chargement du formulaire. Je ne vois pas trop quoi dire d'autre avec ces infos...dsl
http://www.stci.qc.ca/smilies/smilies%20%28255%29.gif

---

Merci de ta réponse, en fait lorsque je saisi une nouvelle fiche, j'appuie sur un bouton et un formulaire apparait dans une page pour pouvoir être rempli.

Ce qui ne marche plus c'est lorsque je veux visualiser par la suite une fiche ancienne par l'intermédiaire d'une liste déroulante, le bouton correspondant est bien enfoncé, mais le formulaire ne s'actualise pas automatiquement, il faut réappuyer sur le bouton pour que le bon sous formulaire soit visible.

J'espère avoir été assez clair

Cordialement

difficile de voir d'où ça pourrait venir...surtout si ça marchait avant.

Tu me dis que ton formulaire aurait en fait un problème de Refresh.

Tu pourrais essayer de mettre "Me.Refresh" dans l'évenement lié au bouton :
pour plus d'info : http://access.developpez.com/faq/?pa...ee#RefreshForm

Si ça ne marche pas, tu peux toujours essayer d'appeler Form_Current dans ton évenement lié au bouton pour forcer le formulaire à se recharger.

S'il s'agit d'un enregistrement qui n'Est pas mis à jour automatiquement ( ce que je ne pense pas être ton cas ) :

Code:

---

1 2	DoCmd.RunCommand acCmdSaveRecord

---

J'espère que ça peut t'aider...
http://www.stci.qc.ca/smilies/smilies%20%28247%29.gif

J'ai essayé, rien n'y fait, ce qui me fait rager c'est que ça fonctionnait depuis des années.
Je suis sure que c'est une annerie, mais je ne trouve pas et je ne vois pas comment contourner !!!

Enfin merci beaucoup pour ton aide, je laisse en suspend si quelqu'un avait une idée géniale...

Bonne Chance !:roll:

:salut: Patrick78

Ou est ton code, qui permet de basculer de l'état visible à invisible !
Et quel est-il ?

A+

Salut Bruno,

La bascule est réalisée par une macro en relation avec un champ qui contient 1 ou 2

Si 0 alors Formulaire1 et Formulaire2 invisible
[ChampN°Type]=0
DéfinirValeur [SousFormulaire1].[Formulaire].[Visible] FAUX
... DéfinirValeur [SousFormulaire2].[Formulaire].[Visible] FAUX

Si 1 alors Formulaire1 visible et Formulaire2 invisible
[ChampN°Type]=1
DéfinirValeur [SousFormulaire1].[Formulaire].[Visible] VRAI
... DéfinirValeur [SousFormulaire2].[Formulaire].[Visible] FAUX

Si 2 alors Formulaire 1 invisible et Formulaire2 visible
[ChampN°Type]=2
DéfinirValeur [SousFormulaire1].[Formulaire].[Visible] FAUX
... DéfinirValeur [SousFormulaire2].[Formulaire].[Visible] VRAI

C'est tout et surtout ça marchait depuis des années (plus de dix...)

Merci de ton aide

Citation:

---

Envoyé par Patrick78

Si 0 alors Formulaire1 et Formulaire2 invisible
[ChampN°Type]=0
DéfinirValeur [SousFormulaire1].[Formulaire].[Visible] FAUX
... DéfinirValeur [SousFormulaire2].[Formulaire].[Visible] FAUX

Si 1 alors Formulaire1 visible et Formulaire2 invisible
[ChampN°Type]=1
DéfinirValeur [SousFormulaire1].[Formulaire].[Visible] VRAI
... DéfinirValeur [SousFormulaire2].[Formulaire].[Visible] FAUX

Si 2 alors Formulaire 1 invisible et Formulaire2 visible
[ChampN°Type]=2
DéfinirValeur [SousFormulaire1].[Formulaire].[Visible] FAUX
... DéfinirValeur [SousFormulaire2].[Formulaire].[Visible] VRAI

---

Je suis peut être dans le faux, mais je te mets comment je noterais ton code en VBA : ( je ne sais pas à quoi correspond ton DéfinirValeur )

Code:

---

1 2 3 4 5 6 7 8 9 10 11

If ChampType = 0 Then ... Me.SousFormulaire1.Visible = False ... Me.SousFormulaire2.Visible = False ElseIf ChampType = 1 Then ... Me.SousFormulaire1.Visible = True ... Me.SousFormulaire2.Visible = False Else ... Me.SousFormulaire1.Visible = False ... Me.SousFormulaire2.Visible = True End If

---

C'est peut être comme ça que tu l'a noté...mais mieux vaux prévenir que guérir...
Autrement,

Citation:

---

La bascule est réalisée par une macro en relation avec un champ qui contient 1 ou 2

---

La macro est démarrée sur quel évenement exactement?
http://smileys.sur-la-toile.com/sign...3862-final.gif

Salut,

Dans le groupe d'options sur les évenements "Sur Entrée" et "Sur Clic"

DéfinirValeur est l'action de la macro

Merci

Merci à tous, mais je viens de trouver la solution.

Il suffit de mettre l'appel à la Macro bascule dans l'évenement Sur Activation du formulaire général et ça marche.

Encore merci pour le temps que vous avez pu me consacrer.

:lol: :yaisse2:

bonne continuation alors.:P