軟體: Outlook
版本: 2013
最近要寄信給舊客戶，目前是會用word的合併列印來分批群發給客戶，
但信件中都要附加規格檔，請問該如何設定？
目前有試著用VBA，但用了下面的程式碼後，按新信件仍然不會自動附加
檔案到信件中。
Sub NewMessageWithAttachment()
Dim oMsg As Outlook.MailItem
Set oMsg = Application.CreateItem(olMailItem)
With oMsg
.Attachments.Add "C:\Attachment.doc"
.Display
End With
End Sub
不知道有沒有什麼方法可以讓OUTLOOK自動附加檔案？謝謝。

測試內文巨集，可以新增電子郵件並有該附件https://i.imgur.com/Am9sTRH.jpg如果附件都相同，可以選項內自訂功能區或快速存取工具列來新增該巨集程序到快速存取工具列或索引標籤內

是的，我按執行鈕也是會出現有附檔的EMAIL，但會希望是按"新增電子郵件"鈕就會自動附上要附的檔案

按下"新增電子郵件"按紐觸發事件google outlook vba new email button event