Hajo's Excelzeiten mit einer umfangreiche Beispielsammlung zum kostenfreien Download. 
			Sowohl Formellösungen als auch Beispiele für die Makroprogrammierung in Excel.
Home
VBA Beispiele

  Allgemein
  Bilder einfügen
  blinkender Zellinhalt
  Counter
  Datei schließen
  Dateikopie
  Dateiverwaltung
  Datensätze umschreiben
  Datum / Zeit
  DropDown-Listenfeld
  Drucken
  Ersatz bedingte Formatierung
  Füllfarbe
  Kontextmenü
  Markieren
  nur mit Makros
  Sound
  Stoppuhr
  Symbolleiste Formular
  Symbolleiste vor 2007
  Symbolleiste ab 2007
  UserForm

ohne VBA Beispiele
fremde Dateien
Hinweise zu Excel ab Version 2007
Übersicht Downloads
Bilder
Kontakt
Favoriten
Tools Tabelle Forum
Impressum
Copyright
Disclaimer
chCounter3
Datenschutzerklärung

letzte Bearbeitung 07.01.24

Valid XHTML 1.0 Strict CSS ist valide!
Bing
Suchmaschinenoptimierung mit Ranking-Hits

VBA Beispiele Seite Datei schließen
Die Arbeitsmappen wurden unter Betriebssystem XP mit Excelversion 2003, Betriebssystem Vista Ultimate mit Excelversion 2007,  Windows 7 mit Excelversion 2010 und Windows 8 mit Excelversion 2013, Windows 10 mit Excelversion 2016 getestet.
Hinweis: generell wurde mit Excel-Version 32 Bit getestet, nur wenige Beispiele unter 64 Bit. Bei auftretenden Problemen bitte eine Mail an die im Impressum aufgeführte Mailadresse

Datei schließen01

Bei Inaktivität wird die Arbeitsmappe nach einer im Code festgelegten Zeit geschlossen. Dabei wird die Arbeitsmappe gespeichert. Eine Aktion in der Arbeitsmappe bewirkt, dass die Zeit für die Inaktivität wieder bei 0 beginnt.
In 2016 64 Bit getestet.

Änderung:
01. 26.04.07 Zeitabstand der Prüfung als Const DaZeit als Date definiert
02. 26.04.07 Arbeitsmappe für Version 2007 ergänzt
03. 12.08.10 Kommentar im Code überarbeitet

Stand 13.05.21

Datei schließen02

Bei Inaktivität wird nach 15 Sekunden eine UserForm eingeblendet. Wird der Schalter nicht innerhalb von 10 Sekunden gedrückt, wird die Arbeitsmappe geschlossen. Die Betätigung des Schalters oder eine Aktion in der Arbeitsmappe bewirken, dass  die Zeit für die Inaktivität wieder bei 0 beginnt. Die Auswahl einer Zelle ist bereits eine Aktion. Ist nur diese Arbeitsmappe geöffnet, wird Excel geschlossen.
Veränderung durch Nepumuk: Ist Excel im Hintergrund aktiv, wird die UserForm trotzdem im Vordergrund angezeigt. Mein besonderer Dank gilt Hermann Huber für die ausführliche Testung.
In 2016 64 Bit getestet

Änderung:
01. Code für das Schießen der Arbeitsmappe geändert
02. 26.04.07 Beschreibung in der Tabelle ergänzt
03. 26.04.07 Kommentare im Code ergänzt
04. 26.04.07 Zeitabstand der Prüfung als Const DaZeit und DaZeit1 als Date definiert
05. 26.04.07 Arbeitsmappe für Version 2007 ergänzt
06. 12.08.10 Kommentar im Code überarbeitet

Stand 13.05.21

Datei schließen03

Bei Inaktivität wird die Arbeitsmappe nach einer im Code festgelegten Zeit geschlossen. Dabei wird die Arbeitsmappe gespeichert. Die Restzeit wird in Zelle A1 angezeigt. Eine Aktion in der Arbeitsmappe bewirkt, dass  die Zeit für die Inaktivität wieder bei 0 beginnt.
In 2016 64 Bit getestet

Änderung:
01. 26.04.07 Beschreibung in der Tabelle ergänzt
02. 26.04.07 Kommentare im Code ergänzt
03. 26.04.07 Zeitabstand der Prüfung als Const DaZeit als Date definiert
04. 26.04.07 Arbeitsmappe für Version 2007 ergänzt
05. 12.08.10 Kommentar im Code überarbeitet

Stand 13.05.21

Datei schließen04

Bei Inaktivität wird nach 15 Sekunden eine UserForm eingeblendet. In der UserForm wird die verbleibende Zeit bis zum Schließen der Arbeitsmappe angezeigt. Wird der Schalter nicht innerhalb von 10 Sekunden gedrückt, wird die Arbeitsmappe geschlossen. Die Betätigung des Schalters oder eine Aktion in der Arbeitsmappe bewirken, dass die Zeit für die Inaktivität wieder bei 0 beginnt. Die Auswahl einer Zelle ist bereits eine Aktion. Ist nur diese Arbeitsmappe geöffnet, wird Excel geschlossen.
Veränderung durch Nepumuk: Ist Excel im Hintergrund aktiv, wird die UserForm trotzdem im Vordergrund angezeigt.
In 2016 64 Bit getestet

Änderung:
01. 12.08.10 Kommentar im Code überarbeitet

Stand 13.05.21

Datei schließen05

Bei Inaktivität wird nach 15 Sekunden eine UserForm eingeblendet. In der UserForm wird die verbleibende Zeit bis zum Schließen der Arbeitsmappe angezeigt. In der UserForm kann ein Schalter gedrückt werden, der das automatische schließen beendet. Wird ein Schalter nicht innerhalb von 10 Sekunden gedrückt, wird die Arbeitsmappe geschlossen. Die Betätigung des Schalters oder eine Aktion in der Arbeitsmappe bewirken, dass die Zeit für die Inaktivität wieder bei 0 beginnt. Die Auswahl einer Zelle ist bereits eine Aktion. Ist nur diese Arbeitsmappe geöffnet, wird Excel geschlossen.
Veränderung durch Nepumuk: Ist Excel im Hintergrund aktiv, wird die UserForm trotzdem im Vordergrund angezeigt.
In 2016 64 Bit getestet

Änderung:
01. 12.08.10 Kommentar im Code überarbeitet
02. 02.09.12 Kommentar in Tabelle überarbeitet
02. 04.09.12 Restzeit in UserForm überarbeitet

Stand 13.05.21

Dies ist der Link zur der Webseite, die ich als Seite des Diagrammexperten im deutschsprachigen Raum ansehe.

Mein besonderer Dank gilt in diesem Zusammenhang Karin Mohnhaupt, die mich seit September 2005 bei der Erstellung dieser Homepage redaktionell unterstützt. Bei der intensiven Prüfung der Beispielarbeitsmappen hat sie mich auch auf einige Punkte hingewiesen, die ich als Autor als selbstverständlich angesehen hätte, die aber für den normalen User nicht immer nachvollziehbar gewesen wären.