Bonjour le forum,

Mon sujet est dans le titre, est-ce que je peux mettre ce code tel quel dans un module et ainsi l'appeler dans mes 52 feuilles sans être obligé de recopier toutes ces lignes ?
Merci par avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Private Sub WorkSheet_SelectionChange(ByVal Target As Range)
    If Not Range("A12").Address = ActiveCell.Address Then Exit Sub
    Load FrmTrav
    FrmTrav.Show
    FrmTrav.Height = 160
End Sub