j-lou
Nouveau membre
Bonjour à tous,
j'aimerai faire une macro qui fasse office de fonction recherche comme ctrl+F sur la 1ere colonne de la feuille.
En fouillant le net j'ai trouvé cette méthode:
cela me permet de masquer les lignes de la 1ere colonne ne contenant pas le mot-clef présent en B1, mais j'ai plusieurs problèmes:
-si aucune des cellules de la 1ere colone ne contient le mot clef, elles sont toutes masquer, or j'aimerai qu'elles restent affichées dans ce cas précis et qu'il soit préciser que le mot clef n'est pas présent.
-j'aimerai que la macro ne prenne pas en compte que les cellules contenant exactement le mot présent en B1 mais également des variantes ex :mot-ckef= "page" ==> laisser afficher les cellules contenant " maison page arbre" .
-et dernier problème, je souhaiterai faire en sorte que l'utilisateur puisse faire une nouvelle recherche, et donc réafficher les lignes masquées avant de reéxécuter la macro.
Merci de me donner quelques tuyaux
j'aimerai faire une macro qui fasse office de fonction recherche comme ctrl+F sur la 1ere colonne de la feuille.
En fouillant le net j'ai trouvé cette méthode:
Code:
Sub test()
Dim I As Long
Dim Plage As Range
Set Plage = Range("A2:A" & Range("A2").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
If Plage.Cells(I).Text <> Range("B1").Text Then
Plage.Cells(I).EntireRow.Hidden = True
End If
Next
End Sub
cela me permet de masquer les lignes de la 1ere colonne ne contenant pas le mot-clef présent en B1, mais j'ai plusieurs problèmes:
-si aucune des cellules de la 1ere colone ne contient le mot clef, elles sont toutes masquer, or j'aimerai qu'elles restent affichées dans ce cas précis et qu'il soit préciser que le mot clef n'est pas présent.
-j'aimerai que la macro ne prenne pas en compte que les cellules contenant exactement le mot présent en B1 mais également des variantes ex :mot-ckef= "page" ==> laisser afficher les cellules contenant " maison page arbre" .
-et dernier problème, je souhaiterai faire en sorte que l'utilisateur puisse faire une nouvelle recherche, et donc réafficher les lignes masquées avant de reéxécuter la macro.
Merci de me donner quelques tuyaux