bobjazz
XLDnaute Impliqué
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
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