Code VBA pour alimenter une combobox

Résolu/Fermé
medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 - 13 avril 2011 à 18:42
medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 - 13 avril 2011 à 19:06
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.


A voir également:

1 réponse

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
13 avril 2011 à 18:48
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
medbo Messages postés 551 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 24 mars 2019 29
13 avril 2011 à 19:06
Ça marche très bien, Merci Beaucoup
0