Bonjour Le Forum
Après avoir parcouru les fils je n'ai pas trouvé la réponse à une question probablement simple.
J'ai un fichier avec une macro évènementielle à l'ouverture qui liste les fichiers .xls avec un hyperlien permettant d'ouvrir un ou plusieurs de ces fichiers. Tout marche bien. (merci le Forum )
Ce même fichier possède une macro à la fermeture qui réalise un nettoyage de la feuille active avant de fermer.
Tout marche bien si ce fichier est le fichier actif MAIS le problème est que [highlight]si je suis sur un autre fichier (plusieurs fichiers ouverts) et que par inadvertance je ferme l'application XL[/code] par un clique sur la croix, la macro s'exécute sur le fichier actif mais qui n'est pas le fichier à nettoyer et plante grave. Je ne vois pas la syntaxe à adopter. C'est probablement ThisWorkbook qui est à remplacer mais par quoi
Merci pour votre aide.
Après avoir parcouru les fils je n'ai pas trouvé la réponse à une question probablement simple.
J'ai un fichier avec une macro évènementielle à l'ouverture qui liste les fichiers .xls avec un hyperlien permettant d'ouvrir un ou plusieurs de ces fichiers. Tout marche bien. (merci le Forum )
Ce même fichier possède une macro à la fermeture qui réalise un nettoyage de la feuille active avant de fermer.
Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ScreenUpdating = False
Selection.CurrentRegion.Select
Selection.ClearContents
ThisWorkbook.Sheets(1).Cells(1, 1).Select
ThisWorkbook.Saved = True
Application.ScreenUpdating = True
End Sub
Merci pour votre aide.