Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Serienmail in Excel





Frage

Hallo Leute, hab folgendes Problem. Ich würde gern eine Serienmail aus Excel heraus versenden. Hab dazu folgendes Makro gefunden [code]Public Sub SendMails() Dim MyOutApp As Object, MyMessage As Object Dim i As Long Dim ii As Long 'Start der Sendeschleife an 10 Empfänger For i = 1 To 10 Set MyOutApp = CreateObject("Outlook.Application") Set MyMessage = MyOutApp.CreateItem(0) With MyMessage 'Die Empfänger stehen in Spalte A ab Zeile 1 .To = Cells(i, 1) 'E-Mail Adresse 'Der Betreff in Spalte B .Subject = Cells(i, 2) '"Betreffzeil" 'Der zu sendende Text in Spalte C 'Maximal 1024 Zeichen 'Der Text wird ohne Formatierung übernommen .Body = Cells(i, 3) 'Hier wird die Mail angezeigt '.Display 'Hier wird die Mail gleich in den Postausgang gelegt .Send End With 'Objectvariablen leeren Set MyOutApp = Nothing 'CreateObject("Outlook.Application") Set MyMessage = Nothing 'MyOutApp.CreateItem(0) 'Sendepause einschalten 'Outlook kann die Aufträge nicht schnell genug verarbeiten Application.Wait (Now + TimeValue("0:00:05")) Next i End Sub[/code] In der Tabelle1 hab ich in Spalte A die Empfänger stehen in Spalte B einen Betreff zu jedem Empfänger und in Spalte C dann den Text der in den Emailboddy soll. Wenn ich jetzt das Makro ausführe kommt erstmal die Sicherheitsabfrage von Outlook "Eine Anwendung möchte auf Ihre Adressdaten zugreifen. Möchten Sie dies erlauben ?" Wenn man da "Ja" anklickt kommt folgender Fehler in Excel.... [code]Laufzeitfehler '-2147467259 (800004005)'; Outlook kennt mindestens einen Namen nicht.[/code] Was mach ich denn da falsch? Wieso sendet mit Outlook meine Mails nicht? Danke für eure Hilfe Gruß Morpheus

Antwort 1 von morpheus__85

Hi Leute,

hab das Problem gefunden.
Ich habe Excel gesagt er soll in der Ersten Spalte anfangen und da steht dann aber die Überschrift und da erkennt der dann ja keine E-mail adresse.

Eine Frage hätte ich noch...
Gibt es dir Möglichkeit diese Sicherheitsabfrage ob der Zugriff gewährt werden soll zu umgehen? also immer mit ja zu akzeptieren? denn das wäre sonst ein großer Aufwand vor jedem Versenden auf "Ja" zu klicken.

danke und gruß
morpheus