liste vba aller sur un mot précis
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
liste VBA aller sur un mot précis
Bonjour,
Essais ceci à loger dans feuil1 de VBA :
Code:
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