Mailinhalt ansprechen
20.09.2022 11:12:47
alex
ich möchte via excel VBA Inhalte aus einer Mail in Excel übertragen. Das Übernehmen des Betreffs in Spalte 1 und des Absenders in Spalte 3 funktionieren wunderbar.
In Spalte 2 soll eine Zeile aus dem Inhalt der Mail(mail.body) angesprochen werden. Ist das möglich?
Konkret geht es um diesen Teil des Codes:
While fMails.Items.Count > 0
Set mail = fMails.Items(1)
txtsubject = mail.Subject
txtContent = mail.Body
arrLines = Split(txtContent, vbNewLine, -1, vbTextCompare)
txtTime = mail.Sender
rngCurrent.Value = mail.Subject
rngCurrent.Offset(0, 1).Value = txtContent
rngCurrent.Offset(0, 2).Value = txtTime
Set rngCurrent = rngCurrent.Offset(1, 0)
Wie kann ich
txtContent = mail.Body
Vielen Dank im Voraus für die Hilfe.
LG