Rowsource d'une listBox sur une ligne

Bonsoir

Mon problème est que je voudrai ajouter à mon listbox des valeurs qui se trouve sur une ligne donc je suis d'abord passé par le Rowsource basique mais vu que cette ligne contient des espaces, le listbox m'affiche uniquement ma première valeur.

Mes valeurs commencent à partir de la valeur G9 et pour information mon listbox se trouve dans le userform MaintenanceForm.

titre

Merci d'avance

Salut Remy,

essaie comme ca

Private Sub UserForm_Initialize()
Dim rngSource As Range
Dim rng As Range

Set rngSource = Worksheets("Maintenance").Range("G9:M9")

    For Each rng In rngSource
    If rng <> "" Then ListBox1.AddItem rng
    Next

End Sub

Bonjour

déjà faire du nettoyage

voir pour Combobox

Private Sub UserForm_Initialize()
Comb = Array("No", "Yes")
    For C = 1 To 38
        Controls("ComboBox" & C).List = Comb
        Controls("ComboBox" & C).Style = 2
        Controls("ComboBox" & C).ListIndex = 0
    Next C

A+

Maurice

Merci beaucoup m3ellem1 cela fonctionne parfaitement et merci aussi archer c'est un peu plus lisible maintenant

Rechercher des sujets similaires à "rowsource listbox ligne"