Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Automatisch speichern nach 5 Minuten

Forumthread: Automatisch speichern nach 5 Minuten

Automatisch speichern nach 5 Minuten
21.08.2003 09:31:51
Goofe
Hallo,
ich möchte über ein Makro die geöffnete Datei unter dem aktuellen Dateinamen automatisch alle 5 Minuten abspeichern lassen.
Bin für jeden Tip dankbar!
Gruß,
Goofe
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatisch speichern nach 5 Minuten
21.08.2003 09:37:02
Andi_H
hi goofe,
hab hier was für dich.
Einfach in ein Modul kopieren und Makro starten. Dieses schreibt in Tabelle1 in Zelle a1 die Zeit der nächsten Abspeicherung.

Sub autosave()
On Error Resume Next
Dim NextTime As Date
Dim sPathB As String, sPathW As String
Sheets("Tabelle1").Range("a1").Value = Now + TimeValue("00:10:00")
ActiveWorkbook.Save
Application.OnTime CDate(Sheets("Tabelle1").Range("a1").Value), "autosave"
Application.DisplayAlerts = True
End Sub

gruß
andi

Anzeige
alle 5 minuten
21.08.2003 09:38:42
Andi_H
hi nochmal, meins speichert alle 10 minuten.
läßt sich hier ändern
TimeValue("00:05:00")

AW: alle 5 minuten
21.08.2003 20:57:35
Goofe
Vielen Dank an alle! Es funktioniert.
Gruß,
Goofe

AW: Automatisch speichern nach 5 Minuten
21.08.2003 09:38:46
Dieter Maj
Hallo Goofe
über Extras / Add in Manager / Automatiisches Speichern (Häckchen setzen)
Gruß Dieter

Anzeige
AW: Automatisch speichern nach 5 Minuten
21.08.2003 09:41:22
Ingo
folgendes makro einmal per hand starten, danach springt es automatisch alle 5 Minuten an

Sub abspeichern()
ActiveWorkbook.Save
Application.OnTime Now + TimeValue("00:05:00"), "abspeichern"
End Sub


;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Automatisches Speichern in Excel nach 5 Minuten


Schritt-für-Schritt-Anleitung

Um in Excel automatisch alle 5 Minuten zu speichern, kannst Du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke im Menü auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub autosave()
       On Error Resume Next
       Dim NextTime As Date
       Sheets("Tabelle1").Range("a1").Value = Now + TimeValue("00:05:00")
       ActiveWorkbook.Save
       Application.OnTime CDate(Sheets("Tabelle1").Range("a1").Value), "autosave"
       Application.DisplayAlerts = True
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Starte das Makro, indem Du ALT + F8 drückst, das Makro autosave auswählst und auf Ausführen klickst.

Jetzt wird Deine Datei automatisch alle 5 Minuten gespeichert.


Häufige Fehler und Lösungen

  • Fehler: Das Makro wird nicht ausgeführt.

    • Lösung: Stelle sicher, dass Du das Makro gestartet hast. Du kannst die Makrosicherheit in den Excel-Optionen überprüfen und sicherstellen, dass Makros erlaubt sind.
  • Fehler: Die Datei wird nicht gespeichert.

    • Lösung: Überprüfe, ob die Datei schreibgeschützt ist oder ob Du ausreichende Berechtigungen hast.
  • Fehler: Das Makro speichert nicht alle 5 Minuten.

    • Lösung: Stelle sicher, dass Du TimeValue("00:05:00") korrekt im Code angegeben hast.

Alternative Methoden

Falls Du VBA nicht nutzen möchtest, kannst Du die integrierte Funktion von Excel nutzen:

  1. Gehe zu Extras > Optionen.
  2. Wähle den Reiter Speichern.
  3. Setze ein Häkchen bei Automatisches Speichern alle und gib den gewünschten Intervall (z.B. 5 Minuten) ein.

Diese Methode ist jedoch in der Regel weniger flexibel als das VBA-Makro.


Praktische Beispiele

Du kannst das Makro anpassen, um verschiedene Intervalle zu verwenden. Zum Beispiel:

Sub autosave()
    On Error Resume Next
    Sheets("Tabelle1").Range("a1").Value = Now + TimeValue("00:10:00") ' für 10 Minuten
    ActiveWorkbook.Save
    Application.OnTime CDate(Sheets("Tabelle1").Range("a1").Value), "autosave"
End Sub

Mit diesem Code wird die Datei alle 10 Minuten gespeichert. Ändere einfach den Wert in TimeValue entsprechend.


Tipps für Profis

  • Verwende Application.DisplayAlerts = False, um Benachrichtigungen während des Speichervorgangs zu unterdrücken, wenn Du sicher bist, dass keine Bestätigung erforderlich ist.
  • Integriere Fehlerbehandlungsroutinen, um mögliche Fehler im Speichervorgang zu protokollieren.
  • Teste das Makro in einer Kopie Deiner Datei, um zu vermeiden, dass wichtige Daten verloren gehen.

FAQ: Häufige Fragen

1. Kann ich das Makro auch in Excel 2003 verwenden?
Ja, das VBA-Makro funktioniert auch in Excel 2003. Stelle sicher, dass Du die Datei im richtigen Format (z.B. .xls) speicherst.

2. Wie kann ich das Intervall für das automatische Speichern ändern?
Ändere einfach den Wert in der Zeile TimeValue("00:05:00") im VBA-Code auf die gewünschte Zeit.

3. Was mache ich, wenn ich das Makro nicht finden kann?
Vergewissere Dich, dass Du das Modul im richtigen VBA-Projekt erstellt hast. Du kannst die Makros über ALT + F8 aufrufen.

4. Gibt es eine Möglichkeit, die Datei manuell zu speichern?
Ja, Du kannst jederzeit Strg + S drücken, um die Datei manuell zu speichern, unabhängig vom automatischen Speichern.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige