Menu déroulant et cellule liées

Bonjour à tous !

J'ai besoin d'aide pour trouver la solution au "problème" suivant :

Je souhaiterai en choisissant dans le planning le nom du chantier dans le menu déroulant (chantier1, chantier2, ...) que figure dans le planning non pas le nom du chantier mais le code chantier lié (voir feuille "BDD").

Je vous joins un exemple :

Merci par avance pour votre aide =)

Bonne journée !

Bonjour,

un essai en ayant "tout" mis en tableau structuré avec des noms "accrocheurs" :

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Cel As Range, Plage As Range
    If Target.CountLarge > 1 Then Exit Sub
    If Not Intersect(Target, Range("PlanningChantier[[Jour 1]:[Jour 10]]")) Is Nothing Then
        Set Plage = Sheets("BDD").ListObjects("Correspondances").ListColumns("Nom Chantier").DataBodyRange
        Set Cel = Plage.Find(Target.Value)
        If Not Cel Is Nothing Then
            Application.EnableEvents = False
                Target.Value = Cel.Offset(, 1).Value
            Application.EnableEvents = True
        End If
    End If
End Sub

Code événementiel sur la surveillance "Change" de la feuille "Planning".

Le fichier :

@ bientôt

LouReeD

Bonjour LouReeD,

Merci pour ta réponse, ca fonctionne parfaitement !

Merci de votre retour et remerciement !

@ bientôt

LouReeD