Thema: E-Mail automatisch versenden wenn Zelleninhalt durch Formel

Hallo Leute,

in meinem vorherigem Beitrag wurde mein Problem noch nicht gelöst nun probiere ich es nochmal.
ich habe Eine Excel Liste in dem ich in Range ("AJ49:AJ64") durch Formeln eine 1 eintragen lasse.
Wenn dort die 1 steht (1s ist der Eintrag dort vorhanden), durch mehrere Bedingung (Monat,Tag; Makro Uhrzeit mit Vergleich Uhrzeit; usw.)
soll eine mail versendet werden an der dazugehörigen E-Mail Adresse AK (AJ49=1 Mail an AK49),(AJ50=1 Mail an AK50) bis Zeile 64
Bislang funktioniert das Makro nur wenn ich die 1 nicht durch eine Formel sondern händisch eintrage und das auch nur zu einer konstanten Emailadresse.

mein zweites Problem wäre das ich aus einem anderen Arbeitsblatt einen Zellenbereich kopieren möchte wenn C7=1 bis N7=1 auch hier wäre die 1 1Sekunde vorhanden
das kopieren funktioniert auch soweit, aber auch nur wenn ich die 1 in den Zellen Eintrage und das Makro starte nicht dauerhaft

Ich füge die Datei nochmal mit Makro bei und bitte nochmal um Unterstützung um dieses Problem zu lösen.

https://www.herber.de/bbs/user/168727.xlsm

Der Code, den du gepostet hast, kann doch gar nicht funktioniert haben, denn die Argumente des Subs Send_EMail sind NICHT optional und du rufst sie im Change_Event ohne Argumente auf.

Richtig, hatte nochmal was geändert, was nicht funktioniert hat.
Jetzt die richtige Datei

Danke

https://www.herber.de/bbs/user/168765.xlsm