Compartilhar via


Attachments.ClearAll method (Publisher) (Método Attachments.ClearAll [Publisher])

Limpa (elimina) todos os objetos de Anexo na coleção anexos principal de uma mensagem de impressão em série.

Sintaxe

expressão. LimparTodos

expressão Uma variável que representa um objeto Anexos .

Comentários

Para limpar um anexo individual, utilize o método Delete do objeto Anexo específico.

Exemplo

A seguinte macro do Microsoft Visual Basic for Applications (VBA) mostra como limpar todos os anexos da mensagem numa impressão em série. O código imprime o número de anexos atual para a mensagem na janela imediata e exclui todos os objetos de anexo na coleção.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.