Mit Vba Email nicht senden sondern nur öffnen?
27.10.2003 16:37:17
Micha
Will aber nicht das es gleich verschickt wird sondern nur die Email mit den Daten öffnet. So das man wenn man will noch mehr attachment zufügen kann. wie geht das?
Sub Mail(ByVal d As String)
Dim olApp As Object
Set olApp = CreateObject("Outlook.Application")
With olApp.CreateItem(0)
'Empfanger
.Recipients.Add "miwe76@gmx.de"
'Betreff
.Subject = "Neu"
'Nachricht
.Body = "Blabla"
'Lesebestätigung aus
.ReadReceiptRequested = False
'Anhang
.Attachments.Add d
.send
End With
Set olApp = Nothing
End Sub
Anzeige