VBA outlook - 发送电子邮件并对CC电子邮件进行分类

Question

我一直在使用公共文件夹并在outlook上发送电子邮件。每当我们发送带有公共文件夹电子邮件地址的电子邮件（例如info@company.com）时，我们都会发送电子邮件至info@company.com。这样我们就可以将电子邮件保存在公共文件夹中。

我已经创建了一些VBA代码来自动发送Outlook电子邮件。 我的问题是：当我发送电子邮件而不向接收者显示类别时，是否可以自动对我们公共文件夹中的电子邮件进行分类（例如，客户查询）（如。

Sub outlookActivate1()
    Dim OutApp As Outlook.Application
    Dim OutMail As Outlook.MailItem

    Set OutApp = CreateObject("Outlook.Application")


    With OutMail

        .BCC = ""
        .BodyFormat = olFormatHTML

        .Categories = "customer-inquiry"
        .ShowCategoriesDialog
        .Save
        .display

End With

On Error GoTo 0


    Set OutMail = Nothing
    Set oItem = Nothing

End Sub

Answer 1

不，不是。您可以考虑将用户属性添加到邮件项目中。有关详细信息，请参阅UserProperties。