Bonjour,
Je souhaiterai que ma listebox me trie par ordre de premiers chiffres puis ensuite alphabétiquement...
J'ai plusieurs feuilles qui contiennent dans la cellule(1,8) le mot VERSION. Quand ce dernier existe dans une feuille alors il apparait dans la liste box. Cependant, je rajoute de plus en plus de feuilles contenant ce mot mais rien n'est classé dans mon listbox.
Ex: de haut en bas: 3245A,N1912X, ESG-B,856XX....
Je voudrais avoir de haut en bas: 3245A, 856XX,ESG-B, N1912X...
Voic mon prog:
Private Sub UserForm_Initialize()
ComboBox1.Clear
For Each X In Sheets
If X.Cells(1, 8).Value = "VERSION" Then
ComboBox1.AddItem X.Name
End If
Next X
End Sub
Merci d'avance
Je souhaiterai que ma listebox me trie par ordre de premiers chiffres puis ensuite alphabétiquement...
J'ai plusieurs feuilles qui contiennent dans la cellule(1,8) le mot VERSION. Quand ce dernier existe dans une feuille alors il apparait dans la liste box. Cependant, je rajoute de plus en plus de feuilles contenant ce mot mais rien n'est classé dans mon listbox.
Ex: de haut en bas: 3245A,N1912X, ESG-B,856XX....
Je voudrais avoir de haut en bas: 3245A, 856XX,ESG-B, N1912X...
Voic mon prog:
Private Sub UserForm_Initialize()
ComboBox1.Clear
For Each X In Sheets
If X.Cells(1, 8).Value = "VERSION" Then
ComboBox1.AddItem X.Name
End If
Next X
End Sub
Merci d'avance