Liste de valeurs dans ma liste combobox vident

CogburnGrit -  
 CogburnGrit -

Bonjour,

J'ai besoin d'alimenter une ComboBox dans un formulaire via une plage de données.

J'ai ce code :

    Dim Line As Integer
    Dim Column As Integer

    Line = 2
    Column = 2


    Do While ThisWorkbook.Sheets("Suivi").Cells(Line, Column).Value <> ""

    Ligne = ThisWorkbook.Sheets("Suivi").Cells(Line, Column).Value
    Form_Embauche.ComboBox_Ligne.AddItem
    Line = Line + 1


    Loop

    End Sub

Cela me permet d'alimenter ma liste déroulante jusqu'à la dernière ligne non vide de ma colonne (le tableau étant régulièrement alimenté je veux que mes choix s'ajoutent et apparaissent comme choix au fur et à mesure).

Ma ComboBox détecte bien les valeurs (plus il y a de valeurs plus la liste est longue) mais tous les choix sont blancs/vides.

Une idée d'où pourrait venir le problème ?
Windows / Chrome 108.0.0.0

A voir également:

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 

Bonjour,

voir ceci

dans cette ligne de code que fait Ligne?

Ligne = ThisWorkbook.Sheets("Suivi").Cells(Line, Column).Value

0
CogburnGrit
 

Bonjour,

Merci pour la réponse et la doc du lien.

Merci pour le point d'attention, je n'avais pas fait attention que le "Ligne" n'était pas renseigné par la suite 

Voici ce que je devais avoir (en gras ce qui me manquait) :

    Ligne = ThisWorkbook.Sheets("Suivi").Cells(Line, Column).Value
    Form_Embauche.ComboBox_Ligne.AddItem (Ligne)
    Line = Line + 1

Du coup en rajoutant "Ligne" entre parenthèse la liste affiche bien mes données

0