Hallo,
ich verstehe nicht richtig: benutzt du nicht den in MS-Office integrierten VBA-Editor (also Word öffnen => Alt+F11)?
Dort musst du unabhängig von Late- / Early Binding ein Objekt mit set zuweisen.
Early Binding:
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
.to = "q@q.ql"
.CC = ""
.BCC = ""
.Subject = "This is the Subject line"
.Body = "Hi there"
'.Attachments.Add ("C:\test.txt")
.Send 'or use .Display
End With
Bei Latebinding musst du den Verweis auf Microsoft Outlook xx.x-Objektbibliothek setzen:
Dim OutApp As Outlook.Application
Dim OutMail As Outlook.MailItem
Set OutApp = new Outlook.Application
Set OutMail = OutApp.CreateItem(0)
With OutMail
'...
End With
Ale Codes sind ungetestet.
Visual Studio habe ich nie in Verbinund mit VBA benutzt, kann dir dazu also nichts sagen.
Grüße, Ulrich
|