Discussion :

[ximunbabel]

Bonjour à tous,
Mon premier post sur ce forum, merci de votre indulgence.
Voici donc ma question :
Sous word 2003, je souhaite avoir 2 champs liés entre eux. Le premier serait une liste déroulante contenant par exemple une liste de références de produits (10 en tout et pour tout), et, le deuxième, une zone de texte qui affiche automatiquement la désignation du produit lorsque sa référence est sélectionnée dans la première liste.
Existe t'il une solution ... pas trop complexe pour réaliser celà.
Mercie d'avance.
Ximun.

[Heureux-oli]

Bonjour et bienvenue sur les forums Office de DVP.

En fait, il en existe au moins deux.

La première, utiliser un Champ Ref
http://heureuxoli.developpez.com/off...hamps/#LIV-D-8

Ou avec un peu de code envoyer le résultat dans un contrôle texte.

Code :

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

1
2
3
4
Sub MiseAjour()
ActiveDocument.FormFields("Text1").Result = ActiveDocument.FormFields("DropDown1").Result
 
End Sub

[ximunbabel]

Merci pour votre réponse, mais, ou dois-je mettre ce bout de code?

[Heureux-oli]

Salut,

Pour le code, jette un oeil à ce tuto
http://heureuxoli.developpez.com/off...ll/?page=page3

Et lorsque ta liste est faite, tu choisis la procédure dans liste déroulant sur sotie de ton contrôle.

[ximunbabel]

Petite précision qui a son importance : je n'ai jamais fait de VBA ...
Je vais donc encore abuser de votre temps en posant des questions au raz des nénuphars (...plus bas qu'une pâquerette .. qqs millimètre au dessus de du niveau de l'eau..)
Revenons-en à nos brebis.
J'ai fait un liste déroulante avec mes références appelée, liste1, et contenant réf1, réf2, ...
J'ai fait un champ texte avec un nom très original : texte1
J'ai créé une macro calcul, avec le code ci-dessus, en ayant pris soin de corriger le nom des champs.
Je suis en suite revenu sur les propriétés de ma liste déroulante, et ai ajouté la macro en exécution à la sortie.
A ce stade, je me doutais bien que je n'allais pas avoir la désignation de mon produit apparaitre miraculeusement dans ma zone de texte. Il faudra bien que je saisisse quelque part un sorte de table de correspondance entre référence produit et désignation ... Mais j'espérais au moins voir cette même référence dans la zone de texte ... et bien même pas.
voilà ou j'en suis ...

[Heureux-oli]

Salut,

Tu n'avais pas dit que ta liste était vide.
Si tu dois peupler ta liste, deux choix, tu tapes la liste à la main, ou alors tu crées une macro pour remplir la liste à l'ouverture du document.

Petite restriction, le nombre d'éléments d'une liste est limité à 25, si tu as plus d'entrées, il faut passer par un UserForm.

[ximunbabel]

Je n'ai pas du être clair dans ma demande.
Je reformule donc :
J'ai une liste déroulante dans laquelle il y a une liste de référence produit (10 en tout, et pas besoin d'interface de saisie, ils seront rentrés une fois pour toute).
... et forcément, dans un coin du document (non visible), une correspondance entre la référence du produit, et sa désignation.
Puis j'ai un champ qui affiche automatiquement la désignation du produit lorsque sa référence est sélectionnée dans la liste déroulante.
Exemple :
si je sélectionne la référence RèfProduit1 dans la liste, automatiquement la désignationDésignationProduit1 apparait dans le deuxième champ.
Est-ce plus clair?
merci encore pour votre aide.

[Heureux-oli]

Oui, c'est un peu plus clair.
Quoi que ?

forcément, dans un coin du document (non visible),

Quel est l'intérêt d'avoir une donnée non visible, si c'est pour la correspondance, il est plus facile de tout faire en une fois avec une macro, sans charger des données invisibles.

[ximunbabel]

bon,
imaginez par exemple un devis.
à un endroit, je choisi ma référence produit dans une liste, et, popopop grace à la magie de word, juste à côté apparait automatiquement la désignation de mon produit.
voilà ce que je veux faire.

[ximunbabel]

Alors?? Pas de piste ou un début d'idée à me proposer??
A bientôt j'espère.

[Heureux-oli]

Salut,

Un petit exemple

[ximunbabel]

Bonjour et merci.
.. cependant, ça ne marche. Est-ce un pb de version? Je suis en office 2003.
a bientôt.

[ximunbabel]

Rebonjour,
Il y qq chose qui m'échappe.
En fait la macro fonctionne si je l'exécute manuellement, et que la protection du formulaire est enlevée. Mais du coup, la liste déroulante n'est pas active.
Par contre, si j'active la protection du formulaire, alors la liste déroulante fonctionne, mais la MAJ du champs de se fait pas. De plus le menu "exécuter macro" est grisé, donc impossible de lancer la macro.
.. je crois qu'il y a un ti truc quej'ai pas compris. ...encore un petit coupde main SVP, on y est presque!!!!
A bientôt.

[Sepia]

Salut,

Pour pouvoir utiliser une liste déroulante de type formulaire, il faut que tu sois en mode "Formulaire" (donc avoir activé la protection du formulaire). Pour la macro, tu peux utiliser l'option "Exécuter la macro" - "à la sortie" mais attention, ceci n'est actif que lorsque le widget (donc toi dans ce cas, ta liste) perd le focus, c'est-à-dire que lorsque "sort du contrôle" (d'où le nom de "Exécuter la macro" - "à la sortie") mais pas lorsque tu changes la valeur dans la liste ==> il faut cliquer ailleurs dans un endroit autorisé pour que ton point d'insertion se déplace et que la macro s'exécute alors).


@+

[ximunbabel]

Merci à tous pour votre aide. J'ai compris comment ca marche!!