ich habe ein VBA, mit dem ich eine E-Mail erstelle, Empfänger und Betreff aus EXCEL herauslese und in die E- Mail eintrage.
Nun möchte ich einen zweiten Text darunter einfügen, in dem der Hinweis und der Link zu dem Ordner, in dem die EXCEL- Datei steht, einfügen.
Es kommen verschiedene Varianten raus aber keine, die richtig ist.
Mein VBA sieht so aus:
Vielen Dank und beste Grüße,
Kater
Sub eMail()
Dim rcp, hlink, msg, subj
rcp = Range("Q14")
subj = Range("S4")
msg = "Hallo, dies ist eine automatisch erzeugte Nachricht! Hier der Link zu EXCEL:" & "%0A%0A" & "
hlink = "mailto:" & rcp & "?"
hlink = hlink & "subject=" & subj & "&"
hlink = hlink & "body=" & msg
ActiveWorkbook.FollowHyperlink (hlink)
End Sub