下午好,
我目前有一位客户在 Outlook 中使用签名时遇到了一些问题。
作为其业务的一部分,他在签名底部附上了免责声明,声明该电子邮件是在工作时间发送的。
他正在努力寻找除了手动选择两个电子邮件签名之外,是否还有其他方法可以在特定时间回复/发送电子邮件时自动使用一个签名,并在这些时间自动发布另一个签名。
据我和与我共事的人所知,这是不可能的,但我想我还是会问这个问题。
答案1
这是一个宏,它应该能够完成您想要的工作;只需根据您的喜好进行修改即可。
Public Sub CreateMessageSignature()
Dim objMsg As MailItem
Dim theDay As Integer
Dim hoursStart, hoursEnd As Double
Dim custom As String
Set objMsg = Application.CreateItem(MailItem)
theDay = Weekday(Now)
hoursStart = TimeValue("8:00:00 am")
hoursEnd = TimeValue("4:30:00 pm")
custom = "This message is sent out of office hours."
If theDay > 1 And theDay < 7 Then ' Mon-Fri
If Now > hoursStart And Now < hoursEnd Then ' The current time is between office hours
custom = "This message is sent during office hours."
End If
End If
With objMsg
.HTMLBody = "Greetings,<br><br> Sincerely,<br><br>John Smith<br>[email protected]<br>(123)-456-7890<br>" & custom & strBuffer
.Display
End With
子目录结束
如果您不知道如何设置:
- 在 Outlook 中启用开发人员菜单:文件 → 选项 → 自定义功能区 → 开发人员菜单中的气泡。
- 创建宏:开发人员菜单 → 宏 → 输入一个名称,特别是
CreateMessageSignature
(除非你想重命名该函数)→ 单击“创建”→ 复制并粘贴宏(注意缩进)→ 修改为你喜欢的→ 保存(Ctrl+S) - 现在将按钮添加到功能区的“主页”部分:文件 → 选项 → 自定义功能区 → 在“主页(邮件)”中创建一个新组,根据自己的喜好命名 → 选择它并在右侧找到您刚刚创建的宏,然后按“添加”。
祝你好运!