Hoe kan ik het actieve werkboek (huidig bestand) in Excel verwijderen?

Deze methode introduceert een VBA om het geopende/actieve werkboek te verwijderen zonder het te sluiten in Excel. Volg de volgende stappen:

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

2. Klik op Invoegen > Module, kopieer de volgende VBA-code en plak deze in het geopende modulevenster.

VBA: Verwijder Actief Werkboek zonder het te sluiten in Excel

Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub

3. Druk op de F5-toets of klik op de knop Uitvoeren om deze VBA uit te voeren.

Opmerkingen:

(1) Deze VBA kan het actieve werkboek verwijderen, maar kan het Excel-venster niet sluiten. Als er na het verwijderen van het actieve werkboek geen andere werkboeken meer open zijn, sluit dan het Excel-venster handmatig.

(2) Als het actieve werkboek nog nooit eerder is opgeslagen, kan deze VBA het niet verwijderen. Je kunt dit niet-opgeslagen werkboek echter rechtstreeks verwijderen door het te sluiten.