Microsoft 365 Macros dans Worksheet ou dans Workbook ?

Dranreb à dit:

Bonjour.
L'évènement Workbook_BeforeClose ne peut être pris en charge que dans le module ThisWorkbook.
Vous pouvez cependant conditionner selon le nom de la feuille active le traitement qui y est programmé.

Cliquez pour agrandir...

Dranreb à dit:

Vous pouvez aussi équiper le ThisWorkbook d'une propriété booléenne.
Dans ThisWorkbook :

VB:

Option Explicit
Public FeuilleSpéciale As Boolean
Private Sub Workbook_BeforeClose(Cancel As Boolean)
   If FeuilleSpéciale Then
' code à exécuter pour la feuille spéciale
   Else
' code à exécuter pour les autres feuilles
      End If
   End Sub

Dans le module de l'objet Worksheet représentant la feuille spéciale :

VB:

Option Explicit
Private Sub Worksheet_Activate()
   ThisWorkbook.FeuilleSpéciale = True
   End Sub
Private Sub Worksheet_Deactivate()
   ThisWorkbook.FeuilleSpéciale = False
   End Sub

Cliquez pour agrandir...