[-resoluto-]selection d'une liste deroulante dans ccombobox

Forum Bonsoir

ci joint un fichier test , je souhaite afficher dans le Combobx1 que les feuilles qui commence leurs nom par " chiffre.Texte...." seulement

exemple : si j'ai feuille nommée 12.ILINO.ITA.2015 il doit etre affiché dans la liste de Combobox

grazie

Bonsoir Ilino, bonsoir le forum,

Peut-être comme ça :

Private Sub Workbook_Open()
Dim Sh As Worksheet

Sheets("Accueil").Visible = -1
Cache ("Accueil")
ActiveSheet.ComboBox1.Clear
For Each Sh In Sheets
    If Sh.Name <> "Accueil" Then
        If InStr(Sh.Name, ".") <> 0 Then
            If IsNumeric(Split(Sh.Name, ".")(0)) = True And IsNumeric(Split(Sh.Name, ".")(1)) = False Then _
            ActiveSheet.ComboBox1.AddItem Sh.Name
        End If
    End If
Next Sh
ActiveSheet.ComboBox1 = ""
End Sub

Bonjour Thau

c'est nickel

GRAZIE, mon souci est résolut

A+

Rechercher des sujets similaires à "resoluto selection liste deroulante ccombobox"