Compartilhar via

Propriedade Global.ActivePage (Visio)

  • Artigo

Retorna o objeto Page ativo. Somente leitura.

Sintaxe

expressão. ActivePage

Expressão Uma variável que representa um objeto Global .

Valor de retorno

Page

Comentários

A propriedade ActivePage retorna um objeto Page somente quando a janela ativa exibe uma página de desenho; caso contrário, ela retorna Nothing. Para verificar se uma página está ativa, use o operador Is para comparar a propriedade ActivePage com Nothing.

É possível obter a janela ativa sem qualificação do objeto global do Microsoft Visio, que está disponível automaticamente para o código VBA que faz parte do projeto VBA de um documento do Visio. Por exemplo, você pode usar este código:

Set vsoPage = ActivePage

Exemplo

Esta macro do Microsoft Visual Basic for Applications (VBA) mostra como obter a página ativa sem qualificação do objeto global do Visio, que está disponível automaticamente para o código VBA que faz parte do projeto VBA de um documento do Visio.

 
Public Sub ActivePage_Example() 
 
 Dim vsoPage As Page 
 
 'Find out if a page exists, and if it does, get the page. 
 If Not(ActivePage Is Nothing) Then 
 Set vsoPage = ActivePage 
 Debug.Print vsoPage.Name 
 Else 
 Debug.Print "No active page." 
 End If 
 
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.