Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2025 20:00:52
Warum löscht mein Makro keine Zeilen
19.04.2025 19:45:46
Liniendiagramm mit teils doppelten Datumszeiträume
19.04.2025 16:33:09
MouseMove nur über CheckBox
19.04.2025 16:05:21
VBA - letzte Zeile bestimmen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
164to168
164to168
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datei schliessen ohne zu speichern

Forumthread: Datei schliessen ohne zu speichern

Datei schliessen ohne zu speichern
27.09.2002 14:41:22
Daniel
Beim Beenden meiner Applikation durch eine VBA prozedur werden alle xls Dateien die Daten enthalten
gespeichert und geschlossen, ausser der pgm.xls welche nur VBA Prozeduren enthält.
Diese möchte ich nicht speichern, da es schon vorgekommen ist, dass durch Abstürze die Datei unbrauchbar
geworden ist.
Doch beim anschliessenden Beenden der Applikation Excel wird immer gefragt, ob pgm.xls gespeichert werden
soll oder nicht, obwohl keine Daten darin enthalten sind.

Werk kennt da einen Trick?
Wie kann ich diese Meldung unterdrücken, so dass ich nicht jedesmal diese Meldung mit „nicht speichern“ beantworten muss?

Mein Makro: (Muster)

Sub beenden()

Windows("Daten.xls").Activate
ActiveWorkbook.Save
ActiveWindow.Close

Windows("Daten2.xls").Activate
ActiveWorkbook.Save
ActiveWindow.Close

Application.Quit

End Sub

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Datei schliessen ohne zu speichern
27.09.2002 14:47:57
Jürgen
Hallo Daniel,

versuch's mit:

Workbooks("pgm.xls").Close SaveChanges:=False

Gruß
Jürgen

Re: Datei schliessen ohne zu speichern
27.09.2002 14:51:15
Andreas S
Hallo,

versuch es mal so:

Workbooks("pgm.xls").Saved=True
(Damit gauckelst du Excel vor, die Mappe wäre schon gesepichert)
Gruss
Andreas

Anzeige
Re: Datei schliessen ohne zu speichern
27.09.2002 15:02:12
Daniel
Das Schliessen klappt, aber "Application.Quit" wird
nicht mehr ausgeführt


Re: Datei schliessen ohne zu speichern
27.09.2002 15:07:55
Daniel
Was genau macht Application.Quit?
Wenn möglich bitte mir direkt über mail antworten...
Re: Datei schliessen ohne zu speichern
27.09.2002 20:22:15
Mischa Richter
application.displayalerts = false
'und schon kommt keine rückfrage mehr
mischa
Anzeige
Re: Datei schliessen ohne zu speichern
27.09.2002 21:53:24
Udo RiHü
Hallo,
vielleich hilft das:
Ins Klassenmodul 'DieseArbeitsmappe'

Private sub before_save()
thisworkbook.saved=true
end sub

Dann gilt die Mappe als gespeichert und wird einfach geschlossen.

Gruss Udo

Forumthreads zu verwandten Themen

Datei speichern aber ohne Makros und VBA
Thomas

Hallo alle zusammen,
ich verstehe es einfach nicht, obwohl ich im Archiv mir schon alles reingezogen habe. Könnt Ihr mir bitte helfen?
Ich habe eine Datei mit sehr vielen Modulen, Formularen und Klassenmodulen sowie Makros in Tabellen und "DieseArbeitsmappe".
Da die Datei dadurch se...
23.10.2008 15:49:00
Thread-ID: 1018710
5 Beiträge
arbeitsmappe öffnen, speichern und schließen
otto

Hi,
ich habe eine Arbeitsmappe mit einer Webabfrage.
Beim starten des PC öffnet sich die Arbeitsmappe(Autostart) und im Workbook.Open Ereignis wird die Abfrage aktualisiert.
Nun möchte ich, dass die Arbeitsmappe nach der Aktualisierung automatisch gespeichert und geschlossen wird. W...
27.08.2009 11:35:34
Thread-ID: 1098953
3 Beiträge
Makro - ohne speichern schließen
Wolfango

