Importation de donnés dans listbox
Bonjour,
je sollicite votre aide car j'ai un souci de remplissage de Listbox.
Je veux une listbox à une colonne remplis à partir de colonne dans ma worksheets(1) (e.g : A1 B1 C1 etc) cependant, uniquement la valeur de la première colonne apparaît (A1) je n'arrive pas à avoir les autres voilà mon code:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
| Private Sub UserForm_Initialize()
Dim strAddress As String
strAddress = Worksheets(1).Range("A1").End(xlToRight).Address --> strAddress prend bien la bonne valeur (L1) dans la fenetre espion
With ListBox1
.ColumnHeads = False
.MultiSelect = fmMultiSelectExtended
.RowSource = "A1:" & strAddress
End With
End Sub |
Ce qui me surprend c'est que ça marche si je prend les lignes (en utilisant donc end(xldown) à la place)
Par avance merci de votre aide !