Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1632to1636
1632to1636
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelleninhalte bei gewisser Uhrzeit löschen

Forumthread: Zelleninhalte bei gewisser Uhrzeit löschen

Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 07:44:35
alex_de_souza
Hallo Profis,
ich möchte, dass der Text in den Zellen C3 bis C8 und E3 bis E8 zu einer bestimmten Zeit(z.b. 13:05:00) gelöscht wird und die Zellen wieder leer sind.
Ich habe mich schon durchgeklickt, jedoch finde keine passende VBA Lösung.
Kann mir jemand bitte weiterhelfen?
Vielen Dank.
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 07:58:17
Daniel
Hi
Schau dir mal Application.OnTime an
Damit kannst du ein Makro zu einer bestimmten Uhrzeit starten lassen.
Gruß Daniel
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 08:06:14
alex_de_souza
Hallo Daniel,
vielen Dank für deine Antwort.
Bei meiner Recherche bin ich auch auf Application.OnTime gestoßen.
Konkret habe ich folgenden Code in ein Modul eingegeben. Jedoch passiert leider nichts:
Sub ooh()
Application.OnTime TimeValue("08:10:00"), "loeschen"
End Sub


Sub loeschen()
With ActiveSheet
.Range("C3:C8").ClearContents
.Range("E3:E8").ClearContents
End With
End Sub
Ich setze es wahrscheinlich falsch ein.
Anzeige
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 08:16:57
Daniel
Hi
Sollte laufen
Gib mal Datum und Uhrzeit an, Date + Timeserial(8, 20, 0)
Das Makro ooh ist vor dieser Uhrzeit gestartet worden?
Gruß Daniel
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 08:16:58
Daniel
Hi
Sollte laufen
Gib mal Datum und Uhrzeit an, Date + Timeserial(8, 20, 0)
Das Makro ooh ist vor dieser Uhrzeit gestartet worden?
Gruß Daniel
Anzeige
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 08:26:22
alex_de_souza
Hallo Daniel,
diese beiden Codes habe ich in ein Modul eingetragen. Das Makro ooh() ist ja dafür da, damit es einen Bezug für das Makro loeschen() gibt, oder? Ich habe den Code aus dem Internet gefunden und versucht anzupassen.
Ich verstehe nicht ganz, was du damit meinst. :(
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 08:35:29
Daniel
das Makro "loeschen" muss in einem allgemeinen Modul stehen (Modul1)
es darf nicht in einem Tabellenblattmodul (Tabelle1) oder in DieseArbeitsmappe stehen.
für das Makro ooh ist es egal wo es steht.
das Makro ooh muss vor dem gewünschten Zeitpunkt einmal laufen, um den Makrostart anzustoßen.
Gruß Daniel
Anzeige
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 09:01:08
alex_de_souza
Ok, ich glaube ich habe den "Fehler" gefunden. Das Makro funktioniert. Jedoch wird es nicht von selbst ausgeführt, sobald ich die Excl Datei öffne. Wenn ich im VBA Editor auf ausführen gehe, geht es.
AW: Zelleninhalte bei gewisser Uhrzeit löschen
06.07.2018 09:11:03
UweD
Hallo
dann muss du es in
"DieseArbeitsmappe verschieben" 

Private Sub Workbook_Open()
Application.OnTime TimeValue("08:10:00"), "loeschen"
End Sub
Dann wird es beim Öffnen gestartet
LG UweD
Anzeige
AW: Zellinhalt nach Vorgabe löschen
06.07.2018 09:12:59
Dieter(Drummer)
Hallo alex,
du kannst das Makro "ooh" in "DieseArbeitsmappe" setzen: 
Public Sub Workbook_Open ()
Application.OnTime TimeValue("08:55:00"), "loeschen" 'z.B. Löschzeit
End sub

Achtung: So wird beim Start der Datei, die Löschzeit aus Code aktiviert. Ob das sinnvoll ist, musst du entscheiden.
Gruß, Dieter(Drummer)
Anzeige
AW: Zellinhalt nach Vorgabe löschen
06.07.2018 09:21:30
alex_de_souza
Danke euch für die Hilfe.
LG
AW: Gerner. Danke für Rückmeldung. Gruß owT
06.07.2018 10:22:41
Dieter(Drummer)
Anzeige
Anzeige

Infobox / Tutorial

Zelleninhalte zu einer bestimmten Uhrzeit automatisch löschen

Schritt-für-Schritt-Anleitung

Um die Zelleninhalte in Excel zu einer bestimmten Uhrzeit zu löschen, benötigst du ein einfaches VBA-Makro. Folge diesen Schritten:

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

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

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

    Sub ooh()
   Application.OnTime TimeValue("13:05:00"), "loeschen"
End Sub

Sub loeschen()
   With ActiveSheet
       .Range("C3:C8").ClearContents
       .Range("E3:E8").ClearContents
   End With
End Sub

  4. Stelle sicher, dass das Makro ooh() vor der gewünschten Uhrzeit einmal manuell ausgeführt wird, damit der Timer gesetzt wird.

  5. Um sicherzustellen, dass das Makro beim Öffnen der Datei automatisch läuft, füge den folgenden Code in das Modul DieseArbeitsmappe ein:

    Private Sub Workbook_Open()
   Application.OnTime TimeValue("13:05:00"), "loeschen"
End Sub

  6. Speichere die Datei im .xlsm-Format, um die Makros zu aktivieren.

Häufige Fehler und Lösungen

  • Fehler: Das Makro wird nicht automatisch beim Öffnen der Datei ausgeführt.

    • Lösung: Stelle sicher, dass der Code Workbook_Open() im Modul DieseArbeitsmappe korrekt eingefügt wurde.

  • Fehler: Das Makro loeschen wird nicht gefunden.

    • Lösung: Vergewissere dich, dass das Makro loeschen in einem allgemeinen Modul (z.B. Modul1) gespeichert ist und nicht in einem Tabellenblattmodul.

Alternative Methoden

Falls du keine VBA-Lösungen verwenden möchtest, könntest du auch:

  • Bedingte Formatierung nutzen, um Zellen visuell zu markieren, anstatt sie zu löschen.
  • Formeln verwenden, um Inhalte zu ändern, wenn eine bestimmte Uhrzeit erreicht ist, allerdings kannst du damit die Zelleninhalte nicht wirklich löschen.

Praktische Beispiele

Angenommen, du möchtest die Zelleninhalte in den Zellen C3 bis C8 und E3 bis E8 jeden Tag um 13:05 Uhr löschen. Nutze den bereitgestellten VBA-Code. Du kannst die Uhrzeit im Application.OnTime Befehl einfach anpassen, um die Löschzeit zu ändern.

Tipps für Profis

  • Teste dein Makro in einer Kopie deiner Arbeitsmappe, um unerwünschte Datenverluste zu vermeiden.

  • Du kannst die Löschzeit dynamisch gestalten, indem du sie durch eine Zelle in deinem Arbeitsblatt steuerst. Zum Beispiel:

    Application.OnTime Range("A1").Value, "loeschen"

  • Achte darauf, dass die Uhrzeit im korrekten Format (hh:mm:ss) eingegeben wird.

FAQ: Häufige Fragen

1. Wie kann ich die Uhrzeit anpassen, zu der die Zellen geleert werden?
Du kannst die Uhrzeit im Application.OnTime Befehl einfach ändern, z.B. TimeValue("08:10:00").

2. Was passiert, wenn das Makro nicht rechtzeitig ausgeführt wird?
Das Makro wird nicht ausgeführt, wenn Excel nicht geöffnet ist oder die Datei nicht aktiv ist. Stelle sicher, dass die Datei vor der festgelegten Uhrzeit geöffnet ist.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige