3个回答
展开全部
高手些的宏代码实现自动插入日期功能,完全实现你要的功能,我只是个使用者,呵呵,给你参考
1.打开outlook,取消原来设置的签名
2.按照菜单(工具-宏-Visual Basic 编辑器)
3.在出现的编辑器,从左边选择:ThisOutlookSession,右边默认应该是空白。
4.将下面的代码复制到右边:
-----------------------------------------------
Dim myOlApp As New Outlook.Application
Private WithEvents myOlInspectors As Outlook.Inspectors
Private myMailItem As Outlook.MailItem
Function Signature() As String
Dim mDate As Date
mDate = Format(Now, "yyyy-MM-dd")
Signature = "<font size=2>"
Signature = Signature & "<p> </p>"
Signature = Signature & "<p style=""""font-size: 10px"""">自动签名添加日期<br />" & mDate & " <br />"
Signature = Signature & "自动签名添加日期成功</p>"
Signature = Signature & "</font> "
End Function
Private Sub Application_Startup()
'GetSignature
Set myOlInspectors = myOlApp.Inspectors
End Sub
Private Sub myOlInspectors_NewInspector(ByVal Inspector As Inspector)
Set myMailItem = Inspector.CurrentItem
With myMailItem
.HTMLBody = Signature()
'.Display‘如果是outlook 2007 将此行注释掉
End With
End Sub
------------------------------------------------
中间部分是签名的HTML内容,可以修改为自己需要设置的。
5.保存,退出。重新启动outlook,将工具-宏-安全性中设置为低
以后新建邮件将会用代码中设置的签名内容
1.打开outlook,取消原来设置的签名
2.按照菜单(工具-宏-Visual Basic 编辑器)
3.在出现的编辑器,从左边选择:ThisOutlookSession,右边默认应该是空白。
4.将下面的代码复制到右边:
-----------------------------------------------
Dim myOlApp As New Outlook.Application
Private WithEvents myOlInspectors As Outlook.Inspectors
Private myMailItem As Outlook.MailItem
Function Signature() As String
Dim mDate As Date
mDate = Format(Now, "yyyy-MM-dd")
Signature = "<font size=2>"
Signature = Signature & "<p> </p>"
Signature = Signature & "<p style=""""font-size: 10px"""">自动签名添加日期<br />" & mDate & " <br />"
Signature = Signature & "自动签名添加日期成功</p>"
Signature = Signature & "</font> "
End Function
Private Sub Application_Startup()
'GetSignature
Set myOlInspectors = myOlApp.Inspectors
End Sub
Private Sub myOlInspectors_NewInspector(ByVal Inspector As Inspector)
Set myMailItem = Inspector.CurrentItem
With myMailItem
.HTMLBody = Signature()
'.Display‘如果是outlook 2007 将此行注释掉
End With
End Sub
------------------------------------------------
中间部分是签名的HTML内容,可以修改为自己需要设置的。
5.保存,退出。重新启动outlook,将工具-宏-安全性中设置为低
以后新建邮件将会用代码中设置的签名内容
展开全部
简单的方法:
1 进入选项-邮件格式-签名-添加编辑签名,在要插入日期的签名编辑中,按Ctrl + F9 出现 域 { }
2 在此域中输入 { DATE @ "yyyy-MM-dd" } 保存编辑
3 以后每次发邮件时会自动在签名栏里天添加当前日期
1 进入选项-邮件格式-签名-添加编辑签名,在要插入日期的签名编辑中,按Ctrl + F9 出现 域 { }
2 在此域中输入 { DATE @ "yyyy-MM-dd" } 保存编辑
3 以后每次发邮件时会自动在签名栏里天添加当前日期
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
以outlook 2010为例,你可以点击左上角的“开始”--“新建电子邮件”,然后你会看到上面一排有个“签名”的按钮,点击那个小三角,出现下拉菜单,选择最底下一行的“签名”,弹出新的对话框,在右侧有个“选择默认签名”,除了那个“新邮件”要选择相应的签名,不要忘了“答复/转发”也要选择对应的签名哦……都看了吧?应该知道怎么做了吧?呵呵……不复杂的,2007情况也差不多的,有问题再问。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询