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

mais simples. 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 da 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, verifique se a caixa Confiar no acesso ao modelo de objeto do projeto VBA marcar está selecionada em Configurações de Macro do Desenvolvedor na página Configurações de Macro da caixa de diálogo Central de Confiabilidade (clique na guia Arquivo, em Opções, em Central de Confiabilidade e em Configurações da Central de Confiabilidade).

 
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.