Page 1 sur 1
[ RESOLU ] Macro RECHERCHE à corriger
Posté : 03 juillet 2014, 11:11
par wisefun77
Bonjour,
J'ai fait une adaptation d'une macro recherche que je possédait.
Mais je n'arrive pas à supprimer la ligne color dans le UserFormFiltrer.
je vous joins le fichier
Merci
Re: Macro RECHERCHE à corriger
Posté : 03 juillet 2014, 15:36
par Admin
Bonjour,
vérifiez bien l'ajout des pièces jointes, apparement les extensions de type .xls ne sont pas prisent en compte !
Privilégiez les formats compressés comme .zip.
Cdlt
Re: Macro RECHERCHE à corriger
Posté : 03 juillet 2014, 17:52
par wisefun77
Bonjour,
pas grave je fait le fichier.
projet_gestion_1feuille(2).zip
Merci
Re: Macro RECHERCHE à corriger
Posté : 03 juillet 2014, 20:15
par kfjm
Par exemple :
Code : Tout sélectionner
Private Sub TextBox7_Change()
Application.ScreenUpdating = False
For ligne = 2 To Range("A" & Rows.Count).End(xlUp).Row 'ligne 2 à la dernière ligne remplie de la colonne "A"
If Cells(ligne, 1) Like "*" & UCase(TextBox7) & "*" Then 'fonction Ucase pour ne pas tenir compte des majuscules ou minuscule
For j = 1 To 6 '1 à 6 pour tout tes textbox
Me("textbox" & j) = Cells(ligne, j)
Next j
Exit For '-> pas utile sauf si tu veux avoir le premier mot correspondant de la colonne
End If
Next
End Sub
Re: Macro RECHERCHE à corriger
Posté : 03 juillet 2014, 20:51
par wisefun77
Bonsoir kfjm,
Super travail en plus bien expliqué.
BRAVO
Merci très sincèrement