Kann mir jemand sagen, wie ich mit VBA Outlook starten kann? Möchte automatisch mails senden und bin bisher soweit gekommen:

Dim olApp As Object
Set olApp = CreateObject("Outlook.Application")
With olApp.CreateItem(0)
'Empfänger
.Recipients.Add "caroline.gottschalk@siemens.com"
'Betreff
.Subject = "Terminerinnerung"
'Nachricht
.Body = "Terminerinnerung für " & wannauchimmer
'Lesebestätigung aus
.ReadReceiptRequested = False
'Dateianhang
'.Attachments.Add "c:\Dok1.doc"
.Send
End With
Set olApp = Nothing

Aber wenn Outlook nicht sowiesoschon gestartet ist, bricht mein Makro mit Fehlermeldung ab...

Hilfeeeee....