Excel VBA - Zellen nach Datum löschen?

Hallo Liebe Excel - Kenner,

gibt es die Möglichkeit oder einen Code, wo ich Zellen löschen die ich nach Datum und Uhrzeit bestimme?

Bsp: Zelle A1: K30 löschen am 25.03.2016 - 14:00 Uhr

Gruß Manuel

4 Antworten

Vom Fragesteller als hilfreich ausgezeichnet

Iamiam

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Microsoft Excel

21.03.2016, 11:29

Zelle A1: K30 löschen am 25.03.2016 - 14:00 Uhr
Das µ muss ja allgemein formuliert sein, sonst macht das keinen Sinn. Also zB jeden Freitag 14:00, wenn die Woche abgelaufen ist (keine WE-Vorausplanung? GGF ENTSPRECHEND ÄNDERN)

Wenn in A1:E5 Deine Datümer Mo:Fr stehen (wirklich in A1, keine Titelspalten für zB Schicht oder Zeit?), dann (ins Worksheet-Modul, nur Entwurf, Trockenübung):

Sub worksheet_selectionchange()
if Now() > E5 + 0,5833334 then Range("A1:K30").delete Shift:=xltoleft
end sub 'die einzeilige (Merkelsche=alternativlose) if-Variante braucht kein End if

Den üblichen Kladderadatsch für Target etc kannst Du Dir hier sparen.

Das 0,5833334 ist der Zeitwert für 14:00+ und kann vllt auch anders formuliert werden, probier ich jetzt nicht aus

Gibt sicher noch andere brauchbare Ereignis-Makros (Worksheet_activate() ? worksheet_change() ? sowie Max's Workbook_activate(), Workbook_open(), Letztere aber ins Workbook-Modul: funktionieren dann jeweils bei der entsprechenden Aktion, ich probier das aber jetzt ebenfalls nicht aus)

Iamiam

19.05.2016, 00:46

danke für den * ! Das ist mir die liebste Rückmeldung ;)

maximilianus7

Nutzer, der sehr aktiv auf gutefrage ist

im Thema programmieren

20.03.2016, 01:35

also auf die uhrzeit kommts nicht an.

du brauchst die sub Workbook_Open() im projektteil diesearbeitsmappe. diese wird immer ausgeführt wenn du xlsm datei öffnest. in dieser prozedur schleifst du über die spalte mit den datumseinträgen (aber rückwärts), überprüfst ob es ein löschkandidat ist (die funktion datediff könnte hilfreich sein) und mit

Rows(i).Delete Shift:=xlUp

wird gelöscht. oder waren es spalten?

Bensemilia

Fragesteller

20.03.2016, 01:53

Es waren Spalten

maximilianus7

20.03.2016, 15:18

@Bensemilia

gut, dann weisst du ja wies geht.

Iamiam

20.03.2016, 16:00

@maximilianus7

achtung: xltoleft, xlleft ist schon belegt für Position von Objekten!

maximilianus7

Nutzer, der sehr aktiv auf gutefrage ist

im Thema programmieren

19.03.2016, 22:10

du solltest genauer beschreiben was dein problem ist. soll was automatisch ablaufen? kannst du VBA?

Bensemilia

Fragesteller

19.03.2016, 23:15

Hey,

Ich habe immernoch meinen Schichtplan vor Augen und die Kalenderwochen sollen nach jederwiche gelöscht werden.

Somit würde ich gerne in VBA programmieren das excel automatische nach einer Woche eine Kalenderwochen entfernt, damit die Planung weitergehen kann.

VBA Spezialist bin ich nicht aber ich kann es anwenden.

Gruß Manuel

Bensemilia

Fragesteller

19.03.2016, 23:25

@Bensemilia

Sprich ich möchte ein Marko an einem bestimmten Tag und Uhrzeit ausführen.

dkilli

19.03.2016, 21:43

Hallo Manuel,

vielleicht nützt dir dies

https://www.administrator.de/frage/excel-bereich-vba-l%C3%B6schen-50766.html

Ähnliche Fragen

VBA: Datum aus Zelle lesen?

Hallo, ich habe eine große Excel Tabelle und muss nun das Datum aus einer Zelle lesen, um es in eine andere zu schreiben. In der Zelle steht beispielsweise "neu ab 07.05.16". Jetzt muss ich aus dieser Zelle das "07.05.16" lesen und in eine andere schreiben. Die Zellen haben immer dasselbe Format: Neu ab 'Datum'. Kann mir hier jemand helfen? Das ganze soll mit VBA gemacht werden.

...zur Frage

Excel VBA Aktive Zelle mit Doppelklick in Zwischenablage?

Hallo ihr,

ich habe ein Problem mit einer Excel Anwendung, die ich machen möchte.

