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

差し込み印刷メッセージの親添付ファイル コレクション内のすべての添付ファイル オブジェクトをクリア (削除) します。

構文

ClearAll

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

注釈

個々の添付ファイルをクリアするには、特定の Attachment オブジェクトの Delete メソッドを使用します。

次の Microsoft Visual Basic for Applications (VBA) マクロは、差し込み印刷でメッセージの添付ファイルをすべてクリアする方法を示しています。 コードは、 イミディ エイトウィンドウ内のメッセージに添付ファイルを現在の番号を印刷し、すべて の添付ファイル 内のオブジェクトのコレクションを削除します。

Public Sub ClearAll_Example() 
 
 Dim pubAttachments As Publisher.Attachments 
 
 Dim pubMailMerge As Publisher.MailMerge 
 Dim pubEmailMergeEnvelope As Publisher.EmailMergeEnvelope 
 
 Set pubMailMerge = ThisDocument.MailMerge 
 Set pubEmailMergeEnvelope = pubMailMerge.EmailMergeEnvelope 
 Set pubAttachments = pubEmailMergeEnvelope.Attachments 
 
 Debug.Print pubAttachments.Count 
 pubAttachments.ClearAll 
 
End Sub

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

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