我在Excel中创建了一个宏来发送邮件。
我想把重要性设定得很高。我试过了
.Importance = 2
.olImportanceHigh = 2
.Importance = olImportanceHigh
它说Object不支持属性或方法。
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
答案 0 :(得分:4)
它是MailItem的属性,而不是MailEnvelope,因此您需要使用:
.Item.Importance = 2
答案 1 :(得分:1)
" MailEnvelope"工作表的属性返回MsoEnvelope对象。 "重要性"是MailItem对象的属性,因此您需要:
.Item.Importance = 2
答案 2 :(得分:1)
你试过吗?
.Item.Importance = olImportanceHigh