メール アイテムにファイルを添付する

このトピックでは、メール アイテムにスプレッドシート ファイルを添付する方法を示します。 プロシージャは、 AddAttachment指定したスプレッドシート (Q496.xlsx) が指定されたパス D:\Documents に存在することを前提としています。 AddAttachment を使用して、新しいメール メッセージを作成し、メール メッセージに Q496.xlsx を添付して、その添付ファイルにわかりやすいキャプションを付け、この添付ファイルと共にメール メッセージを表示します。

Sub AddAttachment() 
 Dim myItem As Outlook.MailItem 
 Dim myAttachments As Outlook.Attachments 
 
 Set myItem = Application.CreateItem(olMailItem) 
 Set myAttachments = myItem.Attachments 
 myAttachments.Add "D:\Documents\Q496.xlsx", _ 
 olByValue, 1, "4th Quarter 1996 Results Chart" 
 myItem.Display 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。