【发布时间】:2014-01-09 23:05:40
【问题描述】:
不确定为什么 Outlook 从不为在其外部创建的电子邮件添加签名。就像在 Windows 资源管理器中一样;右键单击文件,然后单击发送...还有其他文件。 我想在我的快速访问工具栏中添加一个按钮,以便简单地将其弹出到正在显示的电子邮件中。 点击 Smibbon 需要 3 或 4 次点击 :(
我能够获得默认签名,但不知道如何插入它。
Public Sub InsertDefaultSignature()
Dim OlApp As Outlook.Application
Dim ObjMail As Outlook.MailItem
DirSig = "C:\Users\" & Environ("username") & _
"\AppData\Roaming\Microsoft\Signatures"
FileNameHTMSig = Dir$(DirSig & "\*.htm")
Set OlApp = Outlook.Application
Set ObjMail = OlApp.CreateItem(olMailItem)
'need something here
End Sub
【问题讨论】: