Liste de validation et macro

Bonsoir,

Il existe dans VBA des procédures évènementielles dont celle-ci :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

permettant le déclenchement d'un évènement à chaque nouvelle sélection de cellule.

Je cherche à pouvoir déclencher un évènement en changeant le champs d'une liste de validation. Voir mon exemple ci-joint. Actuellement, je fait apparaître la photo correspondant au prénom (de L1 à O1) en cliquant sur la cellule.

Je souhaite pouvoir faire apparaître la photo en changeant le prénom de la liste de validation.

(a vous de recréer les liens des photos sur votre poste)

Merci d'avance.

Dadams

12version-dl.xlsm (15.98 Ko)

Bonsoir,

Utilises la procédure événementielle "Worksheet_Change()" !

Salut,

En effet Theze à raison c'est plutôt dans le Change

Ou se situe ton problème en fait? tu ne sais pas faire une liste de validation car ta macro à l'air niquel

Dans la cellule que tu veux par exemple ta L1

Données => Validation des données => Validation des données => Option/Autoriser : Liste => Source : Pierre;Paul;Jacques

Ta macro de la case L1 devrait fonctionner sans soucis si tu la mets dans ton Worksheet_Change

Par contre je vois un problème pointer le bout de son nez, tu gères l'ajout d'image ... sans t'occuper de les détruire fait attention ^^

Si on change 10 fois entre Pierre et Paul tu auras ppllleeeeinn de photos, détruit l'ancienne photo qui existe avant de recharger une nouvelle

ECG

Bonjour

Un essai à tester. Te convient-il ?

Bye !

15version-dl-v1.xlsm (20.68 Ko)

Merci pour vos réponses,

mais effectivement les images se superposent...comment l'éviter ?

Je pensais mettre ça avant le IF, mais ça ne marche pas

For Each Shape In ActiveSheet.Shapes

Shape.Delete

Next

Salutations,

Dadams


Bonsoir GMB,

Ta solution ne marche pas chez moi... Il ne se passe rien au changement de champ de liste de validation). Et je ne vois pas à quoi est liée la petite procédure Evenement()...

A+

Dadams

ta boucle fonctionne très bien chez moi, bizarre

Tu as la bonne feuille d'active?

Sinon quand tu insères l'image tu pourrais la renommer pour lui donner toujours le même nom genre IMAGE et comme ca avant ta nouvelle insertion tu fais un

sheets("Feuil1").shapes("IMAGE").delete

ECG

Rechercher des sujets similaires à "liste validation macro"