probleme remplissage listbox avec une collection
Bonjour
Je suis pas sur a l'aise avec vba et j'ai un petit soucis avec le remplissage d'une listbox.
J'ai créé une collection contenant des noms de champs Excel et je veux remplir une Listbox avec ces noms.
La listbox se rempli bien mais les éléments ne sont pas "visible".... Je ne comprend pas d'ou vient le problème.
mon code
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
' recuperation des champs Excel
Dim ListingFieldsList As Collection
Dim Field
Set ListingFieldsList = New Collection
For Each Field In MergeFields
ListingFieldsList.Add (Field)
Next Field
Set myForm = New frmMAForm
With myForm
' recup des champs Excel et remplissage des combobox liées
With .lstMergeFields
Dim Item As Variant
For Each Item In ListingFieldsList
.AddItem (Item)
Next Item
End With |
Une idée? cela doit être tout con mais je ne vois pas....
