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 のサポートおよびフィードバックを参照してください。