我有时在写邮件时忘记提及主题。
有什么方法可以防止这种情况发生吗?我通过 Google 找到了解决方案,但在 MS Office 2007 版本中不起作用,
解决方案如下:
步骤如下: -
- 打开 Outlook,
- 按 Alt+F11。这将打开 Visual Basic 编辑器,然后按 Ctrl+R,依次打开 Project-Project 1(左侧)
- 在左侧窗格中,可以看到“Microsoft Outlook Objects”或“Project1”,展开它。现在可以看到“ThisOutLookSession”。
- 双击“ThisOutLookSession”。它将在右侧打开一个代码窗格。
- 复制并粘贴以下代码到右侧窗格(代码窗格),然后保存并关闭
代码:
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. Continue anyways???"
If MsgBox(Prompt$, vbYesNo + vbQuestion + vbMsgBoxSetForeground,
"Check for Subject") = vbNo Then
Cancel = True
End If
End If
End Sub
现在,每当您尝试发送没有主题的邮件时,都会弹出一个窗口提醒您主题为空白。
有什么想法吗?如何才能做到。
答案1
您的代码很好 - 我刚刚发现我的版本也停止工作了。
您需要做以下两件事之一:
可以:打开“工具”|“信任中心”对话框。将宏安全性设置为对所有宏发出警告。这样,每次打开 Outlook 时都会发出警告,但您可以运行宏。
看这一页更多细节。
或者:签署宏。打开宏编辑器(工具 > 宏 > Visual Basic 编辑器),然后打开工具 > 数字签名并从列表中选择一个。如果您尚未安装任何宏,请按照以下说明操作此支持页面。
您还可以通过运行来创建证书
开始 > 程序 > Microsoft Office > Microsoft Office 工具 > VBA 项目的数字证书
重新启动 Outlook,允许所有具有此签名的宏运行,它就可以正常工作了。
答案2
我个人建议你改用 Thunderbird,因为它是免费产品,不运行多个平台,而且是开源的。此外,它的配置性更强,还包含新闻阅读器和 RSS 阅读器。
此外,您不再受限于 MS Outlook 格式,因此您的旧电子邮件更有机会在未来几年的格式变化中存活下来。
杰弗