Excel und VBA: Formeln, Programmierung, Lösungen
Die Excel/VBA-Beispiele
Thema
Aktive Arbeitsmappe löschen
Gruppe
Arbeitsmappe
Problem
Wie kann ich die aktive Arbeitsmappe von der Festplatte löschen und schließen?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain Sub KillMe() Dim strFile As String ActiveWorkbook.ChangeFileAccess xlReadOnly Kill ActiveWorkbook.FullName ThisWorkbook.Close False End Sub