j'aimerai qu'un de mes combobox s'alimente directement avec une plage de donnée

  • Initiateur de la discussion Erika
  • Date de début
E

Erika

Guest
Bonjour,

J'ai un petit problème, dans le cadre de mes études je fais un projet excel et vba sur la gestion de video club....j'aimerai beaucoup que vous m'aidiez; g une base client qui s'alimente toujours automatiquement dans une plage de cellule (B6:B65000). j'aimerai que les noms de mes clients aillent directement dans un combobox et après que quand je sélectionne un nom dans celui-ci il surligne le nom de mon client en quetion.
Merci de m'aider, ce projet est vraiment très important pour moi!
 
R

Ronan

Guest
Bonsoir,

Du genre :

Code à insérer dans un userform nommé userform1 et contenant un combobox nommé combobox1

Public Ligne As Long

Private Sub ComboBox1_Change()

'Annulation du précédent surlignage
Cells(Ligne, 2).Font.Underline = xlUnderlineStyleNone

If UserForm1.ComboBox1.ListIndex = -1 Then Exit Sub

'Affectation du numéro de la ligne dans le tableau
Ligne = UserForm1.ComboBox1.ListIndex + 6

'Surlignage de la cellule concernée
Cells(Ligne, 2).Font.Underline = xlUnderlineStyleSingle

End Sub

Private Sub UserForm_Initialize()

'Recherche de la dernière ligne du tableau
Ligne = Sheets("feuil1").Cells(65536, 2).End(xlUp).Row

'Affectation de la liste des clients au combobox
UserForm1.ComboBox1.RowSource = "=Feuil1!$B$6:$B$" & Ligne

End Sub

@+

Ronan
 
E

Erika

Guest
Tout d'abord un grand merci à vous,

Je sens que c'est ça mais il y a quelques chose qui ne fonctionne pas .....
je vais essayer de trouver le bug sinon j'enverrai mon projet sur le net!
Merci encore
 

Discussions similaires

Statistiques des forums

Discussions
314 197
Messages
2 107 040
Membres
109 743
dernier inscrit
TROMBATI