Comment vérifier si un classeur est enregistré ?
Lorsque vous ouvrez un nouveau classeur, vous pourriez oublier de l'enregistrer, et ce serait ennuyeux si vous fermiez accidentellement le classeur. Mais comment vérifier si un classeur Excel a été enregistré ?
Vérifiez si un classeur est enregistré ou non avec du code VBA
Vérifiez si un classeur est enregistré ou non avec du code VBA
Pour vérifier si un classeur est enregistré ou non, le code VBA suivant peut vous aider, veuillez procéder comme suit :
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.
Code VBA : Vérifiez si un classeur est enregistré ou non :
Sub filesaved()
'Updateby Extendoffice 20161109
Dim sLastTime As String
On Error GoTo EHandler
sLastTime = ActiveWorkbook.BuiltinDocumentProperties("last save time")
MsgBox sLastTime, vbInformation, "Kutools for Excel"
Exit Sub
EHandler:
MsgBox "File not saved", vbInformation, "Kutools for Excel"
End Sub
3. Ensuite, appuyez sur la touche F5 pour exécuter ce code, vous obtiendrez les boîtes de dialogue suivantes :
(1.) Si le classeur a été enregistré, une boîte de dialogue s'affichera pour vous rappeler l'heure du dernier enregistrement de votre classeur :
(2.) Si le classeur n'a pas été enregistré, vous obtiendrez la boîte de dialogue suivante :
Meilleurs outils de productivité pour Office
Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 %, et réduit des centaines de clics de souris pour vous chaque jour !