Hallo Experten,
mit dem Recorder habe ich ein Makro aufgezeichnet welches damit endet, dass eine Tabelle gedruckt wird.
Nun möchte ich dem Makro-Code so erweitern, dass die Datei automatisch geschlossen wird, ohne(!) dass sie gespeichert wird.
Das muss doch irgendwie gehen - oder...
09.03.2010 16:15:57
Thread-ID: 1144639
3 Beiträge
Speichern und schließen eines Tabellenblattes
Peter

Hallo,
ich habe mir mit Hilfe/Makrorekorder diesen Code zusammengebaut:
Dim wb As Workbook, wbneu As Workbook Dim intI As Integer Dim astrLinks As Variant Set wb = ThisWorkbook ThisWorkbook.Sheets("Data").Copy Set wbneu = ActiveWorkbook Application.DisplayAlerts = False With wbneu ....
09.04.2010 09:53:30
Thread-ID: 1150746
6 Beiträge
VBA: Datei ohne Makros speichern
André

Moin zusammen,
gegeben ist eine Exceldatei mit Makros (.XSLM).
In dieser Datei soll nun ein Makro folgendes tun:
- die Datei speichern, wobei der User den Dateinamen und Pfad angeben darf
- die Datei darf nur in den Formaten XLSX oder XlS, in jedem Fall aber ohne Makros gespeich...
19.04.2010 13:13:27
Thread-ID: 1152560
8 Beiträge
Anzeige
Userform von Makro Starten und bei Ende schließen
Makro

Hallo,
ich habe mal wieder eine Frage...
Kann ich, wenn ich ein Makro Starte ein Userform öffen, aber das Makro soll im hintergrund Weiterlaufen und am ende soll es das Userform wieder schießen.
Ich brauche praktisch nur ein Hinweis "Daten werden verarbeitet - Bitte Warten...." bis...
05.09.2010 19:38:47
Thread-ID: 1175854
5 Beiträge
per vba speichern und blätter umbennen
ptonka

Hallo zusammen,
ich habe eine Ausgangsdatei von der ich 3 Blätter in eine neue Datei wegspeichern möchte.
Da dies in VBA geschieht, sollen keinerlei Abfragen erscheinen.
Also: die drei Blätter werden mit
Sheets(Array("Legende", "Platt_V", "Platt_K")).Copy
With ActiveWorkboo...
21.10.2010 16:58:24
Thread-ID: 1183406
3 Beiträge
Datei schließen ohne speichern?
heidi

Hallo Excel-Gemeinde,
ich lade von extern die Datei "wbkundenanalyse".
Nachdem ich sie für meine Zwecke "benutzt" habe (Formatierungen geändert, usw.), möchte ich sie wieder schließen ohne zu speichern.
Wie kann die die Abfrage ausschalten: Sollen Ihre Änderungen in ..... gespeiche...
31.01.2011 15:38:15
Thread-ID: 1198264
3 Beiträge
Fragen zum Speichern und Schließen automatisch bea
stormlamp

Hallo,
bei meinen Makros unter Excel 2010 möchte ich die Fragen beim Speichern unterbinden.
Im ersten Fall soll die Frage "Sollen Ihre Änderungen in Datei xyz gespeichert werden?" beim Schließen der Datei automatisch mit "Nicht speichern" beantwortet werden.
Aktueller Makrotext:
12.06.2012 14:05:28
Thread-ID: 1267094
4 Beiträge
Workbook schließen ohne Speichern
Marc

Hallo,
ich verwende momentan folgenden Code in Workbook_BeforeClose, um zu verhindern, dass Änderungen von normalen Usern gespeichert werden.
Leider führt das momentan regelmäßig zu Abstürzen von Excel, was vermutlich an der Nutzung durch mehrere User zur gleichen Zeit liegt.
Gib...
28.06.2012 22:07:16
Thread-ID: 1269378
9 Beiträge
Anzeige
Makro - Datei schließen und neu öffnen
Chrissy

Hallo,
ich bräuchte dringend ein Makro für folgendes Problem:
(Habe eine komplexe Version davon schon mal gepostet, aber keine Antwort erhalten - daher nochmal ein vereinfachter Versuch)
Ich habe ein Excel-Formular, in das ich Werte in die Zellen B1, B2, B3 eingebe.
Nun brauche...
12.11.2012 15:10:28
Thread-ID: 1286384
7 Beiträge
Anzeige
Speichern und schließen
Dirk

