les noms des onglets

[petchy]

bonjour le forum

dans un combobox je récupere les noms des onglets,mais j'ai des noms des onglets que je ne veux pas voir apparaitre dans la combo,est ce possible.
voila le code :
Private Sub UserForm_Initialize()
For Each Sht In Sheets
ComboNOM.AddItem Sht.Name
Next Sht
End Sub

merci
@ plus
petchy

 

[omicron]

Bonjour Petchy,

A priori aucun problème, il suffit de tester le nom de la feuille avant de l'ajouter dans la combo

Private Sub UserForm_Initialize()
For Each Sht In Sheets
if Sht.Name <> "xxx" and Sht.Name <> "yyy" and ..... Then _
ComboNOM.AddItem Sht.Name
Next Sht
End Sub

Si la liste des exceptions est vraiement longue, il faudra passer par un autre artifice. Exemple tableau des feuilles à ignorer, couleur des onglets des feuilles à ne pas inventorier, .....)

Cordialement.

Omicron.

 

[petchy]

bonjour Omicron

merci Omicron pour le code,ça fonctionne super bien.

@ plus
petchy