E-Mail: Wichtigkeit hoch
Ralf_Frankfurt
kann mir jemand mitteilen, wie ich die folgende Mail mit der Eigenschaft 'Wichtigkeit hoch' versenden kann?
Sub Mail_AM_SettlementsRentengeschaefte()
Dim olapp As Object
Set olapp = CreateObject("Outlook.Application")
With olapp.CreateItem(0)
.To = "am-settlements@deka.de"
.CC = ""
.BCC = ""
.Subject = "Direktgeschäfte Renten"
.body = "Hallo," & vbNewLine & vbNewLine & "anbei die Rentengeschäfte von heute." & _
vbNewLine & vbNewLine & "Mit freundlichen Grüßen" & vbNewLine & "Ralf Köhler" & vbNewLine & _
vbNewLine & "Tel.: 1184" & vbNewLine & "EMail: ralf.koehler.ext@fundmaster.de"
.attachments.Add "I:\AMK_64\641402\64140203\1_DIRECT_TRADES\Mailsendung\Renten\Renten.xls"
.attachments.Add "I:\AMK_64\641402\64140203\1_DIRECT_TRADES\Mailsendung\Renten\Renten.pdf"
.display
End With
Set olapp = Nothing
End Sub
Viele Grüße
Ralf