• Initiateur de la discussion Initiateur de la discussion pascal22
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

pascal22

Guest
bonjour a tous et a toutes

j'ai cree un base de donnée avec plusieurs milliers de ligne sur 5 colonnes.
existe t-il un moyen pour avoir une page d'accueil et quand je tape un mot dans un espace prevu a cette effet et qu'ensuite je clic sur un bouton 'rechercher' , j'ai toute mes lignes qui s'affichent correspondant au mot rechercher.

en esperant avoir ete clair sinon je peux preciser par mail. merci a tous
pascal
 
bonjour,
ci joint du code à placer dans un module
la valeur à chercher est toto, tu adaptes

Sub MaRecherche()
For Each f In WorkSheets
With f.Cells
'créer l'objet range de la valeur trouver
Set c = .Find(What:='toto')
'ensuite on test si cette objet n'est pas vide
If Not c Is Nothing Then
'on garde en mémoire l'adresse de la première occurence trouvée
firstaddress = c.Address
' on affiche la première occurance trouvée
MsgBox c.Address
'on continue a chercher pour trouver d'autres occurences
Set c = .FindNext(c)
Do While c.Address <> firstaddress And Not c Is Nothing
MsgBox c.Address
Set c = .FindNext(c)
Loop
End If
End With
Next
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

P
Réponses
4
Affichages
1 K
Réponses
14
Affichages
1 K
E
Réponses
6
Affichages
1 K
exe76
E
Retour