OUTLOOK的两个小技巧

     昨天在给商机部门的同事分享OUTLOOK使用的时候，下面提了两个问题，自己没回答上来，有一个还是别的同学告诉我的，差点给了错误的答案，有点汗，这两个我核实了一下，解决办法写在这里。

1、如何让OUTLOOK最小化后，不在任务栏上显示，只在系统托盘处显示图标

解决办法：右键点系统托盘处图标，在弹出的菜单，选择“最小化时隐藏”。谢谢给出这个答案的那个MM。

2、如何在发送邮件前，检查邮件主题是否没写

解决办法：这个OUTLOOK里，收件人的检查是有的，主题是否没写，是没有这个功能的，不过可以通过VBA编码来实现。按照如下操作编写代码：

进入OUTLOOK后，ALT+F11进入VISUAL BASIO编辑器，在右面的代码区输入如下代码：

Public Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim prompt As String
    If Len(Item.Subject) = 0 Then
        prompt = "邮件主题没写，你还要发吗？ "
        If MsgBox(prompt, vbYesNo + vbQuestion, "Sample") = vbNo Then
            Cancel = True
        End If
    End If
End Sub

如下图：

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

完成后，保存，重启OUTLOOK，就可以实现了。

不过由于采用宏代码实现，需要注意并设置自己的宏安全级别为运行运行，具体操作为：点工具–宏—-安全性，在里面的宏安全性选项中，选择“不执行宏安全性检查”.如果为2003版本，对应的为宏安全级别，设置为低。