Hallo zusammen,
ich möchte ein Arbeitsblatt automatisch per VB6 mit hilfe von Outlook 2000 versenden.
Dies Funktioniert auch soweit, nur die Datei wird immer nur als Anhang angefügt.
Ich möchte die Tabelle aber so einfügen wie man das bei Outlook unter Einfügen ->Objekt machen kann, so das das Arbeitsblatt in der Mail geöffnet ist.
Ich hoffe ihr könnt mir helfen.
Vielen Dank schonmal im voraus
Jens
Hier die Sub womit ich die E-Mail erstelle.
Dim myOLApp As New Outlook.Application
Dim myOLItem As Outlook.MailItem
Set myOLItem = myOLApp.CreateItem(olMailItem)
With myOLItem
.Body = „Eine Mail“
.Subject = „Ein Test“
.To = „[email protected]“
.Attachments.Add = „C:\Test.xls“
End With
myOLItem.Display