
答案1
經過一些嘗試和錯誤,但這是巨集:
Sub templateName()
Dim objMsg As MailItem
Set objMsg = Application.CreateItemFromTemplate("C:\Users\User\AppData\Roaming\Microsoft\Templates\templateName.oft")
With objMsg
.SentOnBehalfOfName = "[email protected]"
.Display
End With
End Sub
答案2
Outlook 中沒有內建選項可用於在範本中儲存「寄件者」欄位。根據宏,我發現類似的討論在另一個論壇中,但那裡提到的巨集對我不起作用。