afficher une liste de feuilles

[bobjazz]

Bonsoir le Forum

voila j'ouvre un combobox1 qui va chercher la liste des feuilles du classeur dans un combobox2, mais j'aimerai afficher qu'une partie des feuilles, et je coince.
Je met le code qui me sert

Private Sub UserForm_Initialize()

' On initialise sans la feuille interface pour les feuilles des mois
Dim WS As Worksheet
For Each WS In ThisWorkbook.Worksheets
If WS.Name <> 'Interface' Then
ComboBox1.AddItem WS.Name
End If
Next

' Demande d'obligation
With Me
.TextBox1 = Date
.ComboBox1.MatchRequired = True
.ComboBox2.MatchRequired = True
.Caption = T
End With
End Sub

Merci d'avance, je coince

 

[bobjazz]

Re Bonsoir

Pardon, j'ai oublié, mais je voudrais juste aller chercher que 2 feuilles, par exemples, Vehicules et Cartes
il y a 12 autres feuilles qui sont les mois de l'année, mais qui me servent pour autre chose

Merci d'avance