Outlook：如何在电子邮件中强制使用非空主题？

Question

如何将 Microsoft Outlook 配置为要求外发电子邮件中的主题？

我从未使用过 Microsoft Outlook（我是 Eudora 的铁杆用户），但我的大多数同事确实使用过它。我经常收到主题为空的消息。因此，我想知道如何指导他们做才能消除这个问题。

不同版本的 Outlook（Outlook Express、Outlook 2007 等）的配置是否不同？

Answer 1

我发现的这个方法需要你制作一个 VBA 脚本：How-To Write Macro For Blank Subject Warning In Microsoft Outlook

或者试试Kenneth 在评论中建议的这种方法！

在本文中，我们将编写一个宏来验证 Microsoft Outlook 客户端中的空白主题。按照以下步骤创建这样的宏

1. 确保为您的 Microsoft Office Outlook 启用宏。宏不适用于 Microsoft Outlook Express，因此无法通过 Microsoft Outlook Express 实现此设置。
2. 确保您的安全级别设置为中。您可以通过单击工具 –> 宏 –> 安全来设置安全级别。将所需级别设置为中。
3. 遍历工具 –> 宏 –> Visual Basic 编辑器（或按 ALT + F11）

4. 单击 + 号展开项目 1。

   

5. 展开 Microsoft Office Outlook 对象。
6. 双击 ThisOutlookSession。

7. 复制粘贴以下代码。

   Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
     Dim strSubject As String
     strSubject = Item.Subject
     If Len(Trim(strSubject)) = 0 Then
             Prompt$ = "Subject is Empty. Are you sure you want to send the Mail?"
       If MsgBox(Prompt$, vbYesNo + vbQuestion + _
         vbMsgBoxSetForeground, "Check for Subject") = vbNo Then
         Cancel = True
       End If
     End If
   End Sub
   

   

   图像：用于在 Microsoft Outlook 中验证空主题行的宏。

8. 粘贴代码后，单击“保存”，然后单击“退出”。上面的代码确保当您发送电子邮件时，主题行不为空。如果主题行的长度为零，宏会通过弹出窗口提醒您。

可以肯定，一旦你创建了这个宏，你就可以避免发送空白主题的电子邮件。