In diesem Artikel erfahren Sie, wie Sie mit VBA in Microsoft Excel 2010 eine Arbeitsmappe schließen.
Nachdem Ihr VBA-Makro / -Code alle erforderlichen Aktionen ausgeführt hat, möchten Sie, dass das Makro die Datei entweder speichert oder das Speichern überspringt. Hier sind also die Optionen, die Sie im Code festlegen können, während Sie ihn auffordern, die Datei zu schließen. Die Methode Close and Open in VBA kann zum Schließen und Öffnen von Arbeitsmappen verwendet werden.
Wenn Sie möchten, dass der Code die Datei nur schließt, ohne die Änderungen zu speichern - verwenden Sie diese Zeile am Ende Ihres Codes oder wo immer erforderlich -
ActiveWorkbook.Close (Falsch) oder ActiveWorkbook.Close False oder ActiveWorkbook.CloseSaveChanges:=FALSE
Siehe den Code in diesem Bild unten. Um den Code zu kopieren, drücken Sie Alt + F11 auf der Tastatur, während Sie sicherstellen, dass das Excel-Blatt geöffnet ist. Klicken Sie dann mit der rechten Maustaste auf Microsoft Excel-Objekte und wählen Sie Einfügen. Klicken Sie dann auf Modul. Kopieren Sie den unter dem Bild angegebenen Code -
Option explizit
Untermakro1()
ActiveWorkbook.Close False
End Sub
Hinweis: Sie können den Text ActiveWorkbook ändern, um auf den Namen der Arbeitsmappe oder die Variable zu verweisen, die Sie verwendet haben, um die Arbeitsmappe gemäß Ihrem Code zu identifizieren.
Wenn Sie möchten, dass der Code die Änderungen beim Schließen der Datei speichert, verwenden Sie
ActiveWorkbook.Close (True) oder ActiveWorkbook.Close True oder ActiveWorkbook.Close SaveChanges:=TRUE
Hier ist der Code -
Option explizit
Untermakro1()
ActiveWorkbook.Close True
End Sub
Wenn Sie jedoch möchten, dass der Benutzer entscheidet, müssen Sie nur eingeben
ActiveWorkbook.Schließen
Hier ist der Code -
Option explizit
Untermakro1()
ActiveWorkbook.Schließen
End Sub
Der Benutzer wird in einem Popup gefragt, ob er die Arbeitsmappe speichern möchte oder nicht.
Workbooks("File1.XLS").Close SaveChanges:=False
In diesem Beispiel wird File1.xls geschlossen und alle daran vorgenommenen Änderungen verworfen.
Abschluss:
Wenn „Application.DisplayAlerts“ auf False gesetzt wurde, erhalten Sie kein Popup und die Arbeitsmappe wird direkt ohne Aufforderung zum Speichern geschlossen.
Dieses Popup wird angezeigt, wenn „Application.DisplayAlerts“ nirgendwo vor der Codezeile von Excel vba Activeworkbook.Close auf False gesetzt ist.
Stellen Sie also sicher, dass „Application.DisplayAlerts = True“ vor der Activeworkbook.Close-Zeile vorhanden ist, auch wenn der Code erfordert, dass Sie die Warnungen deaktivieren.
Wenn Ihnen unsere Blogs gefallen haben, teilen Sie sie mit Ihren Freunden auf Facebook. Und Sie können uns auch auf Twitter und Facebook folgen.
Wir würden uns freuen, von Ihnen zu hören, lassen Sie uns wissen, wie wir unsere Arbeit verbessern, ergänzen oder erneuern und für Sie verbessern können. Schreiben Sie uns anE-Mail-Site