Magic_Doctor
XLDnaute Barbatruc
Bonjour,
Je veux dresser une liste d'une ComboBox contenue dans un USF.
Cette liste reprend tous les éléments d'une plage nommée : "plagefamTF1"
J'ai écrit ceci :
C'est très curieux parce que ça marche, mais bizarrement. J'ouvre l'USF, le 1er item de la liste apparaît bien, mais en revanche les autres sont invisibles. Je clique dans la liste (qui semble vierge) et alors l'item sélectionné apparaît.
À quoi cette curiosité est-elle due ?
Merci pour toute explication.
Je veux dresser une liste d'une ComboBox contenue dans un USF.
Cette liste reprend tous les éléments d'une plage nommée : "plagefamTF1"
J'ai écrit ceci :
VB:
Private Sub UserForm_Initialize()
Dim dico As Object, i as Byte
Set dico = CreateObject("Scripting.Dictionary")
For i = 1 To [plagefamTF1].Rows.Count 'rempli le dictionnaire avec les noms contenus dans la plage nommée "plagefamTF1"
dico([plagefamTF1].item(i)) = ""
Next i
Me.ComboBox.List = dico.keys 'dresse la liste de la ComboBox à partir du dictionnaire
Me.ComboBox.ListIndex = 0 'sélection par défaut du 1er item de la liste de la ComboBox lors de l'ouverture de l'USF
End SubÀ quoi cette curiosité est-elle due ?
Merci pour toute explication.
Dernière édition: