Liste Dans Un Combobox

[matrix]

Bonjour,

Je voudrais modifier le script pour la liste qui apparait dans le comboBox.

Voici le script:

Sheets("Listes").Select
ComboBox3.RowSource = "E2:E12" 'ta plage de données
If ComboBox3.Value = "E2" Then
Sheets("Tableau Général").Select
End If
Sheets("Tableau Général").Select

Le problème est que si j'ajoute un nom de plus dans la liste, je dois modifier le code pour qu'il ajoute les ligne de plus. comme dans l'exemple plus haut.

ComboBox3.RowSource = "E2:E12" 'ta plage de données

devient

ComboBox3.RowSource = "E2:E20" 'ta plage de données

Comment faire pour que ça s'ajuste tout seul même si j'ajoute des nom dans la liste?


Merci pour votre aide.

🙂

 

[wilfried_42]

Re : Liste Dans Un Combobox

Bonjour

essaye cela

ComboBox3.RowSource = "E2:E" & Sheets("Mafeuille").range("E65536").end(xlup).row

Sheets("Mafeuille").range("E65536").end(xlup).row ' te donne la derniere ligne non vide

 

[matrix]

Re : Liste Dans Un Combobox

Merci.

Lorsque je regarde dans le ComboBox3, je suis sur la feuille "Tableau Général" mais la liste du ComboBox3 est dans la feuille "Listes".

Avec le script que tu m'as donnée, il me donne la liste qui ce trouve dans la feuille "Tableau Général" dans la colonne E au lieu de la feuille "Listes".

 

[matrix]

Re : Liste Dans Un Combobox

Je viens de trouver

With Sheets("Listes")
    Plage = .Range("E2:E" & .Range("E65536").End(xlUp).Row).Address
End With
ComboBox3.RowSource = "Listes!" & Plage

Merci pour ton aide wilfried_42 🙂 grace à une partie de ton code, j'ai trouvé une façon de le faire.

Merci encore!