使用自定义日期格式自动填充outlook主题

Question

有没有一种方法可以让outlook在一封带有yyyymmdd格式的新电子邮件中自动填写主题？我尝试使用自定义表单并将subject值设置为Date()，但这给出了错误的格式。我正在使用Microsoft 365桌面应用程序。

例如，一封新的电子邮件将自动填写主题20210511。

任何帮助都是非常感谢的！

Answer 1

您可以开发一个VBA宏来完成工作。例如，只要打开一个新的检查器窗口，您就可以处理NewInspector事件，这是用户操作的结果，也可以是通过程序代码触发的。因此，在创建新电子邮件时，您可以添加或修改主题行(请参阅Outlook的主题属性)。

例如，下面的示例创建一个新的电子邮件消息，使用Add方法将"Eugene Astafiev“添加为To收件人，设置Subject属性并显示消息：

Sub CreateStatusReportToBoss() 
 Dim myItem As Outlook.MailItem 
 Dim myRecipient As Outlook.Recipient 
 
 Set myItem = Application.CreateItem(olMailItem) 
 Set myRecipient = myItem.Recipients.Add("Eugene Astafiev") 
 myItem.Subject = "Status Subject" 
 myItem.Display 
End Sub