Bonjour,

J'ai UserForm avec liste déroulante dans laquelle apparaissent les noms des onglets du classeur. "MENU", "DK"

code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub UserForm_Initialize()
 Call ComboBox1_Initialize
End Sub
 
Private Sub ComboBox1_Change()
  ThisWorkbook.Worksheets(ComboBox1.Value).Activate
End Sub
 
Private Sub ComboBox1_Initialize()
Dim wsh As Worksheet
  ComboBox1.Clear
  For Each wsh In ThisWorkbook.Worksheets
    ComboBox1.AddItem wsh.Name
  Next wsh
End Sub
Comment faire pour :
1° Si l'on rajoute ou supprime des feuilles, la mise à jour se fasse dans la liste déroulante ?

2° Lorque je choisis une feuillle (ex. "MENU") UNIQUEMENT cette feuille apparaisse à l'écran (toues les feuilles doivent toujours être dans la liste déroulante) ?

Merci