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 : Sélectionner tout - Visualiser dans une fenêtre à part
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....