Evento MailItem.BeforeAttachmentSave (Outlook)
Ocorre imediatamente antes de um anexo ser salvo.
Sintaxe
expression. BeforeAttachmentSave
( _Attachment_
, _Cancel_
)
expressão Uma variável que representa um objeto MailItem.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Attachment | Obrigatório | Attachment | O anexo seja salvo. |
Cancel | Obrigatório | Boolean | (Não utilizado no VBScript). False quando o evento ocorre. Se o procedimento de evento define este argumento como True, salvar operação não será concluída e o anexo não será alterado. |
Comentários
Esse evento corresponde a quando anexos são salvos no armazenamento de mensagens. O evento BeforeAttachmentSave ocorre logo antes de um anexo ser salvo quando um item for salvo. Se um usuário edita um anexo e, em seguida, salva as alterações, não ocorrerá o evento BeforeAttachmentSave nesse momento; em vez disso, ele ocorrerá quando o próprio item for salvo posteriormente. Ele também não ocorre quando o anexo será salvo no disco rígido usando o método SaveAsFile.
No VBScript, se você definir o valor de retorno dessa função como False, o salvamento operação será cancelada e o anexo não será alterado.
Exemplo
Este exemplo Visual Basic for Applications (VBA) informa ao usuário que o usuário não tem permissão para salvar o anexo. O argumento Cancelar é definido como True para cancelar a operação de salvamento. O código de exemplo deve ser colocado em um módulo de classe como ThisOutlookSession
, e o TestAttachSave()
procedimento deve ser chamado antes que o procedimento de evento possa ser chamado pelo Microsoft Outlook.
Public WithEvents myItem As Outlook.MailItem
Private Sub myItem_BeforeAttachmentSave(ByVal myAttachment As Attachment, Cancel As Boolean)
MsgBox "You are not allowed to save " & myAttachment.FileName
Cancel = True
End Sub
Public Sub TestAttachSave()
Set myItem = Application.ActiveInspector.CurrentItem
End Sub
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.