Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Bei Excel das Schließen über das Kreuz verhindern?

Bei Excel das Schließen über das Kreuz verhindern?
01.03.2013 20:19:24
Frank
Hallo Zusammen und allen vorab ein schönes WE!
Kann man verhindern, das Excel über das rote X rechts oben geschlossen wird? Ich möchte gern, dass das Schließen nur über eine Schaltfläche welche sich auf dem Tabellenblatt befindet, möglich ist!
Geht das und wenn ja wie? Danke im Voraus!
Gruß Frank H.

Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Cancel = True
01.03.2013 20:35:27
Matthias
Hallo
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = True
End Sub
Gruß Matthias

Hast du das ausprobiert, ...
01.03.2013 20:42:31
Luc:-?
…Matti?
Wie schließt du Xl dann?
Gruß Luc :-?

AW: Hast du das ausprobiert, ...
01.03.2013 20:49:03
Frank
Hallo noch einmal!
Das ist nun auch mein Problem, denn da funzt ja Close in meinem BGefehl auchg nicht mehr!
Wer kann helfen?
Gruß Frank H.

Anzeige
Ja, hab ich. Luc ...
01.03.2013 20:52:47
Matthias
Hallo
Button einfügen
und den Code benutzen:
Sub MYClose()
Application.EnableEvents = False
ThisWorkbook.Close
Application.EnableEvents = True
End Sub
https://www.herber.de/bbs/user/84135.xls
Gruß Matthias

Anzeige
AW: Ja, hab ich. Luc ...
01.03.2013 21:13:19
Frank
Hallo Matthias!
Nun lässt sich aber auch deine Datei wieder mit dem X Schließen?
Gruß Frank H.

wie jetzt ?
01.03.2013 21:18:46
Matthias
Hallo
Zitat
Nun lässt sich aber auch deine Datei wieder mit dem X Schließen?
Die Datei wird doch durch den Klick aufs Button geschlossen, so wolltest Du das doch!
siehe Zitat:
Ich möchte gern, dass das Schließen nur über eine Schaltfläche welche sich auf dem Tabellenblatt befindet, möglich ist!
Gruß Matthias

Anzeige
AW: wie jetzt ?
01.03.2013 21:29:43
Frank
Hallo Matthias!
Ja eben nur über meine eigene Schaltfläche und nicht auch noch über das X. Am besten wäre es, wenn jemand das X anklickt, kommt 'ne Meldung, "Bitte benutzen Sie die Beenden-Schaltrfläche!" Kannst du das lösen?
Gruß Frank H.

meinen wir beide was Verschiedenes?
01.03.2013 21:35:14
Matthias
Hallo
Nur wenn Du auf die Schaltfläche klickst, wird die Datei geschlossen. sonst bleibt sie doch geöffnet.
Du kannst 1000 mal aufs Kreuz klicken, die Datei bleibt solange offen bis Du aufs Button klickst.
Gruß Matthias

Anzeige
AW: meinen wir beide was Verschiedenes?
01.03.2013 21:50:41
Frank
Hallo Matthias!
Bei deiner Datei funzt es erstaunlicher Weise auch nun bei mir! Liegt es an deiner Version 2003 und an meiner 2010! Das es bei mir nicht funzt?
Gruß Frank H.

keine Ahnung habs mit XL2007 getestet ... kwT
01.03.2013 21:53:20
Matthias

wie kommst Du eigentlich auf Version 2003 ?
01.03.2013 22:16:05
Matthias
Hallo
Ich hab doch nie was von Version 2003 geschrieben.
Ich benutze XL2000 und XL2007 parallel
Gruß Matthias

Anzeige
Xl2K ist gut, ...
02.03.2013 01:18:58
Luc:-?
…Matti,
da war die xlWelt noch iO…! ;-)
Jetzt muss man, falls etwas versionsübergreifend sein soll, 'ne bedingte Kompilierung wohl auf jede neue Version setzen… :-[
Gruß+schöSo, Luc :-?

