Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Email an Outlook schicken
Autor: Kirstin
Datum: 23.09.07 14:37
Hallo, wenn z.B. in der Zelle "S" eine E-mail Adresse steht dann schicke die E-mail zu dem Betreffenden.Wie füge ich diese If Anweisung in den nachstehenden Code ein? Dim olApp As Object Dim oItem As Object Set olApp = CreateObject("Outlook.Application") Set oItem = olApp.CreateItem(0) With oItem .DeferredDeliveryTime = "14/09/2007 17:00" .Subject = "Betreff-Zeile" .To = "xxxxxx@xxxxxx.com" .Body = "Gerät: " & ActiveCell.Offset(0, 10) & " von Praxis " & ActiveCell.Offset(0, 4) & "bei Firma " & ActiveCell.Offset(0, 5) & " zur Reparatur--> Nachfrage!" '.Subjekt wird als Betreff im Outlook angegeben .Send End With Kann mir da jemand helfen? Gruß Kirstin

Email an Outlook schicken	2.114	Kirstin	13.08.07 08:23
Re: Email an Outlook schicken	1.032	mitsch	13.08.07 14:49
Re: Email an Outlook schicken	1.374	Kirstin	23.09.07 14:37

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen