Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
920to924
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
920to924
920to924
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Excel sofort beenden

Excel sofort beenden
30.10.2007 17:49:00
andre
Hallo, ich habe ein Abfrage im Makro wenn Datei x nicht vorhanden ist kommt die Meldung "Datei nicht vorhanden" dann soll beim Klick auf OK Excel sofort beendet werden ohne Rückfrage ob gespeichert werden soll was gibt man da ein ?
Gruß
Andre

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel sofort beenden
30.10.2007 18:05:00
Chris
Servus,
MsgBox "Datei x nicht vorhanden"
ActiveWorkbook.Saved = True
Application.Quit ' wenn ganz Excel geschlossen werden soll, sonst
ActiveWorkbook.Close
Gruß
Chris

AW: Excel sofort beenden
30.10.2007 18:05:52
Matthias
Hallo Andre
Da Du Deinen Code nicht zeigst, kann man nur allgemein antworten
Baue ein On Error ein
z.B On Error goto CodeZeile
und dann
CodeZeile:
ThisWorkbook.Saved=True
und dann Datei schließen
Schau Dir mal die Saved-Eigenschaft an
ungetestet ! ... wie sollte man auch testen.
Userbild

Anzeige
AW: Excel sofort beenden
30.10.2007 18:11:43
Matthias
Hallo Andre,
damit nicht auch andere Mappen, die mit Deiner nichts zu tun haben, geschlossen werden, kann man abfragen:

If Workbooks.Count = 1 Then
ThisWorkbook.Saved = True
Application.Quit
Else
ThisWorkbook.Close SaveChanges:=False
End If


Gruß Matthias

AW: Excel sofort beenden
30.10.2007 18:26:00
andre
Danke an alle !!! für eure Tipps, funktioniert perfekt.
Gruß
Andre

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige