OVH Cloud OVH Cloud

Requery ne marche pas

2 réponses
Avatar
me.novice
Bonjour tout le monde.
J'ai formulaire Rapport bass=E9e sur un requette.
dans ce formulaire j'ai un champ <RefClient> liste d=E9roulante bas=E9e
sur requ=EAte Client.
Si le client n'exite pas, sur double clic j'ouvre le formulaire client
et j'ajoute un client ensuite je rafraichie cette liste.
Vous me suivez? Ok
Le code est:
---D=E9but
Private Sub RefClient_DblClick(Cancel As Integer)

On Error GoTo Initiales_DblClick_Err

DoCmd.OpenForm "Clients", acNormal, "", "", acAdd, acNormal
RefContact.Requery

RefClient_DblClick_Exit:
Exit Sub

RefClient_DblClick_Err:
MsgBox Error$
Resume RefClient_DblClick_Exit

End Sub

---Fin du code
Voil=E0 sur double clic le formulaire Client s'ouvre et j'ajoute un
nouveau client.
LE PROBL=C8ME est que:
Une fois le formulaire Client ferm=E9 la nouvelle entr=E9e n'est pas dans
la liste d=E9roulante malgr=E8s le : RefClient.requery...

Merci
Je suis Novice.

2 réponses

Avatar
3stone
Salut,

"me.novice"

[...]
DoCmd.OpenForm "Clients", acNormal, "", "", acAdd, acNormal
RefContact.Requery


[...]
LE PROBLÈME est que:
Une fois le formulaire Client fermé la nouvelle entrée n'est pas dans
la liste déroulante malgrès le : RefClient.requery...



C'est normal...
le requery à lieu bien avant que tu aies tapé la première lettre !

Tu as oublié d'ajouter le plus important :

DoCmd.OpenForm "Clients", , , , acFormAdd, acDialog

et, ne pas mettre des chaines vides, mais simplement la virgule
pour le paramètre manquant (tu en as oublié un au passage) !


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Me.Novice
Bonjour et merci "3stone".
C'était exactement ça le problème.
Grâce à vous "Requery" remarche.
Bonne journée à tous.
Merci
Je suis Novice.




Salut,

"me.novice"

[...]
DoCmd.OpenForm "Clients", acNormal, "", "", acAdd, acNormal
RefContact.Requery


[...]
LE PROBLÈME est que:
Une fois le formulaire Client fermé la nouvelle entrée n'est pas dans
la liste déroulante malgrès le : RefClient.requery...



C'est normal...
le requery à lieu bien avant que tu aies tapé la première lettre !

Tu as oublié d'ajouter le plus important :

DoCmd.OpenForm "Clients", , , , acFormAdd, acDialog

et, ne pas mettre des chaines vides, mais simplement la virgule
pour le paramètre manquant (tu en as oublié un au passage) !


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/