Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Ply").Enabled = True 'Réactive le clic droit sur les onglets
Application.CommandBars("Cell").Enabled = True 'Réactive le clic droit sur les cellules
Application.CommandBars("Row").Enabled = True 'Réactive le clic droit sur les lignes
Application.CommandBars("Column").Enabled = True 'Réactive le clic droit sur les colonnes
End Sub