如何在Outlook中添加默認簽名我正在Access中編寫一個VBA腳本，用于創(chuàng)建和自動填充幾十封電子郵件。到目前為止，它一直是流暢的編碼，但我是Outlook的新手。創(chuàng)建mailitem對象后，如何將默認簽名添加到電子郵件中？這將是創(chuàng)建新電子郵件時自動添加的默認簽名。理想情況下，我想使用ObjMail.GetDefaultSignature，但我找不到類似的東西。目前，我正在使用下面的功能（在互聯(lián)網上的其他地方找到）并引用htm文件的確切路徑和文件名。但是這將由幾個人使用，他們的默認htm簽名文件可能有不同的名稱。所以這可行，但它并不理想：Function GetBoiler(ByVal sFile As String) As String'Dick KusleikaDim fso As ObjectDim ts As ObjectSet fso = CreateObject("Scripting.FileSystemObject")Set ts = fso.GetFile(sFile).OpenAsTextStream(1, -2)GetBoiler = ts.readall ts.CloseEnd Function（稱為getboiler(SigString = "C:\Users\" & Environ("username") & "\AppData\Roaming\Microsoft\Signatures\Mysig.txt")）編輯我意識到默認簽名首先出現(xiàn)，但是當我使用HTMLBody向電子郵件添加表格時它會消失。所以我想我現(xiàn)在的問題是：如何顯示默認簽名并仍顯示html表？Sub X()     Dim OlApp As Outlook.Application    Dim ObjMail As Outlook.MailItem    Set OlApp = Outlook.Application    Set ObjMail = OlApp.CreateItem(olMailItem)     ObjMail.BodyFormat = olFormatHTML     ObjMail.Subject = "Subject goes here"     ObjMail.Recipients.Add "Email goes here"     ObjMail.HTMLBody = ObjMail.Body & "HTML Table goes here"     ObjMail.DisplayEnd Sub