Evento Document.DocumentCreated (Visio)
Ocorre após um documento ser criado.
Sintaxe
expressão. DocumentCreated (doc)
Expressão Uma variável que representa um objeto Document .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
doc | Obrigatório | [IVDOCUMENT] | O documento que foi criado. |
Comentários
O evento DocumentCreated é muitas vezes adicionado à coleção EventList de um arquivo de modelo do Microsoft Visio (.vst). A ação do evento é disparada sempre que um documento novo é criado com base naquele modelo.
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.
Se você quiser criar seus próprios objetos Event , use o método Add ou AddAdvise .
Para criar um objeto Event que execute um complemento, use o método Add, uma vez que ele aplica-se à coleção EventList.
Para criar um objeto Event que receba notificação, use o método AddAdvise.
Para localizar um código de evento que você deseja criar, consulte Códigos de eventos.
Você pode adicionar eventos DocumentCreated à coleção EventList de um objeto Application, coleção Documents ou objeto Document. As duas primeiras são diretas; se um documento é aberto ou criado no escopo do objeto Application ou sua coleção Documents, o evento DocumentCreated ocorre.
No entanto, adicionar um evento DocumentCreated à coleção EventList de um objeto Document só faz sentido se a ação do evento for visActCodeRunAddon. Nesse caso, o evento é persistência; ele pode ser armazenado com o documento. Se o documento que contém o evento persistente for aberto, sua ação será disparada. Se um novo documento for baseado ou copiado do documento que contém o evento persistente, o evento DocumentCreated será copiado para o novo documento e sua ação será disparada. No entanto, se a ação do evento for visActCodeAdvise, esse evento não será persistente e, portanto, não será armazenado com o documento; portanto, ele nunca é disparado.
Você pode impedir que códigos sejam executados em resposta ao evento DocumentCreated, DocumentOpened ou DocumentAdded e que todos os eventos sejam disparados, definindo o valor da propriedade EventsEnabled de um objeto Application para False.
Exemplo
Este exemplo VBA mostra como contar formas adicionadas a um desenho com base em um mestre chamado Square.
O manipulador de eventos DocumentCreated é executado quando um novo desenho com base no modelo que contém esse código é criado. O manipulador inicializa uma variável inteira, intNumberOfSquares, usada para armazenar a contagem.
O manipulador de eventos ShapeAdded é executado a cada vez que uma forma é adicionada à página de desenho, seja a forma arrastada de um estêncil, desenhada com uma ferramenta de desenho ou colada a partir da Área de transferência. O manipulador verifica a propriedade Mestre da nova forma e, se a forma for baseada no mestre square , incrementa intNumberOfSquares.
Dim intNumberOfSquares As Integer
Private Sub Document_DocumentCreated(ByVal vsoDocument As Visio.IVDocument)
'Initialize number of squares added.
intNumberOfSquares = 0
End Sub
Private Sub Document_ShapeAdded(ByVal vsoShape As Visio.IVShape)
Dim vsoMaster As Visio.Master
'Get the Master property of the shape.
'the shape was created locally.
Set vsoMaster = vsoShape.Master
'Check whether the shape has a master. If not,
If Not (vsoMaster Is Nothing) Then
'Check whether the master is "Square".
If vsoMaster.Name = "Square" Then
'Increment the count for the number of squares added.
intNumberOfSquares = intNumberOfSquares + 1
End If
End If
MsgBox "Number of squares: " & intNumberOfSquares, vbInformation, _
"Document Created Example"
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.