Objeto Anexo (Publicador)
Representa um anexo a uma mensagem de email mesclada.
Comentários
Um objeto Attachment corresponde a um dos anexos na lista de anexos na caixa Anexos na caixa de diálogo Merge to Email na interface do usuário do Microsoft Publisher. (No menu Arquivo, aponte para Enviar Email, escolha Enviar Email Mesclagem e escolha Opções.)
Para remover o anexo do email mesclado, use o método Delete do objeto Attachment .
Exemplo
A macro do Microsoft Visual Basic for Applications (VBA) a seguir mostra como usar o método Add para adicionar um anexo a uma mensagem de mesclagem de email. Ele adiciona um objeto Attachment que representa uma imagem bitmap à coleção Anexos do documento ativo.
Antes de executar essa macro, coloque um arquivo chamado image.bmp na raiz da unidade C em seu computador ou altere o nome e o caminho do arquivo na macro para especificar o que você deseja anexar.
Observe que para enviar uma mensagem de mesclagem de email, você deve se conectar a uma fonte de dados, criar a mesclagem de email e, em seguida, enviar a mensagem. Para obter mais informações, consulte o objeto EmailMergeEnvelope .
Public Sub Attachment_Example()
Dim pubAttachments As Publisher.Attachments
Dim pubAttachment As Publisher.Attachment
Dim pubMailMerge As Publisher.MailMerge
Dim pubEmailMergeEnvelope As Publisher.EmailMergeEnvelope
Set pubMailMerge = ThisDocument.MailMerge
Set pubEmailMergeEnvelope = pubMailMerge.EmailMergeEnvelope
Set pubAttachments = pubEmailMergeEnvelope.Attachments
Set pubAttachment = pubAttachments.Add("C:\image.bmp ")
End Sub
Métodos
Propriedades
Confira também
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.