Hallo zusammen,
ich suche nach einer Möglichkeit die meine Excel-Datei nach einer Eingabe in bestimmte Felder (H10 - H41) automatisch speichert (Ohne nachfragen ob gespeichert werden soll) und schließt. kann mir bitte jemand helfen?
danke im vorraus.
Lg
Dirk
13.02.2013 16:40:38
Thread-ID: 1299192
7 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Datei schließen ohne zu speichern in Excel VBA

Schritt-für-Schritt-Anleitung

Um eine Datei in Excel VBA zu schließen, ohne sie zu speichern, kannst du folgende Schritte befolgen:

  1. Öffne den Visual Basic for Applications (VBA) Editor in Excel mit ALT + F11.

  2. Füge ein neues Modul hinzu: Rechtsklick auf "VBAProject (deine Arbeitsmappe)" > Einfügen > Modul.

  3. Füge den folgenden Code in das Modul ein:

    Sub DateiSchliessenOhneSpeichern()
   ' Deaktiviert die Warnmeldungen
   Application.DisplayAlerts = False

   ' Schließt die Datei pgm.xls ohne zu speichern
   Workbooks("pgm.xls").Close SaveChanges:=False

   ' Aktiviert die Dateien, die gespeichert werden sollen
   Windows("Daten.xls").Activate
   ActiveWorkbook.Save
   ActiveWindow.Close

   ' Beendet Excel
   Application.Quit
End Sub

  4. Schließe den VBA-Editor und führe das Makro aus.

Häufige Fehler und Lösungen

  • Frage: Die Datei schließt sich, aber die Anwendung wird nicht beendet.

    • Lösung: Stelle sicher, dass du Application.Quit am Ende deines Codes hast. Wenn du jedoch DisplayAlerts auf False setzt, stelle sicher, dass du alle notwendigen Dateien schließt oder speicherst, bevor du die Anwendung schließt.

  • Frage: Ich bekomme immer noch eine Speicherabfrage.

    • Lösung: Überprüfe, ob du SaveChanges:=False korrekt in deinem Code verwendest, um Excel mitzuteilen, dass keine Änderungen gespeichert werden sollen.

Alternative Methoden

  1. Workbooks.Saved Eigenschaft: Wenn du die Datei als gespeichert markierst, kannst du Excel vorgaukeln, dass keine Änderungen vorgenommen wurden:

    Workbooks("pgm.xls").Saved = True
Workbooks("pgm.xls").Close

  2. Klassenmodul verwenden: Du kannst auch einen Before_Save-Ereignis-Handler im Klassenmodul "DieseArbeitsmappe" verwenden:

    Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
   ThisWorkbook.Saved = True
End Sub

Praktische Beispiele

Hier sind einige praktische Anwendungsbeispiele für das Schließen von Dateien in Excel VBA:

  • Beispiel 1: Schließen ohne Speichern

    Sub SchliessenOhneSpeichern()
  Application.DisplayAlerts = False
  ActiveWorkbook.Close SaveChanges:=False
End Sub

  • Beispiel 2: Speichern und Schließen

    Sub SpeichernUndSchliessen()
  ActiveWorkbook.Save
  ActiveWorkbook.Close
End Sub

Tipps für Profis

  • Nutze Application.DisplayAlerts = False, um alle Bestätigungsdialoge zu unterdrücken, bevor du eine Datei schließt. Dies ist besonders nützlich, wenn du mehrere Dateien hintereinander schließt.
  • Überlege, ob du eine Fehlerbehandlung einbaust, um sicherzustellen, dass alle Dateien entweder gespeichert oder geschlossen werden können, ohne dass der Prozess bei einer Fehlermeldung stoppt.
  • Wenn du regelmäßig mit VBA arbeitest, erwäge, deine Makros in einer separaten Datei zu speichern, um sie bei Bedarf einfach wiederverwenden zu können.

FAQ: Häufige Fragen

1. Was macht Application.Quit genau?
Application.Quit beendet die Excel-Anwendung komplett. Stelle sicher, dass alle notwendigen Dateien gespeichert oder geschlossen sind, bevor du diesen Befehl ausführst.

2. Wie kann ich verhindern, dass Excel mich fragt, ob ich die Datei speichern möchte?
Verwende Application.DisplayAlerts = False und achte darauf, dass du das Schließen der Datei mit SaveChanges:=False durchführst.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige