Propriedade Application.VBE (Visio)

Obtém o objeto raiz do modelo de objeto exposto pelo Microsoft Visual Basic for Applications (VBA). Use essa propriedade para acessar e manipular os projetos do VBA associados aos documentos atualmente abertos do Microsoft Visio. Somente leitura.

Sintaxe

expressão. VBE

expressão Uma variável que representa um Aplicativo objeto.

Valor de retorno

Objeto

Comentários

Para obter informações sobre o objeto retornado pela propriedade Vbe , siga estas etapas:

Para obter informações sobre o objeto retornado pela propriedade Vbe

1. No grupo Código na guia Desenvolvedor , clique em Visual Basic.

2. No Editor do Visual Basic, no menu Ferramentas, clique em Referências.

3. Na caixa de diálogo Referências, clique em Microsoft Visual Basic for Applications Extensibility 5.3 e, em seguida, clique em OK.

4. No menu Exibir, clique em Pesquisador de Objetos.

5. Na lista Projeto/Biblioteca, selecione a biblioteca de tipos VBIDE.

6. Na lista Classes, examine a classe denominada VBE.

A partir do Visio 2002, a propriedade Vbe eleva uma exceção caso você esteja executando em um ambiente de segurança aprimorada e o administrador do sistema tenha bloqueado o acesso ao modelo de objeto do VBA. Não existe uma interface de usuário ou uma forma programática de de ativar isso — o administrador do sistema deve ativar (ou desativar) o acesso pela configuração de uma Política de Grupo. Isso ajuda a proteger contra vírus que se espalham por meio do acesso aos projetos do Visual Basic em modelos comumente utilizados e da injeção do código do vírus neles.

Exemplo

Esta macro do VBA mostra como usar a propriedade Vbe para determinar quantos projetos do VBA estão abertos em uma instância do Visio.

Antes de executar esse código, certifique-se de que o acesso de confiança à caixa de seleção modelo de objeto de projeto do VBA esteja selecionado em Configurações de Macro do Desenvolvedor na página Configurações de Macro da caixa de diálogo Centro de Confiança (clique na guia Arquivo , clique em Opções, clique em Centro de Confiança e clique em Configurações da Central de Confiança).

 
Public Sub Vbe_Example() 
 
     Dim vbideVBE As VBIDE.VBE 
 
     Set vbideVBE = Visio.Application.Vbe 
     Debug.Print vbideVBE.VBProjects.Count 
 
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.