tu peux tester cette procedure evenementielle à placer au niveau du classeur
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Dim Ch As Chart
For Each Ch In Charts
If Ch.Name = Sh.Name Then Application.CutCopyMode = False
Next Ch
End Sub
une autre solution en utilisant l'evenement Deactivate de la feuille graphique
Private Sub Chart_Deactivate()
Application.CutCopyMode = False
End Sub