次の方法で共有

Attachments.ClearAll メソッド (Publisher)

  • [アーティクル]

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

構文

式。Clearall

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

注釈

個々の添付ファイルをクリアするには、特定の 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 のサポートおよびフィードバックを参照してください。