Discussion :

[nissoufad]

Bonsoir,

- Dans ma feuil 1 : J'ai une liste de noms et prénoms
- Dans ma feuil 2 : J'ai la même liste de noms et prénoms

Je voudrais que quand je suis dans ma feuil 1 quand je clique sur un nom que ça m'ouvre la feuil 2 et que ça se positionne sur le bon nom en me mettant une couleur pour que je le voie directement.

Merci pour votre aide
Bonne soirée
Lili

[mercatog]

Les noms sont uniques ou il faudra chercher les mêmes noms et prénoms

[nissoufad]

Il y aura pas juste un nombre précis de noms
Mais au fur et à mesure je rajouterai des noms dans les listes
Cordialement

[nibledispo]

Bonjour,

Essais ceci à loger dans feuil1 de VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Sub Worksheet_selectionchange(ByVal target As Range)
derligne = Range("a65000").End(xlUp).Row
If Not Intersect(Range("a2:a" & derligne), target) Is Nothing Then
   cel = target.Value
   With Sheets("feuil2")
      ligne = Application.Match(cel, .Range(.Cells(1, 1), .Cells(derligne, 1)), 0)
     .Range("a" & ligne).Interior.ColorIndex = 3   '3 = couleur rouge
   End With
End If
End Sub

Attention : comme le précisait Mercatog, si tu as deux nom identiques avec des prénoms différents le résultat sera aléatoire. VBA s’arrêtera sur le premier nom trouvé.

Ce code suppose que les deux listes ont exactement le même nombre de lignes. si ce n'est le cas il te faudra définir la dernière ligne de la feuille 2.

Cordialement