vba-funktion in excel aufrufen

Function einbauen, welche beim überschreiten eines gewissen zeitpunktes ausgeführt wird und eine mail verschickt.
die ganze sache läuft ohne probleme, aber seltsamerweise nur, wenn ich die 

Function mit F8 durchlaufe (schritt für schritt).
wenn die 

Function automatisch aufgerufen wird,bekomme ich entweder die fehlermeldung "Zirkelbezug" oder #WERT!
woran kann es liegen, das ich je nachdem unterschiedliche fehlermeldungen bekomme obwohl an der 

Function nichts ändere.
wieso erhalte ich die anzeige #WERT! ???
=wenn(A1>10;Active_Mail();"")

Function Active_Mail()
Call Active_Mail_Senden
End Function


 


Sub Active_Mail_Senden()
ActiveWorkbook.SendMail "XXX@YYY.com", "Wert überschritten"
End Sub