Guten Morgen zusammen,
Ich habe eine Liste mit 4 Spalten:
A= Nummer
B= Datum
C= Uhrzeit
D= Termin
Wenn in D ein x eingetragen wird, werden A-C automatisch ausgefüllt. Wenn der Termin erledigt ist, wird in der entsprechenden Zeile bei D ein Name eingetragen und die Zeile wird per Bedingte Formatierung gelb. Ebenso wird die Zeile nach unten verschoben damit im oberen Bereich nur die offenen Termine stehen und darunter alle erledigten, also die gelben. So weit so gut, funktioniert. Folgendes möchte ich gerne umsetzten:
Es sollen nur 20 gelbe Zeilen zu sehen sein, sobald eine gelbe Zeile hinzukommt, sollte die älteste gelbe Zeile( also die unterste) in die Tabelle2 kopiert und aus Tabelle1 gelöscht werden. Abfragen könnte man das vielleicht mit der Spalte D, es dürfen nur 20 Namen vorhanden sein oder so ähnlich.
Wenn 21 Namen (mehr wie ein Buchstabe, wegen dem x) in Spalte D vorhanden, dann kopiere letzte Zeile in Tabelle2 und lösche letzte Zeile aus Tabelle1.
Ist dies irgendwie per VBA machbar?
Zb. beim öffnen, schließen der Datei, per Button etc.
Vielen Dank für Eure Hilfe. :43:
LG Stefan
http://www.office-loesung.de/p/viewtopic.php?f=166&t=831534
Ich habe eine Liste mit 4 Spalten:
A= Nummer
B= Datum
C= Uhrzeit
D= Termin
Wenn in D ein x eingetragen wird, werden A-C automatisch ausgefüllt. Wenn der Termin erledigt ist, wird in der entsprechenden Zeile bei D ein Name eingetragen und die Zeile wird per Bedingte Formatierung gelb. Ebenso wird die Zeile nach unten verschoben damit im oberen Bereich nur die offenen Termine stehen und darunter alle erledigten, also die gelben. So weit so gut, funktioniert. Folgendes möchte ich gerne umsetzten:
Es sollen nur 20 gelbe Zeilen zu sehen sein, sobald eine gelbe Zeile hinzukommt, sollte die älteste gelbe Zeile( also die unterste) in die Tabelle2 kopiert und aus Tabelle1 gelöscht werden. Abfragen könnte man das vielleicht mit der Spalte D, es dürfen nur 20 Namen vorhanden sein oder so ähnlich.
Wenn 21 Namen (mehr wie ein Buchstabe, wegen dem x) in Spalte D vorhanden, dann kopiere letzte Zeile in Tabelle2 und lösche letzte Zeile aus Tabelle1.
Ist dies irgendwie per VBA machbar?
Zb. beim öffnen, schließen der Datei, per Button etc.
Vielen Dank für Eure Hilfe. :43:
LG Stefan
http://www.office-loesung.de/p/viewtopic.php?f=166&t=831534
