bonjour,

J'ai un classeur avec 14 feuilles.
Lorsque l'on double clic sur la cellule A1 un usf s'ouvre.
Je voudrais éviter de le copier sur chaque feuille. Comment faire qu'il soit valable pour les 14 feuilles.
Dans thisworkbook avec for each....

Merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 
    If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
 
    TabAbsences.Show
 
    End If
 
End Sub