Objeto ThisDocument (Visio)
O projeto de Visual Basic for Applications (VBA) de cada documento do Visio tem um módulo de classe chamado ThisDocument. Quando referenciado do código no projeto, o objeto ThisDocument retorna uma referência ao objeto Document do projeto.
Você pode exibir o nome do documento do projeto VBA em uma caixa de mensagens usando a instrução a seguir.
MsgBox ThisDocument.Name
Você pode obter a primeira página do documento do projeto do VBA usando o código a seguir.
Dim vsoPage As Visio.Page
Set vsoPage = ThisDocument.Pages.Item(1)
Comentários
Se desejar manipular o documento associado ao seu projeto VBA, use o objeto ThisDocument.
Se desejar manipular um documento, mas não necessariamente o documento associado ao seu projeto VBA, obtenha um objeto Document da coleção Documents.
Frequentemente, mas não necessariamente, a propriedade ActiveDocument retorna uma referência ao mesmo documento que o objeto ThisDocument. Os objetos ActiveDocument e ThisDocument serão iguais se o documento mostrado na janela ativa do Visio for o documento que contém o projeto do objeto ThisDocument. A utilização do objeto ActiveDocument ou ThisDocument pelo código dependerá do objetivo do seu programa.
Observação
Você pode estender o conjunto de propriedades e métodos do objeto Document de um projeto adicionando propriedades e métodos públicos ao módulo de classe ThisDocument desse projeto. Os novos métodos e propriedades são expostos da mesma maneira que os métodos e propriedades internos implementados pelo Visio.
Os novos métodos e propriedades não estão disponíveis quando você referencia outros objetos Document. O objeto ThisDocument não está disponível para códigos que não fazem parte do projeto VBA de um documento do Visio.
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.