Microsoft 365 Rechercher dans feuil2 sans l'activer et coller si trouvé en Feuil1

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 !

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Je vous souhaite une belle journée 🙂

J'ai encore besoin de l'aide de nos ténors.
Je n'arrive pas à bien coder ma recherche :

Mon p'tit besoin :
je suis sur la feuil1 (feuille active)
je recherche : "Bonjour le Forum"
La recherche se fait sur la feuil2 sans l'activer
si trouvé :
"Bonjour le Forum" la cellule qui contient "Bonjour le Forum" est activée et copiée en Feuil1 (active) cellule E7
si pas trouvé :
"Y'EN A PAS !" est écrit en Feuil1 (active) cellule E7

Auriez-vous le bon code,
En cas, je joins un petit fichier test,
Je vous remercie beaucoup,
lionel 🙂
 

Pièces jointes

Dernière édition:
Bonsoir Lionel, Marcel32,

Un code très basique :
VB:
Sub recherche()
Dim c As Range
Set c = Feuil2.Cells.Find("Bonjour le Forum", , xlValues, xlWhole)
Feuil1.[E7] = IIf(c Is Nothing, "Y'EN A PAS !", "Bonjour le Forum")
End Sub
De cette manière la casse ne change pas même si elle varie sur la cellule source.

A+
 
Bonsoir Gérard,
Merci d'être encore de me répondre.

Evidemment ça marche 🙂
Toutefois : Il faudrait également que la cellule trouvée qui contient "Bonjour le Forum" soit activée car (dans mon fichier de travail) je m'en sert de repère pour importer d'autres infos de la même ligne dans la Feuil1.

C'est possible ?
lionel 🙂
 
Dernière édition:
- 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

Discussions similaires

Réponses
25
Affichages
1 K
Retour