Bonjour,

je cherche à effectuer une opération lorsque l’utilisateur clique sur une feuille, pour cela j'ai monté un petit test, pour voir comment copier " B1" en "A1" de ma feuille "test" lorsque l'utilisateur clique sur l'onglet "test" de mon classeur (ce n'est pas la feuille courante de mon classeur)

d'après mes recherches j'ai codé dans un module :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox Sh.Name ' juste pour voir le nom de la feuille en test
 
Dim test As String
test = "test"
 
If Sh.Name = test then
    Sh.Range("A1").Value = Sh.Range("B1").Value
Else
End If
 
End Sub
Il ne se passe rien, même pas la Msgbox