Code VBA pour alimenter une combobox

Résolu
medbo Messages postés 570 Statut Membre -  
medbo Messages postés 570 Statut Membre -
Bonjour,

je veux alimenter une combobox des valeurs d'une colonne A mais seulement les valeurs auquelles correspond des chanmps vides de la colonne F

comment faire, y a t-il un code VBA pour ?

merci pour vos réponces.



--
c'est en s'entre-aidons que nous réussirons

1 réponse

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,
    Essaye [code non testé] :
    'déclaration des variables
    Dim Lig As Integer, DernLig As Integer
    'on attribue à "DernLig" le numéro de la dernière cellule non vide col A
    DernLig = Range("A65536").End(xlUp).Row
    'on boucle de la ligne 2 (s'il y a une ligne d'entête) à la dernière ligne
    For Lig = 2 To DernLig
        'on teste le contenu de la cellule en col F
        If Cells(Lig, 6) = "" Then
            'Si F est vide alors on alimente la combo avec la valeur col A
            Combobox1.AddItem Cells(Lig, 1)
        'fin du test
        End If
    'ligne suivante s'il vous plait...
    Next Lig
    1
    1. medbo Messages postés 570 Statut Membre 29
       
      Ça marche très bien, Merci Beaucoup
      0