Question

我按照下面的例子：

https://www.slipstick.com/developer/create-a-new-message-using-vba/

我希望在通过宏发送电子邮件时自动对邮件进行分类。但是，有时类别属于类别。

例如，假设“报告”类别在“公司”类别下。

如何将发送的邮件分配到“公司”类别中的“报告”类别？这是我的代码。它与示例代码几乎相同。

Public Sub CreateNewMessage()
Dim objMsg As MailItem

Set objMsg = Application.CreateItem(olMailItem)

With objMsg
  .To = "Alias@domain.com"
  .CC= "Alias2@domain.com"
  .BCC = "Alias3@domain.com"
  .Subject = "This is the subject"
  .Categories = "Test"
  .VotingOptions = "Yes;No;Maybe;"
  .BodyFormat = olFormatPlain ' send plain text message
  .Importance = olImportanceHigh
  .Sensitivity = olConfidential
  .Attachments.Add ("path-to-file.docx")

 ' Calculate a date using DateAdd or enter an explicit date
  .ExpiryTime = DateAdd("m", 6, Now) '6 months from now
  .DeferredDeliveryTime = #8/1/2012 6:00:00 PM#

  .Display
End With

Answer 1

Outlook中的类别是一个平面列表，一个类别不能是另一个类别的子类（或父类）。话虽如此，您可以为任何项目分配多个类别 - 只需将它们与＆＃34;;＆＃34;

分开

.Categories = "Test;Report;Some Other Category"

如何在outlook vba中分配已发送邮件的类别？

1 个答案: