次の方法で共有

Attachments.Add メソッド (Publisher)

  • [アーティクル]

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

構文

式。Add (FileName)

式Attachments オブジェクトを表す変数。

パラメーター

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

戻り値

添付ファイル

例

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

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

メールの差し込み印刷を作成する前に、MailMerge オブジェクトの 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 のサポートおよびフィードバックを参照してください。