Ich habe einige Zellen in Excel, die jeweils einige Nummern oder Kennzeichnungen enthalten.

Für verschiedene Fälle muss ich einige dieser Nummern in eine Liste herausschreiben.

Ich möchte gerne, dass wenn ich auf eine Zelle Klicke oder Doppelklicke, dass sich der Inhalt dieser Aktiven Zelle in die Zwischenablage kopiert. Im Besten Fall fügt sich die Zwischenablage dann untereinander in einem Excel Blatt wieder ein, sodass ich nacheinander die verschiedenen Zellen anklicken kann und meine Liste so zusammenstellen kann.

Habe in VBA schon versucht, sowas zu realisieren, aber bis jetzt hat das nicht so funktioniert.

Ich hoffe, jemand kann mir weiterhelfen.

Vielen Dank!

...zur Frage

VBA für Datum und Uhrzeitauflistung (Fortführung), beim öffnen der Arbeitmappe?

Hallo VBA-Profis,

ich hätte gerne (bei Zelle A1 und B1 beginnend) ein VBA, dass beim öffnen der Arbeitsmappe, das Datum und die Uhrzeit sich auflistet, bzw. Fortführt.

D. h. beim 1. öffnen der Arbeitsmappe soll die Zelle A1 mit Datum und B1 mit Uhrzeit versehen werden (ungefähr so siehe Abb.)

Jetzt möchte ich, dass beim 2. öffnen der Arbeitsmappe, die Daten in A1 und B1 bestehen bleiben und das neue Datum und Uhrzeit in A2 (Datum) und B2 (Uhrzeit) eingetragen wird.

Beim 3. öffnen, A3 und A4 aktualisiert wird, u.s.w., aber die vorherigen Daten sollen stets erhalten bleiben.

Gibt es einen Möglichkeit dies stetig fortzuführen, optimal wäre sicherlich die Spalte A und B ohne Begrenzung, außer der möglichen Zeilenmenge-Verfügbarkeit von 1.048.576 Zeilen (so bei EXCEL 2019).

Ich habe keine VBA-Syntax-Kenntnisse !

Freue mich über eine Idee Eurerseits.

Gruß Tron

...zur Frage

Werte untereinander in Excel erfassen - VBA

Frage an die Excel Profis und VBA Experten. Die Aufgabenstellung baut aufeinander auf.

Aufgabenstellung: Zelle A1 soll als Eingabefeld in Excel dienen. Alle Werte, die in A1 eingegeben werden, sollen einfach untereinander ausgegeben werden, also in a2, a3, a4 usw. Die Cursormarkierung (damit meine ich die schwarze Umrahmung der aktiven Zelle) bleibt aber in A1.
Aufgabenstellung: Aufbauend auf Aufgabenstellung 1 soll nun nachdem in A1 ein Wert eingegeben wurde, der Wert wie gehabt in A2 erscheinen. Die schwarze Umrahmung soll aber jedoch zunächst in B2 erscheinen um einen weiteren Wert einzugeben. Erst nach Eingabe eines Wertes in B2 soll die Umrahmung wieder in A1 springen, damit ein nächster Wert eingegeben werden kann, der dann in Zelle A3 erscheint. Dann springt die Cursormarkierung in B3, um einen Wert einzugeben. Danach wieder in A1 usw.
Aufgabenstellung: Aubauend auf Aufgabenstellung 2 sollen die Werte, die in den Zellen der Spalte B eingegeben werden, mit den Werten der Spalte A im Reiter "Tabelle2" verglichen werden. Sofern der eingegebene Wert in der Spalte B mit denen der Spalte A (Reiter Tabelle2) übereinstimmt, soll Excel ein Fenster öffnen, in dem "Wert gefunden" steht.

Ist das in Excel 2003 per VBA für alle 3 Aufgabenstellungen möglich?

...zur Frage

Excel Zelle als Button

Hallo zusammen,

Ich möchte in VBA etwas programmieren, und dazu ist es nötig dass eine Zelle als Button funktioniert. Das heisst, sobald ich z.B auf die Zelle A1 klicke, also die aktiviert wird, soll ein Makro ausgeführt werden. Wie kann ich das realisieren?

MfG Duma123

...zur Frage

Excel: Bestimmten Teil aus Zelle löschen?

Also ich habe zwei Zellen A1 und B1. In A1 steht servus und in B1 soll serv stehen.

Aber wenn ich in A1 anstatt servus zum Beispiel dominus reinschreibe soll der trotzdem in B1 domin reinschreiben bzw. das us löschen.

Wie geht das? XD

...zur Frage

VBA Datum vergleichen und neu speichern?

Hallo,

ich bin leider noch eine niete was VBA angeht, weshalb ich gerade auf externe Hilfe angewiesen bin. Und zwar habe ich eine Excel Datei in dem z.B ab Zelle A15 bis A90 verschiedene Daten(Datum ebem) stehen.

