Mit Vba Email nicht senden sondern nur öffnen?
28.10.2003 08:15:46
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
Auch wenn ich das send weglasse öffnet sich nicht eine neue Email