Discussion :

[NEC14]

Bonjour à tous,

Dans Excel j'ai créé un gestionnaire de congés (avec VBA), dans les cellules A6:A50 de la feuille 1T se trouve une liste de noms.
Je souhaiterais que lorsque je clique sur un nom la feuille "Récap" s'affiche.
Comment faire cela avec VBA ?
Merci par avance

[Pierre Fauconnier]

Bonjour.

Il faut intercepter l'évènement SelectionChange de la feuille

Code :

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

1
2
3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("a6:a50")) Is Nothing Then Worksheets("Récap").Activate
End Sub

Cela dit. C'est à chaque fois que tu vas cliquer sur une des cellules concernées... Pas très pratique si tu dois modifier manuellement des données dans ces cellules.
Il serait peut-être préférable de gérer le double-click

Code :

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

1
2
3
4
5
6
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("a6:a50")) Is Nothing Then
        Cancel = True
        Worksheets("Récap").Activate
    End If
End Sub

[NEC14]

Voici le code que j'ai mis en place en m'aidant du tien

Code :

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

1
2
3
4
5
6
7
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("a6:a50")) Is Nothing Then
        Cancel = True
        Sheets("Recap").Visible = True
        Sheets("Recap").Activate
    End If
End Sub

Maintenant est-ce qu'il est possible que le nom sélectionné dans la colonne a6:a50 de la feuille "T1" puisse apparaître en couleur grise dans la feuille "Recap" l'idéal serait que toute la ligne concernée puisse être grisée. Mais suis-je un peu gourmand ?
Merci par avance

Quelqu'un a-t'il une idée ?