Es kann auch sein dass manche Zellen ohne Datum sind. Nun versuche ich ein VBA Makro zu erstellen, welches sobald man die Datei öffnet durch ein MsgBox abfrage diese Daten mit dem heutigen Datum vergleicht und mir im Outlook einen Reminder eine Woche vorab erstellt wenn diese Daten älter als 5 Wochen sind und diese bald ablaufen.

Ich wäre euch äußerst Dankbar wenn man mir die Bausteine dazu zur Verfügung stellt.

Grüße

...zur Frage

Excel Text aus Zelle filtern?

Hallo,

ich habe mehrere hundert Zellen in einer Spalte die jeweils eine Beschreibung und eine dazugehörige AA Nummer innerhalb einer Zelle beinhaltet. Nun möchte ich aber die ganze Beschreibung raushaben und im Prinzip nur die AA-Nummer rausfiltern, bzw. die Zelle auf diese Nummer reduzieren. Gibt es solch eine Funktion bei Excel oder vielleicht mit VBA? Beispiel wie diese Zellen aktuelle aussehen im Bild (s.u.)

LG Aseterus

...zur Frage

VBA laufende Uhrzeit?

Ich würde gern ein Makro haben das ich an ein Knopf binde. Sobald der knopf gedrückt wird soll in Zelle A1 die laufende Uhrzeit erscheinen. Ein anderer Knopf soll das wieder beenden und die letzte Uhrzeit bleibt dann in der Zelle.

jemand eine Idee oder gar ein Code ?

Danke

...zur Frage

Excel VBA - Wert auslesen?

Mein Problem:

Mit dem ersten Makro wird ein Wert in Zelle A1 geschrieben.

In einem weiteren Makro will ich nun diesen Wert auslesen mit Worksheets("Blatt1").Cells(1, 1).Value = i. Wenn ich das mache steht danach in Zelle A1 aber eine 0 und nicht mehr der vorige Wert. Was ist falsch?

...zur Frage

Fenster fixieren in Excel?

Hey. Es ist ja in Excel möglich sowohl über die Auswahl im Menu Ansicht, als auch durch VBA-Programmierung (wo ich mich nicht auskenne) möglich einen Bereich auszuwählen, welcher fixiert werden soll, wenn man durch das Datenblatt scrollt.
Nun ist es aber anscheinend nur möglich Excel mitzuteilen, welche Spalten links und welche Zeilen oberhalb der ausgewählten Zellen fixiert werden soll.
Bsp: Markierung der Zelle F4. Die Zellen von A1:E3 werden fixiert.

Ist es auch möglich die Range individuell festzulegen. Also dass die "Startzelle" nicht A1 sondern z.B. B2 ist; Range ("B2:F4)?
Ich habe leider nichts dazu gefunden, auch nicht mit VBA.

Ich hoffe es ist klar geworden, was ich meine. Danke

...zur Frage

Wie kann ich Excel-Zellen für Word auslesen?

Ich muss den Inhalt einer speziellen Zelle in einem Excel-Sheet als String auslesen und in einem Word-Dokument einfügen. Das ganze soll per VBA funktionieren. Dabei sollte die Excel-Datei bestenfalls geschlossen bleiben. Kann jemand helfen? Nutze MS-Office 2013.

...zur Frage

Wie kann ich Zellen löschen in excel, es kommt Zellen löschen und danach kommt nur noch Spalten oder Zeilen löschen, ich möchte aber Zelle löschen?

...zur Frage

Wie ermittelt man in Excel (VBA) den Zelleninhalt bei verbundenen Zellen?

Ich durchlaufe in meinem Excel VBA-Script die Zellen einer Spalte, um den Zelleninhalt auszuwerten. Nun kann es passieren daß Zellen "verbunden" sind. In diesem Fall liefert mir das Script nur jeweils für die linke oberste Zelle der verbundenen Zellen den Wert zurück. In den anderen Zellen kommt Blank zurück. Ich würde in allen Zellen den gleichen Wert zurückerwarten?
Wie könnte man das bewerkstelligen?
Hardcopy/Beispiel: In den grünen Spalten steht was ich erwarten würde. In den gelben die tatsächliche VBA-Ausgabe.

Private Sub Worksheet_Activate()
  Dim iRow As Integer
  iRow = 4
  Do
    Worksheets("Test").Cells(iRow, 5) = Worksheets("Test").Cells(iRow, 1)
    Worksheets("Test").Cells(iRow, 7) = Worksheets("Test").Cells(iRow, 2)
    iRow = iRow + 1
    If iRow > Worksheets("Test").UsedRange.Rows.Count Then Exit Do
  Loop
End Sub

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen