Hoe het actieve werkboek te sluiten en opnieuw openen?

In dit artikel introduceer ik enkele methoden om het actieve werkboek snel te sluiten en opnieuw te openen.

Sneltoets om het actieve werkboek te sluiten en opnieuw te openen

VBA om het actieve werkboek te sluiten en opnieuw te openen

Sneltoets om het actieve werkboek te sluiten en opnieuw te openen

Hier zijn enkele sneltoetsen die het huidige werkboek kunnen sluiten en opnieuw openen.

Sluit het actieve werkboek

Alt + F + C

Als er enkele wijzigingen zijn voordat u het werkboek sluit, verschijnt er een dialoogvenster om u eraan te herinneren of u wilt opslaan. Druk op de Enter-toets om op te slaan en het dialoogvenster te sluiten.

Heropen het werkboek

Alt + F + R +1 voor Microsoft Office Professional Plus 2010/2013/2016.

Alt + F+ R + Y1 + Enter voor andere versies van Microsoft Office.

VBA om het actieve werkboek te sluiten en opnieuw te openen

Met VBA kunt u ook het actieve werkboek sluiten en opnieuw openen.

1. Druk op Alt + F11 toetsen om het venster Microsoft Visual Basic for Applications te openen.

2. Klik op Invoegen > Module en plak onderstaande code in het script.

VBA: Opslaan en sluiten en opnieuw openen van het actieve werkboek

Sub SaveCloseReOpen()
'UpdatebyExtendoffice20171128
ThisWorkbook.save
Application.Workbooks.Open(ThisWorkbook.FullName)
End Sub

3. Druk op de F5-toets om de code uit te voeren.

Opmerking:

Als u het actieve werkboek direct wilt sluiten en opnieuw openen zonder op te slaan, gebruikt u onderstaande code:

Sub Reopen()
'UpdatebyExtendoffice20171128
    ThisWorkbook.Saved = True
    ThisWorkbook.ChangeFileAccess xlReadOnly, , False
    Application.Wait Now + TimeValue("00:00:01")
    ThisWorkbook.ChangeFileAccess xlReadWrite, , True
End Sub