Comment faire pour créer une liste déroulante qui se mette à jour automatiquement ?

Voici une façon simple de construire une liste déroulante et de faire sa mise à jour.
A) Quelque part dans ta feuille où sera mise la liste déroulante, Inscrit un item de ta liste par cellule contigue(important). Pour les besoins de la simplicité ici, assure-toi, que les cellule autour de ta liste sont vides....
B) À partir de la barre d'outils Contrôles(pas Formulaires) crée une liste déroulante sur ta feuille.
C) En mode création, double-clique sur le contrôle de liste déroulante.
D) Choisi dans la liste déroulante de droite de la fenêtre de l'éditeur VBA, l'événement "GotFocus" Voici ce que ça donne:

Private sub ComboBox1_GotFocus()
 
 Dim Adresse As String
 Adresse = Sheets("Feuil1").Range("A1").CurrentRegion.Address
 ComboBox1.ListFillRange = Adresse
 
 end sub

Dans le code précédent remplace A1 par l'adresse de la cellule de ta première valeur de la liste des items de la liste déroulante. Voilà, le tour est joué. A chaque fois que tu cliqueras sur ta liste déroulante, le code s'exécutera et ta liste sera toujours à jour. Il y a plusieurs façon d'initialiser une liste déroulante, et plusieurs événements peuvent être utilisé pour la mise à jour de ses items. Disons que celle-ci à l'avantage d'être rapide et simple à mettre en branle...