Das wäre ein Weg, ...
01.03.2013 22:41:52
Luc:-?
…Matti,
wenn's verlässlich ist. Dann gibt's auch noch das Xl-Schließkreuz. Leider gibt's kein Terminate-Ereignis, aber noch Workbook_Deactivate und …_WindowDeactivate und das natürlich auch annähernd analog für die Application.
Außerdem sollte zum Stichwort Schließkreuz auch einiges in der Archiv-Recherche zu finden sein — hoffentlich nicht nur zu UForms und InputBoxes!
Gruß Luc :-?
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Excel: Schließen über das Kreuz verhindern


Schritt-für-Schritt-Anleitung

Um zu verhindern, dass Excel über das rote Kreuz in der oberen rechten Ecke geschlossen wird, kannst du den folgenden VBA-Code verwenden. Dieser Code sorgt dafür, dass das Schließen der Excel-Datei nur über eine Schaltfläche auf dem Tabellenblatt möglich ist.

  1. Öffne die Excel-Datei, bei der du das Schließen über das Kreuz verhindern möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Doppelklicke im Projektfenster auf „DieseArbeitsmappe“ (ThisWorkbook).

  4. Füge den folgenden Code in das Codefenster ein:

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
       Cancel = True
    End Sub
  5. Um die Datei über eine Schaltfläche zu schließen, füge einen Button auf dem Arbeitsblatt hinzu:

    • Gehe zum Reiter „Entwicklertools“.
    • Klicke auf „Einfügen“ und wähle „Button (Formularsteuerung)“.
    • Zeichne den Button auf dem Arbeitsblatt und weise ihm den folgenden Code zu:
    Sub MYClose()
       Application.EnableEvents = False
       ThisWorkbook.Close
       Application.EnableEvents = True
    End Sub
  6. Speichere deine Änderungen und teste die Funktionalität.


Häufige Fehler und Lösungen

  • Fehler: Excel lässt sich nicht schließen, wenn ich auf das Kreuz klicke.
    Lösung: Überprüfe, ob der VBA-Code korrekt eingefügt wurde und keine anderen Makros in Konflikt stehen.

  • Fehler: Die Schaltfläche schließt die Datei nicht.
    Lösung: Stelle sicher, dass du den Button korrekt zugeordnet hast und dass der Code für MYClose ohne Fehler ist.


Alternative Methoden

Eine alternative Methode, um das Schließen der Excel-Anwendung zu verhindern, besteht darin, das Ereignis Workbook_Deactivate zu verwenden. Damit kannst du eine Nachricht anzeigen, wenn der Benutzer versucht, Excel über das Kreuz zu schließen:

Private Sub Workbook_Deactivate()
    MsgBox "Bitte benutze die Beenden-Schaltfläche!"
End Sub

Diese Methode ist hilfreich, um Benutzer daran zu erinnern, wie sie die Datei korrekt schließen sollten.


Praktische Beispiele

  • Beispiel 1: Du hast eine Excel-Anwendung, die wichtige Daten enthält, und du möchtest sicherstellen, dass Benutzer die Datei nicht versehentlich schließen. Mit obigen Codes kannst du das verhindern und eine kontrollierte Schließmethode anbieten.

  • Beispiel 2: In einer Schulungsumgebung kannst du die Schaltfläche so gestalten, dass sie das Dokument speichert und dann schließt, um Datenverlust zu vermeiden.


Tipps für Profis

  • Verwende Application.DisplayAlerts = False, um Warnmeldungen beim Schließen zu unterdrücken, aber sei vorsichtig, diese Funktion nicht zu missbrauchen, um wichtige Informationen zu verlieren.
  • Teste deine VBA-Codes immer in einer Kopie deiner Datei, um ungewollte Datenverluste zu vermeiden.
  • Denke daran, die Datei im .xlsm-Format zu speichern, um die Makros zu aktivieren.

FAQ: Häufige Fragen

1. Warum kann ich Excel nicht über das Kreuz schließen?
Der VBA-Code, den du implementiert hast, verhindert das Schließen über das rote Kreuz, sodass die Datei nur über die definierte Schaltfläche geschlossen werden kann.

2. Funktioniert das in allen Excel-Versionen?
Die beschriebenen Methoden sind in den meisten modernen Excel-Versionen, einschließlich Excel 2007 und 2010, anwendbar. Einige Funktionen können jedoch leicht variieren. Stelle sicher, dass du die Kompatibilität prüfst.

Beliebteste Forumthreads (12 Monate)

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