Bonjour @ tous,
Voila mon probleme, je me bats depuis quelques jours avec la création d'un filtrage multifeuille.
Mon probleme vient du fait que je crée une collection en rapportant le numéro de colonne en nombre, puis j'aurais besoin d'utiliser ce numéro pour le transformer en lettre afin d'utiliser la méthode range suivante:.
For Each cel In Sht.Range() 'boucle sur toutes les cellules éditées cel de la colonne B en partant de la seconde
'si la valeur de la cellule est égale à la valeur de la ComboBox1, ajoute le nom correspondant à la ListBox1
If cel.Value = Me.ComboBox2.Value Then
Me.ListBox1.AddItem cel.Offset(Lig, 1).Value
Next cel 'prochaine cellule de la boucle
End If 'fin de la condition
j'ai bien trouvé la fonction me permettant de passer d'un chiffre en lettre, cependant lorsque j'esaye de lui affecter une variable pour la reprendre après cela bloque la fonction tandis que si au lieu de:
LCol = Nombre_en_Lettre(Col)
je mets
msgbox Nombre_en_Lettre(Col) alors il me mets bien D (si col=4 bien sur...)
Je ne sais comment faire car je ne vois pas comment faire la boucle sur la colonne concernée sans le range, et je ne peux utiliser le range sans avoir une lettre de colonne (ou une variable la représentant).
Help SVP car je tourne en rond sans arret...
Merci
@+
Voila mon probleme, je me bats depuis quelques jours avec la création d'un filtrage multifeuille.
Mon probleme vient du fait que je crée une collection en rapportant le numéro de colonne en nombre, puis j'aurais besoin d'utiliser ce numéro pour le transformer en lettre afin d'utiliser la méthode range suivante:.
For Each cel In Sht.Range() 'boucle sur toutes les cellules éditées cel de la colonne B en partant de la seconde
'si la valeur de la cellule est égale à la valeur de la ComboBox1, ajoute le nom correspondant à la ListBox1
If cel.Value = Me.ComboBox2.Value Then
Me.ListBox1.AddItem cel.Offset(Lig, 1).Value
Next cel 'prochaine cellule de la boucle
End If 'fin de la condition
j'ai bien trouvé la fonction me permettant de passer d'un chiffre en lettre, cependant lorsque j'esaye de lui affecter une variable pour la reprendre après cela bloque la fonction tandis que si au lieu de:
LCol = Nombre_en_Lettre(Col)
je mets
msgbox Nombre_en_Lettre(Col) alors il me mets bien D (si col=4 bien sur...)
Je ne sais comment faire car je ne vois pas comment faire la boucle sur la colonne concernée sans le range, et je ne peux utiliser le range sans avoir une lettre de colonne (ou une variable la représentant).
Help SVP car je tourne en rond sans arret...
Merci
@+