Wenn sich eine bestimmter Zellwert ändert sendet das Makro über Outlook eine Mail.
Leider öffnet sich vorher eine Sicherheitsabfrage, ob denn die Message wirklich über Outlook versendet werden soll. Kann man das nicht wegschalten?
Oder zumindest den Zeibalken abschalten, der in der Sicherheitsabfragebox aufscheint, bevor man JA drücken kann?
Was fehlt im folgenden Code noch?
Sub EMail_Senden(Zelle As String, Zellinhalt As String)
Dim mail As Object
Set outl = CreateObject("Outlook.Application")
Set mail = outl.CreateItem(0)
mail.Subject = "Ihr Code " & Nummer & " !"
mail.To = "an@Kunden.de"
mail.Body = "Sehr geehrte Damen und Herren!" & vbCrLf & vbCrLf & _
"Das System zeigt " & Zellinhalt & " an!" & vbCrLf & vbCrLf & _
"Sie sollten vom Schlusskurs weg +40 Pips als Ziel und -20 Pips als Stoploss setzen. " & vbCrLf & vbCrLf & _
"Mit freundlichen Grüßen" & vbCrLf & "..."
mail.Importance = 1
mail.Send
End Sub
Gruss Norbert