2 combo de recherches sur le même form
Le
Jean-Marc
Salut à tous,
Je ne trouve pas mon bonheur. Est-ce parce que c'est trop simple ou parce
que je cherche mal, je ne sais pas.
Voici ma question :
Dans une bdd pour gérer les achats de ma société, j'ai un form avec tous les
produits. J'ai un combo sur le nom du produit qui me sert à rechercher un
produit et à ajouter un nouveau produit si celui entré n'est pas dans la
liste. Jusque là rien que du classique.
Je voudrais ajouter un autre combo, du même type, mais sur le champs du
NrRéfProduit.
Rien de compliqué, me semblait-il.
pourtant si je fais une recherche sur un des 2 combo, le produit sélectionné
s'affiche correctement, mais je n'arrive pas à mettre l'autre combo à jour.
Par exemple je sélectionne un produit par son NrRéf. Le bon produit
apparaît, mais le combo du nom reste figé sur l'ancien produit. Cela ne
concorde donc plus.
La solution doit être toute simple, mais je tourne en rond depuis hier et je
ne trouve pas.
J'ai ressayé me.recalc, me.requery, ListeNomProduit.requery dans le code de
MAJ de ListeNrRéfProduit, etc mais rien n'y fait.
Merci de vos z'avis z'avisés,
Jean-Marc
Je ne trouve pas mon bonheur. Est-ce parce que c'est trop simple ou parce
que je cherche mal, je ne sais pas.
Voici ma question :
Dans une bdd pour gérer les achats de ma société, j'ai un form avec tous les
produits. J'ai un combo sur le nom du produit qui me sert à rechercher un
produit et à ajouter un nouveau produit si celui entré n'est pas dans la
liste. Jusque là rien que du classique.
Je voudrais ajouter un autre combo, du même type, mais sur le champs du
NrRéfProduit.
Rien de compliqué, me semblait-il.
pourtant si je fais une recherche sur un des 2 combo, le produit sélectionné
s'affiche correctement, mais je n'arrive pas à mettre l'autre combo à jour.
Par exemple je sélectionne un produit par son NrRéf. Le bon produit
apparaît, mais le combo du nom reste figé sur l'ancien produit. Cela ne
concorde donc plus.
La solution doit être toute simple, mais je tourne en rond depuis hier et je
ne trouve pas.
J'ai ressayé me.recalc, me.requery, ListeNomProduit.requery dans le code de
MAJ de ListeNrRéfProduit, etc mais rien n'y fait.
Merci de vos z'avis z'avisés,
Jean-Marc

Poser une question


il faut que tu actualises les 2 listes après MAJ de chacune d'entre
elles.
Supposons que la 1ere liste s'appelle Modifiable8 et a 1 colonne
contenant le nom du produit
La 2eme liste Modifiable10, une colonne contenant les reférences des
produits.
Les 2 listes sont dans le même ordre, c'est a dire liste non triée des
noms et liste non triée des références (les données sont prises dans la
même table dans le même ordre suivant l'index)
je mettrai :
Private Sub Modifiable8_AfterUpdate() ' pour les NOMS
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NomArticle] = '" & Me![Modifiable8] & "'"
Me.Modifiable10.Value = Me.Modifiable10.ItemData
(Me.Modifiable8.ListIndex)
Me.Bookmark = rs.Bookmark
End Sub
Private Sub Modifiable10_AfterUpdate() ' pour les REFERENCES
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[RefArticle] = '" & Me![Modifiable10] & "'"
Me.Bookmark = rs.Bookmark
Me.Modifiable8.Value = Me.Modifiable8.ItemData
(Me.Modifiable10.ListIndex)
End Sub
Ca répond à ton besoin ?
Attention au retour à la ligne intempestif
sur les instructions Me.Modifiablex.Value = ...
A+
Eric
"Jean-Marc" news::
Je comprend ce dont tu parles, toutefois les listes ne sont pas tout à fait
identiques. Elles viennent en effet de la même table, mais sont triés en
ordre alpha, or les noms des produits ne sont pas forcément dans me même
ordre que les NrRefProduit.
Par contre, la colonne de réf des 2 listes est la même, à savoir, le
NrProduit (à ne pas confondre avec NrRefProduit, NrProduit étant NumAuto et
NrRéfProduit étant le numéro de référence du produit chez le fournisseur).
Verrais-tu un moyen de mettre à jour l'autre table à partir du NrProduit qui
est, je le rappelle, la colonne cachée de référence des 2 listes ?
Merci de ton aide,
Jean-Marc
"Eric" news:
Ma lumière vient de s'allumer. Oui oui, je sais, c'est tout au plus une
bougie, mais bon ... Lol
Dans le MAJ il suffit de ListeNomProduit = ListeNrRéfProduit et
inversément dans le MAJ de l'autre liste.
Comme je disais, c'était trop simple et je cherchais beaucoup trop loin.
Notre conversation m'a aidé à simplifier ma question, et donc à en trouver
la réponse.
Merci Eric,
Jean-Marc
"Jean-Marc" news:ZrYvd.11553$%
Dans ce cas là, tu mets
Me.ListeNrRéfProduit = Me.ListeNomProduit sur la proc
ListeNomProduit _AfterUpdate()
et
Me.ListeNomProduit = Me.ListeNrRéfProduit sur la proc
ListeNrRéfProduit_AfterUpdate()
Ca devrait faire l'affaire puisque les 2 listes ont en colonne cachée
NrProduit.
OK ?
Eric
"Jean-Marc" news:ZrYvd.11553$%:
J'ai posté la même chose d'ailleurs quelques minutes après toi mais je
récupères les posts avec retard, je comprends pas pourquoi.
A+
Eric