410 Aufrufe
Gefragt in Tabellenkalkulation von ahorn38 Experte (3.2k Punkte)
Hallo,

ich habe eine Datei aus der ich einen Ausschnitt als .bmp (zwischen-)speichern möchte um ihn dann in einer mail einzufügen:

... Set oApp = CreateObject("OUTLOOK.Application")
sBody = "Aktueller Stand " & "," & "<br><br>" & .bmp)
sRec = "xxx@t-online.de"
sFile = "C:\TC Versand\Planung\TCW .xlsx"
sSub = "TCW aktuell"
Set oMail = oApp.CreateItem(0)
With oMail
Set .SendUsingAccount = .Session.Accounts.Item(1)
Set oOLRecip = .Recipients.Add(sRec)
.Subject = sSub
.GetInspector.Display 'Signatur anzeigen
strSignatur = .HTMLBody
.HTMLBody = "<p><font face=""Calibri"" size=""14""></font></p>" _
& sBody & strSignatur


ich würde diese .bmp gern in der Variablen sBody anfügen (s.o.).

Die Erstellung der mail klappt soweit bis auf die besagte .bmp

Hat jemand einen Tipp wie's gehen könnte?
Danke und Gruß A.

1 Antwort

0 Punkte
Beantwortet von ahorn38 Experte (3.2k Punkte)
Hallo,

ich habe eine Möglichkeit gefunden:
.HTMLBody = "<img src='Pfad\Bild.jpg'>

Allerdings klappt das ja nur, wenn ich das Bild vorher abgespeichert hat. Gibt es eine Möglichkeit ein Bild aus dem Zwischenspeicher einzufügen?
Danke für euren Tipp. Gruß A.
...