Discussion :

[Salsaboy60]

Bonjour,

J'ai un formulaire frm_Factures dans laquelle j'ai un champs type liste déroulante: CodeIdentifient, avec un code unique qu'on attribue à chaque client.
Si c'est une nouvelle cliente, j'ouvre une formulaires pour encoder la nouvelle client, je ferme au même temps mon formulaire frm_Factures. (Pour que la nouvelle entree soit directement reconnue dans la liste déroulante)

Une fois encodé le client, je voulais ouvrir le formulaire, là il n'y à pas de problème, seulement, je trouve plus beau, que le formulaire s'ouvre directement sur l’entrée qu'on vient de créer.
Pour cela, j'ai mis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
]Private Sub Stop_DblClick(Cancel As Integer)
 
 
  DoCmd.OpenForm "frmFactures", acNormal, , [tbl_ClientFournisseur]![CodeIdentifient] = Me.CodeIdentifient, , acWindowNormal
  DoCmd.Close
 
End Sub

Seulement, je n'arrive pas à que ça marche.

Un idée qqn??

Merci d'avance

[jimbolion]

Salsaboy60 bonjour,


Le problème que tu décris est tout à fait normal mais dans ton explication il manque quand même une information. Lorsque tu rouvres ton formulaire frmFactures, as tu refermé ton formulaire d'encodage de ton nouveau client ?

Je reviendrai plus loin sur l'importance de cette information :

Donc dans ton filtre lorsque tu passes [tbl_ClientFournisseur]![CodeIdentifient] = Me.CodeIdentifient : il est probable que le me est associé au formulaire frmfactures (et donc vide puisque tu viens de l'ouvrir)

Pour t'en rendre compte affiche le contenu de la variable Me.CodeIdentifient avant la commande d'ouverture de ton formulaire.

Si cette valeur est vide et que le formulaire d'encodage est toujours ouvert (on y vient), référence alors ton formulaire d'encodage : [tbl_ClientFournisseur]![CodeIdentifient] = Forms![encodage]!CodeIdentifient

JimboLion

[Salsaboy60]

oui, j’appelle le formulaire factures (frmFactures) à partir de mon formulaire pop up d'encodage via le DoCmd.OpenForm et la ligne suivante, je ferme mon formulaire d'encodage.

J'ai enlevé cette ligne de fermeture, mais j'ai quand même une message d'erreur:
Erreur d'exécuton 2465 : Microsoft ne trouve pas le champs auquel il est fait référence dans votre expression.

[Salsaboy60]

j'ai fait le test et Me.CodeIdentifient me renvoie bien la valeur que je viens de creer.

[jimbolion]

et comme çà

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
DoCmd.OpenForm "frmFactures", acNormal, ,, [tbl_ClientFournisseur]![CodeIdentifient] = Me.CodeIdentifient,  acWindowNormal
DoCmd.Close

[Salsaboy60]

Merci