Makro läuft in Schleife bis zum Absturz
04.06.2020 16:37:12
Reto
Wieder einmal lande ich mit einem Problem, bei dem ich nicht weiter komme in diesem Forum.
Vermutlich wurde diese oder eine ähnliche Lösung schon genannt, ich konnte aber auch nach langer Suche nichts finden.
Mein VBA Code ist zusammengestückelt und abgeändert (alles aus diesem Forum - danke). Vermutlich nicht sehr elegant, aber es läuft irgendwie...
Das Makro, kopiert die Zellen "A13:G19" aus Tabelle 1 und fügt diese in Tabelle 2 ein (erste frei Zeile). Das funktioniert so lang ich das Datum in A3 manuell ändere.
Das Makro soll aber bei Monatswechsel automatisch ausgeführt werden. Sobald ich =heute() zur Automatisierung als Datum nehme, schreibt es die zu kopierenden Zellen endlos in Tabelle 2, bis Excel automatisch schliesst.
- Ich habe ein Calculate() und nicht ein Change() Ereignis gewählt, damit es bei Änderung (ohne zu klicken) automatisch läuft.
- Die daten in ("A13:G19" aus Tabelle 1) nach dem Ereignis nicht gelöscht werden, die bleiben immer gleich.
Frage:
Wie kann ich das Makro nach einmaligem Kopieren stoppen / beenden?
Eine Musterdatei hier:
https://www.herber.de/bbs/user/138023.xlsm
Danke für die Hilfe
Grüsse Reto