Hoe controleer ik of een werkmap is opgeslagen?
Wanneer u een nieuwe werkmap opent, vergeet u deze mogelijk op te slaan, het zal vervelend zijn als u de werkmap per ongeluk sluit. Maar hoe kunt u controleren of een Excel-werkmap is opgeslagen?
Controleer of een werkmap is opgeslagen of niet met VBA-code
Controleer of een werkmap is opgeslagen of niet met VBA-code
Controleer of een werkmap is opgeslagen of niet, de volgende VBA-code kan u een plezier doen, doe dit als volgt:
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: controleer of een werkmap is opgeslagen of niet:
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. Druk vervolgens op F5 sleutel om deze code uit te voeren, krijgt u de volgende promptvakken:
(1.) Als de werkmap is opgeslagen, verschijnt er een promptvenster om u te herinneren aan de laatst opgeslagen tijd van uw werkmap:
(2.) Als de werkmap niet is opgeslagen, krijgt u het volgende promptvenster te zien:
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
