使用 Excel 的信封时设置邮件的重要性

Question

我在 Excel 中创建了一个宏来发送邮件。

我想将重要性设置为高。我试过了

.Importance = 2
.olImportanceHigh = 2
.Importance = olImportanceHigh

它说对象不支持属性或方法。

ws1.Activate
    ToArray = wb1.Sheets("Report").Cells(3, 34).Value
    CCArray = wb1.Sheets("Report").Cells(3, 35).Value
    Subject = subject1
    Content = wb1.Sheets("Report").Cells(3, 36).Value
    ws1.Range("B3:P31").Select
    ActiveWorkbook.EnvelopeVisible = True
    With wb1.Sheets("New Report").MailEnvelope
    .Introduction = Content
    .Item.To = ToArray
    .Item.CC = CCArray
    .Item.Subject = Subject
    .Item.attachments.Add (wb2.FullName)
    .Importance = olImportanceHigh
    .Item.Send
End With
Application.DisplayAlerts = False

Answer 1

工作表的 "MailEnvelope" 属性 returns MsoEnvelope 对象。 "Importance" 是 MailItem 对象的属性，因此您需要：

.Item.Importance = 2

Answer 2

它是 MailItem 的属性而不是 MailEnvelope，因此您需要使用：

.Item.Importance = 2

Answer 3

你试过了吗？

.Item.Importance = olImportanceHigh

使用 Excel 的信封时设置邮件的重要性

Set importance to mail when using Excel's envelope

excel

vba

envelope