Référence autre feuille

[Photosol]

Bonjour,

Après mes recherches préliminaires je n'ai pas réussi à trouver comment réaliser ce que je souhaite.

Explications:

En Feuille 1, j'ai dans un tableau un ensemble de noms correspondant à une ligne ou plusieurs.
Pour illustrer, Sur le projet A et C (donc ligne A et C) j'ai "JEAN PAUL".

Cependant les informations concernant "JEAN PAUL" sont dans une autre feuille (téléphone, mail etc..)

Je souhaiterais que lorsque je fais une opération (de préférence CTRL + Clic Droit, ou quelque chose du genre), en cliquant sur la case contenant Jean Paul, Excel me rédirige directement sur la ligne de la feuille 2 ou sont les infos du dénommé JEAN PAUL.

Pour illustrer une petite PJ.

Merci!

 

[tototiti2008]

Re : Référence autre feuille

Bonjour Photosol,

Peut-être une piste par là :

[XL-2003] Lien hypertexte automatique entre 2 feuilles d'1 même fichier - Forum des professionnels en informatique

 

[Photosol]

Re : Référence autre feuille

Salut,
Ceci peut être une solution mais il faudrait qu'une macro génére ce que je souhaite.

Avec les macros ça m'a l'air beaucoup plus fiable...
De plus, je ne souhaite pas utiliser de formule, mon tableau est rempli et beaucoup trop complet pour insérer de nouvelles cases.

 

[Dranreb]

Re : Référence autre feuille

Bonjour.
Un double clic ça vous irait ? :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
Application.Goto [ListeNom].Find(Target.Value, LookIn:=xlValues, LookAt:=xlWhole, _
   SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False)
End Sub

À mettre dans le module Feuil1

À +

 

[Photosol]

Re : Référence autre feuille

Cette Solution est parfaite;

J'arrive à l'utiliser dans mon fichier simplifié pour Excel download mais je n'arrive pas à l'incorporer dans mon fichier de base, où il y a plus de détail.

Peux tu m'expliquer en plus détaillé?
Ainsi je pourrais adapter la ligne à mon fichier.

Merci!

 

[pierrejean]

Re : Référence autre feuille

Bonjour a tous

A tester (dans un module standard):
nb fonctionne avec ctrl +f

Sub Macro1()
' Touche de raccourci du clavier: Ctrl+f
Set c = Sheets("Feuil2").Cells.Find(Selection.Value, LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then
  Sheets("Feuil2").Select
  ActiveWindow.ScrollRow = c.Row
  c.Select
End If
End Sub

 

[Photosol]

Re : Référence autre feuille

J'ai changé ma réponse entre temps (désolé pierre Jean)
J'ai alloué mon double clic à une autre action.

Ma seule contrainte maintenant est d'adapter la solution de Dranreb à mon fichier.

Quelqu'un peut t'il m'expliquer svp?

Ya t'il des histoires de nom de feuille, de nom de colonne etc?

 

[TempusFugit]

Re : Référence autre feuille

Bonjour

Une petit variante du code VBA de pierrejean

Sub Macro1()
' Touche de raccourci du clavier: Ctrl+f
Dim c As Range
Set c = Sheets("Feuil2").Cells.Find(Selection.Value, LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then
Application.Goto c, True
End If
End Sub

 

[Numidia]

Re : Référence autre feuille

merci pierrejean , on apprend tt les jours avec vous
bonne journée

 

[Photosol]

Re : Référence autre feuille

Merci beaucoup pour toutes vos solutions,
La solution de Dranreb me convient parfaitement car j'ai modifié mon fichier pour que le double clic soit associé à cette action.

C'est parfaitement ce que je veux cependant, d'ailleurs cela marche très bien dans le Fichier ED6 que je vous ai envoyé.
Par contre je n'arrive pas à faire fonctionner le code VBA dans Mon fichier général.

Pouvez vous m'éclairer et m'expliquer comment l'adapter à mon fichier? Voulez vous que je mette mon fichier général en PJ?
Sa taille est trop grosse pour l'envoyer tel quelle, mais je peux supprimer des parties qui ne sont pas utiles pour le sujet de cette discussion...

 

[Photosol]

Re : Référence autre feuille

C'est bon j'ai réussi,
Merci beaucoup à tous,
Mon patron va être très content (et oui je suis en stage..)