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
Une idée? cela doit être tout con mais je ne vois pas....
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
Partager