maval XLDnaute Barbatruc 1 Mai 2016 #1 Bonjour Je suis à la recherche d'un code VBA pour renvoyer le n° de la ligne vers un label "LabelIndex" en fonction de la valeur d'un textbox1 je joint mon fichier Je vous remercie Pièces jointes Formulaire aller à la ligne.xlsm 45.6 KB · Affichages: 22 Formulaire aller à la ligne.xlsm 45.6 KB · Affichages: 23
Bonjour Je suis à la recherche d'un code VBA pour renvoyer le n° de la ligne vers un label "LabelIndex" en fonction de la valeur d'un textbox1 je joint mon fichier Je vous remercie
M12 XLDnaute Accro 1 Mai 2016 #2 Re : Renvoie N° de ligne Bonjour Une proposition Pièces jointes Formulaire aller à la ligne.xlsm 45.4 KB · Affichages: 20 Formulaire aller à la ligne.xlsm 45.4 KB · Affichages: 16 Vote positif 0 Vote négatif
Lone-wolf XLDnaute Barbatruc 1 Mai 2016 #3 Re : Renvoie N° de ligne Bonsoir Max Code: Private Sub Cbox_Noms_Click() Sheets("Feuil1").Cells(CBox_Noms.ListIndex + 2, 2).Select ' (9, 2) 9éme ligne 2 éme colonne Me.LabelIndex = CBox_Noms.ListIndex + 2 End Sub Vote positif 0 Vote négatif
Re : Renvoie N° de ligne Bonsoir Max Code: Private Sub Cbox_Noms_Click() Sheets("Feuil1").Cells(CBox_Noms.ListIndex + 2, 2).Select ' (9, 2) 9éme ligne 2 éme colonne Me.LabelIndex = CBox_Noms.ListIndex + 2 End Sub
C CPk XLDnaute Impliqué 1 Mai 2016 #4 Re : Renvoie N° de ligne Bonjour, dans l'evenement combobox_change il faut rajouter Code: LabelIndex.Caption = CBox_Noms.ListIndex + 2 Vote positif 0 Vote négatif
Re : Renvoie N° de ligne Bonjour, dans l'evenement combobox_change il faut rajouter Code: LabelIndex.Caption = CBox_Noms.ListIndex + 2
maval XLDnaute Barbatruc 1 Mai 2016 #5 Re : Renvoie N° de ligne Bonsoir à tous Je vous remercie cela est Nickel Vote positif 0 Vote négatif