Code évènementiel dans module

Bonjour,
J'ai un code évènementiel double clic dans un feuille d'un classeur, je copie cette feuille chaque jour pour le jour suivant ce qui fini par rendre le fichier trop lourd.

Je me demande si je peux passer ce code dans un module appelé dans une évènementielle dans le code de la feuille.

Le code de la feuille serait, en gros:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)   LastLig = Range("A500000").End(xlUp).Row   If Target.Column = 1 And Target.Row <= LastLig And Cells(Target.Row, 1) <> "" Then     EVNMTL   End If   End Sub

---

Mais quid des target.row ou .column qui seraient maintenant dans le module mais qui ne ferait référence à rien du tout si je ne m'abuse dois-je tout remplacer avec des activecell.row ou .column... ou existe-t-il y un moyen de récupérer tout ce qui est target en argument de l'évènementiel ou tout autre moyen?

MERCI BEAUCOUP D'AVANCE DU COUP DE MAIN.

Hello,

pas sur du tout d'avoir tout compris, mais si au lieu de Worksheet_BeforeDoubleClick qui est donc dans une feuille, vous utilisiez Workbook_SheetBeforeDoubleClick donc dans le module ThisWorkBook ?

En effet, je n'avais pas pensé à cette approche!!!

Bonjour,
Je n'ai pas compris la question.
En général on place l'instruction Cancel = True à l'intérieur de la structure décisionnelle ici If Target.Column = 1 And Target.Row <= LastLig And Cells(Target.Row, 1) <> "" Then et ce pour éviter d'entrer en édition de la cellule (Target)

A lire éventuellement pour en savoir plus sur les procédures événementielles

• Les évènements dans la feuille de calcul Excel
• Les évènements du module objet ThisWorkbook, dans Excel