Attachments.Add メソッド (発行元)

Microsoft Publisher 文書の Attachments コレクションに Attachment オブジェクトを追加します。

構文

Add (FileName)

添付ファイル オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
FileName 必須 String 添付ファイルの名前を指定します。

戻り値

添付ファイル

次の Microsoft Visual Basic for Applications (VBA) マクロは、差し込み印刷でメッセージに添付ファイルを追加する方法を示しています。 このコードは、電子メール メッセージに添付ファイルを追加し、メッセージに現在添付されている数を [即時] ウィンドウに出力します。

この例の添付ファイルは、C ドライブのルートにあるイメージ ファイルです。 コードを実行する前に、"C:\image.jpg" を、メールの添付ファイルとして追加するコンピューター上のファイルへのパスと名前に置き換えます。

差し込み印刷を作成する前に、 OpenDataSource メソッドの差し 込み 印刷オブジェクトを使って、アクティブな文書をデータ ソースに接続する必要があります。 差し込みを実行するには、MailMerge オブジェクトの Execute メソッドを使用します。

データ ソースに接続して差し込みメールを作成する方法の例については、「 EmailMergeEnvelope オブジェクト」を参照してください。

Public Sub Add_Example() 
 
 Dim pubAttachment As Publisher.Attachment 
 
 Set pubAttachment = ThisDocument.MailMerge.EmailMergeEnvelope.Attachments.Add("C:\image.jpg") 
 Debug.Print ThisDocument.MailMerge.EmailMergeEnvelope.Attachments.Count 
 
End Sub

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

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