n° de ligne dans 2 listbox

[jtitin]

bonjour à tous

je cherche à afficher le n° de ligne de la feuil1 dans 2 listbox
je filtre dans la 1ere (listbox1) avec affichage sur 2 colonnes
et donc là il me faut en 2eme colonne listbox1 le N° de la ligne
ensuite j'affiche dans la listbox3 le résultat du filtre listbox1
et donc là aussi il me faut en 3eme colonne listbox3 le N° de la ligne

mais comment faire ??

merci pour votre aide

 

[gilbert_RGI]

Re : n° de ligne dans 2 listbox

bonjour à tous

je cherche à afficher le n° de ligne de la feuil1 dans 2 listbox
je filtre dans la 1ere (listbox1) avec affichage sur 2 colonnes
et donc là il me faut en 2eme colonne listbox1 le N° de la ligne
ensuite j'affiche dans la listbox3 le résultat du filtre listbox1
et donc là aussi il me faut en 3eme colonne listbox3 le N° de la ligne

mais comment faire ??

merci pour votre aide

Bonjour

il existe la fonction =LIGNE()

Cdlt

Gilbert_RGI

 

[jtitin]

Re : n° de ligne dans 2 listbox

re bonjour
merci gilbert_RGI pour ta réponse
mais comment intégrer cete fonction dans l'userform ??

j'ai fait fait une petite erreur, en fait c'est uniquement dans la listbox3 que je souhaite faire apparaitre le n° de ligne

merci

 

[gilbert_RGI]

Re : n° de ligne dans 2 listbox

dans ton tableau inseres une colonne et tu mets le n° de ligne = ligne()-4 et tu tires sur la poignée de recopie vers le bas

ensuite dans le code du listbox tu ajoutes une colonne (11)

et dans le additem à l'emplacement indiqué tu mets le bon n°

ce qui devrait donner ça en PJ

Cdlt

Gilbert_RGI

 

[jtitin]

Re : n° de ligne dans 2 listbox

merci encore pour ta réponse
mais en fait ce c'est pas un numéro du tableau mais le numéro de ligne de la feuil1
correspondant aux valeurs affichées dans la listbox3

merci

 

[kjin]

Re : n° de ligne dans 2 listbox

Bonjour,
N° de ligne dans la listbox3 OK, par contre dans la listbox1 😕
A+
kjin

 

[jtitin]

Re : n° de ligne dans 2 listbox

merci kjin

ta solution fonctionne
mais existe il une autre solution, juste en ajoutant quelques lignes aux macros dont je me ser dans mon fichier joint ???.
j'ai allégé le fichier et si j'applique ta solution il faut que je modifie pas mal de chose

merci

 

[kjin]

Re : n° de ligne dans 2 listbox

Re,
Re,
Il me semble pourtant que se soit le plus rationnel mais bon
il faut redimmensionner tableau initial pour y ajouter les N° de lignes
Avec la méthode AddItem, tu ne peux pas alimenter plus de 10 colonnes, donc j'en ai supprimer une, sinon créer un nouveau tableau issu du premier et utiliser la méthode List
A+
kjin

 

[jtitin]

Re : n° de ligne dans 2 listbox

avec un peu de retard
merci kjin pour tes réponses et conseils

 

[kjin]

Re : n° de ligne dans 2 listbox

Re,
J'avais codé en dur pour les tests et j'ai oublier de faire la modif finale
Remplace le code d' initialisation de la listbox3 par celui-ci (ça ne change rien au résultat mais si tu viens à changer la taille de ton tableau ça t'éviteras de faire les modifs nécessaires)

Private Sub listini3()
Dim x As Integer, j As Integer
ListBox3.Clear

For i = 1 To UBound(Tablo, 1)
    If CStr(Tablo(i, 3)) = ListBox1 Then
    x = ListBox3.ListCount
        ListBox3.AddItem Tablo(i, 1)
        ListBox3.List(x, 1) = Tablo(i, 2)
        ListBox3.List(x, 2) = "Ligne " & [B][COLOR="Blue"]Tablo(i, UBound(Tablo, 2))[/COLOR][/B]
        For j = 3 To 9
            ListBox3.List(x, j) = Tablo(i, j + 1)
        Next
    End If
Next i

End Sub

A+
kjin