Table of contents
TOC
Recolher sumário
Expandir sumário

Evento Application.DocumentSavedAs (Visio)Application.DocumentSavedAs Event (Visio)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Ocorre após um documento ser salvo usando o comando Salvar como .Occurs after a document is saved by using the Save As command.

SintaxeSyntax

Private Sub expressãoDocumentSavedAs( **_ByVal doc como [IVDOCUMENT]** )Private Sub expressionDocumentSavedAs( **_ByVal doc As [IVDOCUMENT]** )

expressão Uma variável que representa um objeto Application .expression A variable that represents an Application object.

ParâmetrosParameters

NomeNameObrigatório/opcionalRequired/OptionalTipo de dadosData TypeDescriçãoDescription
docdocObrigatórioRequired[IVDOCUMENT][IVDOCUMENT]O documento que foi salvo.The document that was saved.

ComentáriosRemarks

O evento DocumentSavedAs é um de um grupo de eventos para os quais a propriedade EventInfo do objeto Application contém informações extras.The DocumentSavedAs event is one of a group of events for which the EventInfo property of the Application object contains extra information.

Se o evento DocumentSavedAs for disparado porque uma gravação foi iniciada por um usuário ou de um programa, a propriedade EventInfo retornará a cadeia de caracteres a seguir:If the DocumentSavedAs event is fired because a save was initiated by a user or a program, the EventInfo property returns the following string:

"/ saveasfile =""/saveasfile="

Se ele é disparado porque o Microsoft Visio está salvando uma cópia de um arquivo aberto (para AutoRecuperação ou incluir como um anexo de email), a propriedade EventInfo retorna uma das cadeias de caracteres seguintes:If it fires because Microsoft Visio is saving a copy of an open file (for autorecovery or to include as a mail attachment), the EventInfo property returns one of the following strings:

  • Se o evento for disparado para fins de recuperação automática, o nome de uma recuperação de arquivos neste formato: "/ /autosavefile = DriveName: \ foldername\filename "If the event is fired for autorecovery purposes, the name of a recovery file in this format: "/autosavefile= drivename:\foldername\filename "

  • Se o evento for disparado porque uma cópia do documento que está sendo feita para ser enviada como anexo de email, o nome de um anexo de arquivo neste formato: "/ /mailfile = DriveName: \ foldername\filename "If the event is fired because a document copy is being made to send as a mail attachment, the name of an attachment file in this format: "/mailfile= drivename:\foldername\filename "

Se estiver usando o Microsoft Visual Basic ou o Visual Basic for Applications (VBA), a sintaxe deste tópico descreverá uma maneira comum e eficiente de lidar com eventos.If you are using Microsoft Visual Basic or Visual Basic for Applications (VBA), the syntax in this topic describes a common, efficient way to handle events.

Se você deseja criar seus próprios objetos de evento , use o método Add ou AddAdvise . Para criar um objeto Event que execute um complemento, use o método Add como ele se aplica à coleção EventList . Para criar um objeto Event que recebe uma notificação, use o método AddAdvise . Para localizar um código de evento para o evento que você deseja criar, consultecódigos de evento.If you want to create your own Event objects, use the Add or AddAdvise method. To create an Event object that runs an add-on, use the Add method as it applies to the EventList collection. To create an Event object that receives notification, use the AddAdvise method. To find an event code for the event you want to create, seeEvent codes.

Se estiver manipulando este evento a partir de um programa que recebe uma notificação sobre uma conexão criada usando o método AddAdvise , o argumento varMoreInfo para VisEventProc designa o índice do documento: "/ /doc = 1".If you are handling this event from a program that receives a notification over a connection created by using the AddAdvise method, the varMoreInfo argument to VisEventProc designates the document index: "/doc=1".

© 2018 Microsoft