Choix combobox sélectionne la ligne

Marc_du_78 · 31 Mars 2006

Bonjour le Forum,
Je suis à la recheche du code qui me permettrait de sélectionner toute la ligne correspondante au choix effectuée dans un Conbobox.
Je vous remercie.

AeroPlanneur · 31 Mars 2006

bonjour Marc,

pour un combobox (issu de la boîte à outils contrôles) placé sur la feuil1 :

Rows(Feuil1.ComboBox1.ListIndex + 1).EntireRow.Select

pour un combobox sur un UserForm :

Rows(UserForm1.ComboBox1.ListIndex + 1).EntireRow.Select

A adapter le décalage (ListIndex + ...) selon tes paramêtres.

Cordialement

Marc_du_78 · 31 Mars 2006

Bonjour AeroPlanneur,
Je te remercie de cette info que je vais m'empresser de mettre à profit.
En te souhaitant bon vent. Week end ensoleillé vent faible et les cumulus arrivent.
Au plaisir.

Robert · 31 Mars 2006

Bonjour Marc, bonjour le forum,

Si ta combobox est remplie de tous les éléments dans l'ordre (par exemple avec ComboBox1.List=Range('A2:A' & Range('A65536').End(xlUp).Row).Value)), La propriété ListIndex permet d'obtenir le numéro de ligne correpondant. Sachant que le premier élément à l'index 0, si il démarre à la ligne 2 on a donc le numéro de ligne = ComboBox1.Listindex + 2.

Regarde l'exemple en pièce jointe qui reprend ce que je t'explique. [file name=Marc_20060331173041.zip size=9174]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Marc_20060331173041.zip[/file]

Édition :

Hou la la !!! Pas frais sur ce coup là... Bonjour Aeroplanneur.

Message édité par: Robert, à: 31/03/2006 17:35

AeroPlanneur · 31 Mars 2006

merci Marc pour ces prévisions météo
'Week end ensoleillé vent faible ... et les cumulus arrivent'.
Je ne retiendrais que la première partie de tes prophéties.

Bon week-end à toi aussi

Marc_du_78 · 31 Mars 2006

Bonjour Robert, re AéroPlanneur
Si je comprends b ien ca souffle chez toi.
Merci Robert, je prends note car je sais que ca me servira un jour où l'autre.
En pj ce que j'ai réussi à faire grâce à vous.
En vous remerciant bien fort. [file name=UsfEtape3SuppressionLigne.zip size=24416]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/UsfEtape3SuppressionLigne.zip[/file]

Robert · 31 Mars 2006

Bonsoir le fil, bonsoir le forum,

Deux remarques Marc.
1. Tu effaces la ligne mais tu ne la supprime pas. J'aurais plutôt écrit :

Rows(UserFormSupprimer.CbxVhs.ListIndex + 3).Delete

afin d'évier les lignes vides (trous) plutôt que :

Rows(UserFormSupprimer.CbxVhs.ListIndex + 3).EntireRow.Select
Selection.Clear

2. Avec le système Hide (qui te permet de conserver la ListIndex de la ComboBox), ton premier Userform n'est pas mis à jour après une suppression. En pièce jointe j'ai repris ton fichier et je l'ai adpaté. J'ai préféré déclarer la variable li comme publique dans un module standard. Fermer le premier UserForm à l'ouverture du second et rouvrir le premier à la fermeture.La liste est toujours actualisée après supression. [file name=UsfEtape3SuppressionLigne_v2.zip size=21995]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/UsfEtape3SuppressionLigne_v2.zip[/file]

Marc_du_78 · 1 Avril 2006

Bonjour Robert,
Je vois que j'ai bien fait de joindre le fichier et je te remercie pour tes explications, j'ai donc modifié en conséquence.
En te souhaitant un bon Week end et a+

farid · 15 Novembre 2022

Robert à dit:
Bonjour Marc, bonjour le forum,

Si ta combobox est remplie de tous les éléments dans l'ordre (par exemple avec ComboBox1.List=Range('A2:A' & Range('A65536').End(xlUp).Row).Value)), La propriété ListIndex permet d'obtenir le numéro de ligne correpondant. Sachant que le premier élément à l'index 0, si il démarre à la ligne 2 on a donc le numéro de ligne = ComboBox1.Listindex + 2.

Regarde l'exemple en pièce jointe qui reprend ce que je t'explique. [file name=Marc_20060331173041.zip size=9174]http://www.excel-downloads.com/comp...uploaded/files/Marc_20060331173041.zip[/file]

Édition :

Hou la la !!! Pas frais sur ce coup là... Bonjour Aeroplanneur.

Message édité par: Robert, à: 31/03/2006 17:35

merci , c'est ce qu'il me fallait. Cordialement

Choix combobox sélectionne la ligne

Marc_du_78

XLDnaute Accro

AeroPlanneur

Guest

Marc_du_78

XLDnaute Accro

Robert

XLDnaute Barbatruc

Pièces jointes

AeroPlanneur

Guest

Marc_du_78

XLDnaute Accro

Pièces jointes

Robert

XLDnaute Barbatruc

Pièces jointes

Marc_du_78

XLDnaute Accro

farid

XLDnaute Occasionnel

Discussions similaires