ich arbeite mit einer Excel Tabelle aus der ich automatisiert Emails über Outlook versenden will. Mit dem Code den ich gebastelt habe funktioniert das auch zum Teil. Dh die meisten Emails werden autmatisch verschickt, es bleiben aber immer nch ein paar übrig bei denen man dann noch auf "senden" klicken muss.
Außerdem zeigt mir der Editor den Laufzeitfehler 13 "Typen unverträglich" an der Stelle
If Cells(I, 26) an.
Weiß jemand vielleicht was ich da falsch gemacht habe?
Hier mal der Code:
[code]
Sub Excel_Serienmail_via_Outlook_Senden()
Dim OutApp As Object, Mail As Object
Dim I As Integer
Dim Nachricht
For I = 22 To 3000
If Cells(I, 26)
[/code]Vielen Dank für eure Hilfe!!!
Gruß,
Verena