Recherche dans une seule feuille

Bonjour a tous

J'ai le code ci-dessous, quand je fais une recherche çà me renvois sur la dernière feuille,si le noms est identique. Donc je suis obliger de rechercher vers la feuille "Noms".

Pourriez-vous modifier le code pour arriver uniquement sur la feuille "Noms"

Je vous remercie beaucoup .

Sub Worksheet_SelectionChange(ByVal Target As Range)

Static SelectionPrecedente As String, CouleurPrecedente As Long

If Not SelectionPrecedente = "" Then Range(SelectionPrecedente).Interior.ColorIndex = CouleurPrecedente

SelectionPrecedente = Target.Address

CouleurPrecedente = Target.Interior.ColorIndex

Target.Interior.ColorIndex = 8

End Sub

Bonjour a tous

Je me suis trompé de code, voici le bon en pièce jointe , avec les explications plus haut pour les modifications

Toutes mes excuses

Merci

https://www.cjoint.com/c/HBzhJnjH1Nf

Bonjour mic6259,

Je te retourne ton fichier Excel, renommé plus simplement et modifié :

5exo-mic6259.xlsm (18.72 Ko)

La démo que je te propose n'a de sens que si tu vérifies d'abord, sur chaque feuille,

que la cellule active n'est pas la cellule de la valeur recherchée (ici « Moi »)

À l'ouverture du fichier, tu es sur "Feuil3" ; note bien que la cellule active est E10.

Va sur la feuille "Noms" ; la cellule active est E10 ; va sur "Feuil1" : idem.

Clique sur le bouton « Bouton 2 » ➯ c'est bien la feuille "Noms" qui est sélectionnée (ce que tu avais demandé).

Tu peux voir que la cellule active est bien celle de « Moi » ; vérifie que c'est idem sur les 2 autres feuilles.

N'oublie pas de tester aussi le cas avec une valeur non trouvée !

Alt F11 pour voir le code VBA, puis revenir sur Excel

Si besoin, tu peux demander une adaptation.

Merci de me dire si ça te convient.

Cordialement,

dhany

Bonjour dhany

C'est parfait c'est exactement ce qu'il me fallait

Merci beaucoup

RE:

Après essais je viens de remarquer quand çà dépasse 25 ligne je dois descendre manuellement pour accéder a la recherche demander.

Serait-il possible de me renvoyer a la cellule concernée.

Cordialement

Je te propose cette nouvelle version :

12exo-mic6259.xlsm (18.76 Ko)

Dans le code VBA, tu pourras voir que j'ai modifié une seule instruction ; j'te laisse trouver laquelle. faut bien qu'toi aussi tu bosses un peu, pas vrai ? (même si on est dimanche ; mais p't'être que tu fais la grasse matinée jusqu'à 19 h ?)

Si tout est ok, merci de passer le sujet en résolu. (seulement si t'es pas trop fatigué)

Cordialement,

dhany

Merci dhany

J'ai trouver la modif,tellement simple quand on s'y connais en VBA.

Je vais pouvoir travailler plus vite maintenant.

Encore merci pour mon association.

Cordialement

Rechercher des sujets similaires à "recherche seule feuille"