Exemplo do evento Click

O exemplo a seguir ilustra como você pode configurar o código de um procedimento do evento Click utilizando WithEvents e Set. Observe que a referência ao objeto ce é utilizada em vez do nome do menu Ferramentas no nome do evento Click.

Private WithEvents ce As CommandBarEvents

Sub Test()

    Dim c As CommandBarControl

    Set c = Application.VBE.CommandBars("Tools").Controls(1)

    Set ce = Application.VBE.Events.CommandBarEvents(c)

End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)

    ' Insira aqui o código de tratamento de eventos

End Sub


Evento Click (Modelo de objeto do suplemento VBA)

Ocorre quando a propriedade OnAction de um controle de barra de comandos correspondente é definida.

Sintaxe

Sub object_Click (ByVal ctrl As Object, ByRef handled As Boolean, ByRef canceldefault As Boolean)

A sintaxe do evento Click tem os seguintes argumentos nomeados:

Parte	Descrição
Ctrl	Obrigatório; Object. Especifica o objeto que é a origem do evento Click.
Handled	Obrigatório; Boolean. Se for True, outros suplementos devem manipular o evento. Se for False, a ação do item da barra de comandos não foi manipulada.
Canceldefault	Obrigatório; Boolean. Se for True, o comportamento padrão é realizado, a menos que seja cancelado por um suplemento relacionado. Se for False, o comportamento padrão não é realizado se não for recuperado por um suplemento relacionado.
Comentários

O evento Click é específico ao objeto CommandBarEvents. Utilize uma variável declarada por meio da palavra-chave WithEvents para receber o evento Click de um controle CommandBar. Essa variável deve ser definida com o valor de retorno da propriedade CommandBarEvents do objeto Events. A propriedade CommandBarEvents interpreta o controle CommandBar como um argumento. Quando for clicado no controle CommandBar (para a variável que você declarou utilizando a palavra-chave WithEvents), o código será executado.


Evento ItemAdded (Modelo de objeto do suplemento VBA)

Ocorre depois de uma referência ser adicionada.

Sintaxe

Sub object_ItemAdded(ByVal item As Reference)

O argumento obrigatório item especifica o item que foi adicionado.

Comentários

O evento ItemAdded ocorre quando uma Reference é adicionada à coleção References.


Evento ItemRemoved (Modelo de objeto do suplemento VBA)

Ocorre depois de uma referência ser removida de um projeto.

Sintaxe

Sub object_ItemRemoved(ByVal item As Reference)

O argumento obrigatório item especifica a Reference que foi removida.


Método Add (modelo de objeto do suplemento VBA)

Adiciona um objeto a uma coleção.

Sintaxe

object.Add(component)

A sintaxe de Add tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
component	Obrigatória. Para a coleção LinkedWindows, um objeto. Para a coleção VBComponents, uma constante enumerada que representa um módulo de classe, um formulário ou um módulo padrão. Para a coleção VBProjects, uma constante enumerada que representa um tipo de projeto.
Você pode usar uma das constantes a seguir para o argumento component:

Constante	Descrição
vbext_ct_ClassModule	Adiciona um módulo de classe à coleção.
vbext_ct_MSForm	Adiciona um formulário à coleção.
vbext_ct_StdModule	Adiciona um módulo padrão à coleção.
vbext_pt_StandAlone	Adiciona um projeto autônomo à coleção.
Comentários

Para a coleção LinkedWindows, o método Add adiciona uma janela à coleção de janelas vinculadas no momento.

Observação   Você pode adicionar uma janela que é um painel em uma moldura de janela vinculada a outra moldura de janela vinculada; a janela é simplesmente movida de um painel para o outro. Se a moldura de janela vinculada da qual a janela foi movida não contiver mais nenhum painel, ela será destruída.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas encaixadas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.

Para a coleção VBComponents, o método Add cria um novo componente padrão e o adiciona ao projeto.

Para a coleção VBComponents, o método Add retorna um objeto VBComponent. Para a coleção LinkedWindows, o método Add retorna Nothing.

Para a coleção VBProjects, o método Add retorna um objeto VBProject e adiciona um projeto à coleção VBProjects.


Método AddFromFile (Modelo de objeto do suplemento VBA Add-In)
Método AddFromFile

Para a coleção References, adiciona uma referência a um projeto a partir de um arquivo. Para o objeto CodeModule, adiciona o conteúdo de um arquivo a um módulo.

Sintaxe

object.AddFromFile(filename)

A sintaxe de AddFromFile tem as seguintes partes:

Parte	Descrição
Object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
Filename	Obrigatória. Uma expressão de seqüência de caracteres que especifica o nome do arquivo que você deseja adicionar ao projeto ou ao módulo. Caso o nome do arquivo não seja localizado e o nome do caminho não seja especificado, os diretórios pesquisados pela função Windows OpenFile serão pesquisados.
Comentários

Para o objeto CodeModule, o método AddFromFile insere o conteúdo do arquivo a partir da linha que precede o primeiro procedimento no módulo de código. Se o módulo não contiver procedimentos, o método AddFromFile inserirá o conteúdo do arquivo no seu final.


Método AddCustom

Retorna um objeto VBComponent ou cria um novo componente personalizado e o adiciona ao projeto.

Sintaxe

object.AddCustom (ByVal progid As String) As VBComponent

A sintaxe do método AddCustom tem as seguintes partes:

Parte	Descrição
Object	Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
Progid	Obrigatória. O ProgID do componente personalizado a ser criado.


Método AddFromGuid (Modelo de objeto suplementar do VBA)
Método AddFromGuid

Adiciona uma referência à coleção References utilizando o globally unique identifier (GUID, identificador exclusivo) da referência.

Sintaxe

object.AddFromGuid(guid, major, minor) As Reference

A sintaxe de AddFromGuid tem as seguintes partes:

Parte	Descrição
Object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
Guid	Obrigatória. Uma expressão de seqüência de caracteres que representa o GUID da referência.
Major	Obrigatória. Um Long que especifica o número de versão primária da referência.
Minor	Obrigatória. Um Long que especifica o número de versão secundária da referência.
Comentários

O método AddFromGuid pesquisa o registro para localizar a referência que você deseja adicionar. O GUID pode ser uma biblioteca de tipos, controle, identificador de classes e assim por diante.


Método AddFromString (Modelo de objeto suplementar do VBA)
Método AddFromString

Adiciona texto a um módulo.

Sintaxe

object.AddFromString

O espaço reservado object é uma expressão de objeto que resulta em um objeto na lista Aplica-se a.

Comentários

O método AddFromString insere o texto a partir da linha que precede o primeiro procedimento no módulo. Se o módulo não contiver procedimentos, AddFromString inserirá o texto no seu final.


Método Close (Modelo de objeto suplementar do VBA)

Fecha e destrói uma janela.

Sintaxe

object.Close

O espaço reservado object é uma expressão de objeto que resulta em um objeto na lista Aplica-se a.

Comentários

Os tipos de janelas a seguir respondem ao método Close de diferentes maneiras:

•	Para uma janela que é um painel de código, Close destrói o painel de código.

•	Para uma janela que é um criador, Close destrói o criador contido.

•	Para janelas que estão sempre disponíveis no menu Exibir, Close oculta a janela.


Método CreateEventProc (Modelo de objeto suplementar do VBA)
Método CreateEventProc

Cria um procedimento de evento.

Sintaxe

object.CreateEventProc(eventname, objectname) As Long

A sintaxe de CreateEventProc tem as seguintes partes:

Parte	Descrição
Object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
Eventname	Obrigatória. Uma expressão de seqüência de caracteres que especifica o nome do evento que você deseja adicionar ao módulo.
Objectname	Obrigatória. Uma expressão de seqüência de caracteres que especifica o nome do objeto que é a origem do evento.
Comentários

Utilize o método CreateEventProc para criar um procedimento de evento. Por exemplo, para criar um procedimento de evento para o evento Click de um controle Command Button nomeado Command1, use o código a seguir, onde CM representa um objeto do tipo CodeModule:

TextLocation = CM.CreateEventProc("Click", "Command1")

O método CreateEventProc retorna a linha na qual tem início o corpo do procedimento de evento. CreateEventProc falhará se os argumentos se referirem a um evento inexistente.


Método CreateToolWindow

Cria uma nova janela Ferramenta que contém o objeto UserDocument indicado.

Sintaxe

object.CreateToolWindow (AddInInst, ProgID, Caption, GuidPosition, DocObj) As Window

A sintaxe do método CreateToolWindow tem as seguintes partes:

Parte	Descrição
object	Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
AddInInst	Obrigatória. Uma variável de ocorrência de suplemento que representa um suplemento no ambiente de desenvolvimento.
ProgID	Obrigatória. Seqüência de caracteres que representa o progID do objeto UserDocument.
Legenda	Obrigatória. Seqüência de caracteres que contém a legenda da janela.
GuidPosition	Obrigatória. Seqüência de caracteres que contém um identificador exclusivo para a janela.
DocObj	Obrigatória. Objeto que representa um objeto UserDocument. Este objeto será definido na chamada desta função.


Método DeleteLines (Modelo de objeto suplementar do VBA)
Método DeleteLines

Exclui uma linha ou um intervalo de linhas especificado.

Sintaxe

object.DeleteLines (startline [, count])

A sintaxe de DeleteLines tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
startline	Obrigatória. Um Long que especifica a primeira linha que você deseja excluir.
count	Opcional. Um Long que especifica o número de linhas que você deseja excluir.
Comentários

Se você não especificar a quantidade de linhas que deseja excluir, DeleteLines excluirá uma linha.


Método DesignerWindow

Retorna o objeto Window que representa o criador do componente.

Sintaxe

object.DesignerWindow

O espaço reservado object é uma expressão de objeto que resulta em um objeto na lista Aplica-se a.

Comentários

Se o componente aceita um criador mas não tem um criador aberto, o uso do método DesignerWindow criará o criador, mas ele não será visível. Para tornar a janela visível, defina a propriedade Visible do objeto Window como True.


Método Export (Modelo de objeto suplementar do VBA)

Salva um componente como um ou mais arquivos separados.

Sintaxe

object.Export(filename)

A sintaxe de Export tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
filename	Obrigatória. Uma Seqüência de caracteres que especifica o nome do arquivo para o qual você deseja exportar o componente.
Comentários

Quando utilizar o método Export para salvar um componente como um ou mais arquivos separados, use um nome de arquivo que ainda não existe; caso contrário, ocorrerá um erro.


Método Find (Modelo de objeto suplementar do VBA)

Pesquisa a seqüência de caracteres especificada no módulo ativo.

Sintaxe

object.Find(target, startline, startcol, endline, endcol [, wholeword] [, matchcase] [, patternsearch]) As Boolean

A sintaxe de Find tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
target	Obrigatória. Uma Seqüência de caracateres que contém o texto ou padrão que você deseja localizar.
startline	Obrigatória. Um Long que especifica a linha na qual você deseja iniciar a pesquisa; será definida como a linha da correspondência, se for localizada uma. A primeira linha é a número 1.
startcol	Obrigatória. Um Long que especifica a coluna na qual você deseja iniciar a pesquisa; será definida como a coluna que contém a correspondência, se for localizada uma. A primeira coluna é 1.
endline	Obrigatória. Um Long que especifica a última linha da correspondência, se for localizada uma. A última linha pode ser especificada como –1.
endcol	Obrigatória. Um Long que especifica a última linha da correspondência, se for localizada uma. A última coluna pode ser designada como –1.
wholeword	Opcional. Um valor Booleano que especifica se deve haver correspondência somente de palavras inteiras. Se for True, coincidirá somente palavras inteiras. False é o padrão.
matchcase	Opcional. Um valor Booleano que especifica se deve ser feita uma diferenciação de maiúsculas e minúsculas. Se for True, a pesquisa diferenciará maiúsculas de minúsculas. False é o padrão.
patternsearch	Opcional. Um valor Booleano que especifica se a seqüência de caracteres de destino é ou não um padrão de expressão normal. Se for True, a seqüência de caracteres de destino será um padrão de expressão normal. False é o padrão.
Comentários

Find retornará True se uma correspondência for localizada e False se não for localizada.

Os argumentos matchcase e patternsearch são mutuamente exclusivos; se os dois argumentos forem passados como True, ocorrerá um erro.

O conteúdo da caixa de diálogo Find não é afetado pelo método Find.

O intervalo de linhas e colunas especificado é inclusivo, logo, uma pesquisa poderá localizar o padrão na última linha especificada se endcol for fornecido como –1 ou como o comprimento da linha.


Método GetSelection (Modelo de objeto suplementar do VBA)
Método GetSelection

Retorna a seleção em um painel de código.

Sintaxe

object.GetSelection(startline, startcol, endline, endcol)

A sintaxe de GetSelection tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
startline	Obrigatória. Um Long que retorna um valor que especifica a primeira linha da seleção no painel de código.
startcol	Obrigatória. Um Long que retorna um valor que especifica a primeira coluna da seleção no painel de código.
endline	Obrigatória. Um Long que retorna um valor que especifica a última linha da seleção no painel de código.
endcol	Obrigatória. Um Long que retorna um valor que especifica a última coluna da seleção no painel de código.
Comentários

Quando você utiliza o método GetSelection, as informações são retornadas em argumentos de saída. Conseqüentemente, você deve passar variáveis, pois as variáveis serão modificadas de modo a conter as informações quando retornadas.


Método Import (Modelo de objeto suplementar do VBA)

Adiciona um componente a um projeto a partir de um arquivo; retorna o componente recém-adicionado.

Sintaxe

object.Import(filename) As VBComponent

A sintaxe de Import tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
filename	Obrigatória. Uma Seqüência de caracteres que especifica o caminho e o nome do arquivo do componente do qual você deseja importar o componente.
Comentários

Você pode utilizar o método Import para adicionar um componente, formulário, módulo, classe e assim por diante, ao seu projeto.


Método InsertLines (Modelo de objeto suplementar do VBA)
Método InsertLines

Insere uma ou mais linhas de código em um local especificado em um bloco de código.

Sintaxe

object.InsertLines(line, code)

A sintaxe de InsertLines tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
line	Obrigatória. Um Long que especifica o local no qual você deseja inserir o código.
code	Obrigatória. Uma Seqüência de caracteres que contém o código que você deseja inserir.
Comentários

Se o texto que você inserir utilizando o método InsertLines for delimitado por retorno de carro e alimentação de linha, ele será inserido como linhas consecutivas.


Método Item (Modelo de objeto suplementar do VBA)

Retorna o membro indexado de uma coleção.

Sintaxe

object.Item(index)

A sintaxe do método Item tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
index	Obrigatória. Uma expressão que especifica a posição de um membro da coleção. Se for uma expressão numérica, index deverá ser um número de 1 ao valor da propriedade Count da coleção. Se for uma expressão de seqüência de caracteres, index deverá corresponder ao argumento key especificado quando o membro foi adicionado à coleção.
A tabela a seguir relaciona as coleções e seus argumentos key correspondentes utilizados com o método Item. A seqüência de caracteres que você passar para o método Item deverá coincidir com o argumento key da coleção.

Coleção	Argumento key
Windows	Configuração da propriedade Caption
LinkedWindows	Configuração da propriedade Caption
CodePanes	Não há nenhuma seqüência de caracteres exclusiva associada a esta coleção.
VBProjects	Configuração da propriedade Name
VBComponents	Configuração da propriedade Name
Referências	Configuração da propriedade Name
Properties	Configuração da propriedade Name
Comentários

O argumento index pode ser um valor numérico ou uma seqüência de caracteres que contém o título do objeto.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculadas e janelas encaixadas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Método InsertFile

Insere código a partir de um arquivo em um módulo de código.

object.InsertFile(filename) As String

A sintaxe de InsertFile tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
filename	Obrigatória. Uma Seqüência de caracteres que especifica o arquivo que contém o código a ser inserido no módulo de código.


Método Remove (Modelo de objeto suplementar do VBA)

Remove um item de uma coleção.

Sintaxe

object.Remove(component)

A sintaxe de Remove tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
component	Obrigatória. Para a coleção LinkedWindows, um objeto. Para a coleção References, uma referência a uma biblioteca de tipos ou a um projeto. Para a coleção VBComponents, uma constante enumerada que representa um módulo de classe, um formulário ou um módulo padrão. Para a coleção VBProjects, um projeto autônomo.
Comentários

Quando utilizado na coleção LinkedWindows, o método Remove remove uma janela da coleção de janelas vinculadas no momento. A janela removida torna-se uma janela flutuante com a sua própria moldura de janela vinculada. O método Remove somente pode ser utilizado em um projeto autônomo. Ele gera um erro em tempo de execução se você tentar utilizá-lo em um projeto host.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculadas e janelas encaixadas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Método ReplaceLine (Modelo de objeto suplementar do VBA)
Método ReplaceLine

Substitui uma linha de código existente por uma linha de código especificada.

Sintaxe

object.ReplaceLine(line, code)

A sintaxe de ReplaceLine tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
line	Obrigatória. Um Long que especifica o local da linha que você deseja substituir.
code	Obrigatória. Uma Seqüência de caracteres que contém o código que você deseja inserir.


Método MakeCompiledFile

Faz com que o projeto atual seja gravado como uma DLL. O nome da DLL é especificado pela propriedade BuildFileName.

Sintaxe

object.MakeCompiledFile

O espaço reservado object representa uma expressão de objeto que resulta em um objeto na lista Aplica-se a.


Método SetFocus (Modelo de objeto suplementar do VBA)
Método SetFocus

Move o foco para a janela especificada.

Sintaxe

object.SetFocus

O espaço reservado object é uma expressão de objeto que resulta em um objeto na lista Aplica-se a.

Comentários

Utilize o método SetFocus em janelas que já estão visíveis.


Método SaveAs

Salva um projeto em um determinado local usando um novo nome de arquivo.

Sintaxe

object.SaveAs (newfilename As String)

A sintaxe do método SaveAs tem as seguintes partes:

Parte	Descrição
object	Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
newfilename	Obrigatória. Uma expressão de seqüência de caracteres que especifica o novo nome de arquivo para o componente a ser salvo.
Comentários

Se um novo nome de caminho for fornecido, ele será usado. Caso contrário, será usado o nome antigo do caminho. Se o novo nome de arquivo for inválido ou se referir a um arquivo somente leitura, ocorrerá um erro.

O método SaveAs somente pode ser utilizado em projetos autônomos. Ele gera um erro em tempo de execução se você utilizá-lo com um projeto host.


SetSelection Method (VBA Add-In Object Model)
Método SetSelection

Define a seleção no painel de código.

Sintaxe

object.SetSelection(startline, startcol, endline, endcol)

A sintaxe de SetSelection tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
startline	Obrigatória. Um Long que especifica a primeira linha da seleção.
startcol	Obrigatória. Um Long que especifica a primeira coluna da seleção.
endline	Obrigatória. Um Long que especifica a última linha da seleção.
endcol	Obrigatória. Um Long que especifica a última coluna da seleção.


Método Show (Modelo de objeto suplementar do VBA)

Faz com que o painel de código especificado seja o painel de código visível na sua janela.

Sintaxe

object.Show

O espaço reservado object é uma expressão de objeto que resulta em um objeto na lista Aplica-se a.

Comentários

O método Show faz com que o painel de código especificado seja o painel com o foco na sua janela.


Método Update

Atualiza o conteúdo da coleção AddIns a partir dos suplementos listados no arquivo Vbaddin.ini, da mesma forma como se o usuário tivesse aberto a caixa de diálogo Gerenciador de suplementos.

Sintaxe

object.Update

O espaço reservado object representa uma expressão de objeto que avalia um objeto na lista Aplica-se a.

Comentários

Todos os suplementos listados no arquivo Vbaddin.ini devem ser componentes ActiveX registrados no Registro para que possam ser utilizados no Visual Basic.


Exemplo do método Add

O exemplo a seguir usa o método Add para adicionar um módulo padrão à coleção VBComponents.

Application.VBE.VBProjects(1).VBComponents.Add(vbext_ct_StdModule)


Exemplo do método AddFromFile

O exemplo a seguir usa o método AddFromFile para adicionar o conteúdo de um arquivo a um painel de código especificado.

Application.VBE.CodePanes(3).CodeModule.AddFromFile "c:\Code Files\book2.frm"


Exemplo do método AddFromGUID

O exemplo a seguir usa o método AddFromGUID para adicionar uma referência ao projeto atual, identificando a referência através do valor de identificador exclusivo do objeto Reference.

Application.VBE.ActiveVBProject.References.AddFromGuid("{000204EF-0000-0000-C000-000000000046}", 5, 0)


Exemplo do método AddFromString

O exemplo a seguir usa o método AddFromString para adicionar uma linha, "Dim intJack As Integer", ao painel de código especificado.

Application.VBE.CodePanes(3).CodeModule.AddFromString "Dim intJack As Integer"


Exemplo do método Close

O exemplo a seguir usa o método Close para fechar um membro especificado da coleção Windows.

Application.VBE.Windows(9).Close


Exemplo do método CreateEventProc

O exemplo a seguir usa o método CreateEventProc para criar o procedimento Button_Click.

Debug.Print Application.VBE.SelectVBComponents.CodeModule.CreateEventProc("Click", "Button")


Exemplo do método DeleteLines

O exemplo a seguir tem duas etapas. O primeiro loop For…Next usa o método InsertLines para inserir em CodePanes(1) 26 segmentos iniciais do alfabeto incrementados letra a letra, começando pelo "a". A última linha inserida é o alfabeto inteiro.

O segundo loop For…Next usa o método DeleteLines para excluir as linhas de número ímpar. Embora pareça que o segundo loop deve simplesmente excluir linhas alternadas, observe que, após cada exclusão, as linhas são renumeradas. Portanto, a exclusão avança duas linhas em cada etapa, uma linha porque I está aumentando um e outra linha porque cada número de linha maior está diminuindo um.

For I = 1 to 26

Application.VBE.SelectedVBComponent.CodeModule.InsertLines i, Mid$("abcdefghijklmnopqrstuvwxyz", 1, I)

Next

For I = 1 to 13

Application.VBE.SelectedVBComponent.CodeModule.DeleteLines I

Next


Exemplo do método DesignerWindow

O exemplo a seguir usa o método DesignerWindow e a propriedade Visible para saber se um determinado criador está ou não visível. Observe que o objeto VBComponent deve ser um formulário.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).DesignerWindow.Visible


Exemplo do método Export

O exemplo a seguir cria um arquivo denominado test.bas e usa o método Export para copiar o conteúdo do módulo do código VBComponents(1) no arquivo.

Application.VBE.ActiveVBProject.VBComponents(1).Export("test.bas")


Exemplo do método Find

O exemplo a seguir usa o método Find para verificar se o bloco de linhas especificado, linhas 1261 a 1279, de um determinado painel de código realmente contém a seqüência de caracteres "Tabs.Clear".

Application.VBE.CodePanes(2).CodeModule.Find ("Tabs.Clear", 1261, 1, 1280, 1, False, False)


Exemplo do método GetSelection

O exemplo a seguir retorna os locais dos pontos inicial e final da seleção atual em CodePanes(1). A última linha do exemplo usa o método GetSelection para inserir os quatro valores nas quatro variáveis.

Dim m As Long

Dim n As Long

Dim x As Long

Dim y As Long

Application.VBE.CodePanes(1).GetSelection m, n, x, y


Exemplo do método Import

O exemplo a seguir usa o método Import na coleção VBComponents para copiar o conteúdo do arquivo test.bas em um módulo de código.

Application.VBE.ActiveVBProject.VBComponents.Import("test.bas")


Exemplo do método InsertLines

O exemplo a seguir usa o método InsertLines para inserir uma linha, "Option Explicit", no painel de código especificado.

Application.VBE.CodePanes(1).CodeModule.InsertLines 1, "Option Explicit"


Exemplo do método Item

O exemplo a seguir apresenta duas maneiras de exibir um membro específico da coleção CodePanes, uma delas usando o método Item.

Application.VBE.CodePanes.Item(2).Show

Application.VBE.CodePanes(2).Show


Exemplo do método Remove

O exemplo verifica se um determinado membro da coleção VBComponents é um módulo e, em seguida, usa o método Remove para remover o módulo.

Debug.Print Application.VBE.ActiveVBProject.VBComponents(4).Name

Application.VBE.ActiveVBProject.VBComponents.Remove Application.VBE.ActiveVBProject.VBComponents(4)


Exemplo do método ReplaceLine

O exemplo a seguir tem duas etapas. O primeiro loop For…Next usa o método InsertLines para inserir em CodePanes(1) 26 segmentos iniciais do alfabeto incrementados letra a letra, começando pelo "a". A última linha inserida é o alfabeto inteiro.

O segundo loop For…Next usa o método ReplaceLine para substituir cada linha de número par pela última letra na seqüência de caracteres que ocupava anteriormente essa linha. As linhas de número ímpar permanecem inalteradas.

For I = 1 to 26

Application.VBE.CodePanes(1).CodeModule.InsertLines I, Mid$("abcdefghijklmnopqrstuvwxyz", 1, I)

Next I

For I = 1 to 13

Application.VBE.CodePanes(1).CodeModule.ReplaceLine 2*I, Mid$("abcdefghijklmnopqrstuvwxyz", 1, I)

Next I


Exemplo do método SetFocus

O exemplo a seguir usa o método SetFocus para mover o foco para um determinado membro da coleção Windows ou seja, ele faz essa janela se comportar como se você tivesse clicado na sua barra de título com o mouse.

Application.VBE.Windows(9).SetFocus


Exemplo do método SetSelection

O exemplo a seguir usa o método SetSelection para selecionar o texto cujo primeiro caractere é o que vem imediatamente após o quarto caractere na segunda linha de CodePanes(1) e cujo último caractere é o décimo quinto caractere na terceira linha.

Application.VBE.CodePanes(1).SetSelection 2,4,3,15


Exemplo do método Show

O exemplo a seguir usa o método Show para mover o painel de código especificado para o primeiro plano.

Application.VBE.CodePanes(2).Show


Objeto AddIn

O objeto AddIn fornece informações sobre um suplemento para outros suplementos.

Sintaxe

object.AddIn

Comentários

É criado um objeto AddIn para cada suplemento que aparece no Gerenciador de suplementos.


Coleção AddIns

Retorna uma coleção de suplementos registrados para o VBA.

Sintaxe

object.AddIns

Comentários

A coleção AddIns é acessada por meio do objeto VBE. Todos os suplementos listados no Gerenciador de suplementos em VBE.têm um objeto na coleção AddIns.

Esta coleção substitui a coleção ExternalObjects usada no Visual Basic versão 4.0.


Objeto CommandBar

O objeto CommandBar contém outros objetos CommandBar, que podem atuar como botões ou comandos de menu.

Sintaxe

CommandBar


Objeto CodeModule (Modelo de objeto do suplemento VBA)
Objeto CodeModule

Representa o código associado a um componente, como um formulário, uma classe ou um documento.

Comentários

Use o objeto CodeModule para modificar (adicionar, excluir ou editar) o código associado a um componente.

Cada componente está associado a um objeto CodeModule. No entanto, um objeto CodeModule pode estar associado a vários painéis de código.

Os métodos associados ao objeto CodeModule permitem que você manipule e retorne informações sobre o texto de código, linha por linha. Por exemplo, você pode usar o método AddFromString para adicionar texto ao módulo. AddFromString posiciona o texto exatamente acima do primeiro procedimento no módulo ou posiciona o texto ao final do módulo, caso não haja procedimentos.

Use a propriedade Parent para retornar o objeto VBComponent associado a um módulo de código.


Objeto CommandBarEvents (Modelo de objeto do suplemento VBA)
Objeto CommandBarEvents

Retornado pela propriedade CommandBarEvents. O objeto CommandBarEvents aciona um evento ao clicar em um controle da barra de comandos.

Comentários

O objeto CommandBarEvents é retornado pela propriedade CommandBarEvents do objeto Events. O objeto retornado possui um evento em sua interface, o evento Click. Você pode gerenciar esse evento usando a declaração de objeto WithEvents.


Coleção CommandBars (Modelo de objeto do suplemento VBA)
Coleção CommandBars

Contém todas as barras de comandos de um projeto, incluindo as barras de comandos que oferecem suporte aos menus de atalho.

Comentários

Use a coleção CommandBars para permitir que os suplementos adicionem barras de comandos e controles ou que adicionem controles a barras de comandos internas existentes.


Objeto CodePane (Modelo de objeto do suplemento VBA)
Objeto CodePane

Representa um painel de código.

Comentários

Use o objeto CodePane para manipular a posição do texto visível ou a seleção de texto exibida no painel de código.

Você pode usar o método Show para tornar visível o painel de código que especificar. Use o método SetSelection para definir a seleção em um painel de código e o método GetSelection para retornar o local da seleção em um painel de código.


Coleção CodePanes (Modelo de objeto do suplemento VBA)
Coleção CodePanes

Contém os painéis de código ativos do objeto VBE.

Comentários

Use a coleção CodePanes para acessar os painéis de código abertos em um projeto.

Você pode usar a propriedade Count para retornar o número de painéis de código ativos em uma coleção.


Objeto Events (Modelo de objeto do suplemento VBA)
Objeto Events

Fornece as propriedades que permitem que os suplementos se conectem a todos os eventos do Visual Basic for Applications.

Comentários

O objeto Events fornece propriedades que retornam objetos de origem de eventos. Use as propriedades para retornar objetos de origem de eventos que o notifiquem de alterações no ambiente do Visual Basic for Applications.

As propriedades do objeto Events retornam objetos do mesmo tipo do nome da propriedade. Por exemplo, a propriedade CommandBarEvents retorna o objeto CommandBarEvents.


Coleção LinkedWindows (Modelo de objeto do suplemento VBA)
Coleção LinkedWindows

Contém todas as janelas vinculadas em uma moldura de janela vinculada.

Comentários

Use a coleção LinkedWindows para modificar o estado encaixado e vinculado das janelas no ambiente de desenvolvimento.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.

A propriedade LinkedWindowFrame do objeto Window retorna um objeto Window que tem uma coleção LinkedWindows válida.

As molduras de janela vinculada contêm todas as janelas que podem ser vinculadas ou encaixadas. Isso inclui todas as janelas, com a exceção de janelas Code, criadores e as janelas Pesquisador de objeto e Localizar e substituir.

Se todos os painéis de uma moldura de janela vinculada forem movidos para outra janela, a moldura de janela vinculada sem painéis será destruída. No entanto, se todos os painéis forem removidos da janela principal, ela não será destruída.

Use a propriedade Visible para verificar ou definir a visibilidade de uma janela.

Você pode usar o método Add para adicionar uma janela à coleção de janelas vinculadas no momento. Uma janela que é um painel em uma moldura de janela vinculada pode ser adicionada a outra moldura de janela vinculada. Use o método Remove para remover uma janela da coleção de janelas vinculadas no momento; isso resultará na desvinculação ou no desencaixe da janela.

A coleção LinkedWindows é usada para encaixar e desencaixar janelas da moldura da janela principal.


Objeto Property (Modelo de objeto do suplemento VBA)
Objeto Property

Representa as propriedades de um objeto que são visíveis na janela Propriedades de qualquer componente específico.

Comentários

Use a propriedade Value do objeto Property para retornar ou definir o valor de uma propriedade de um componente.

Todos os componentes têm, no mínimo, uma propriedade Name. Use a propriedade Value do objeto Property para retornar ou definir o valor de uma propriedade. A propriedade Value retorna uma Variant do tipo apropriado. Se o valor retornado for um objeto, a propriedade Value retornará a coleção Properties que contém objetos Property que representam as propriedades individuais do objeto. Você pode acessar cada objeto Property usando o método Item na coleção Properties retornada.

Se o valor retornado pelo objeto Property for um objeto, você poderá usar a propriedade Object para definir o objeto Property como um novo objeto.


Coleção Properties (Modelo de objeto do suplemento VBA)

Representa as propriedades de um objeto.

Comentários

Use a coleção Properties para acessar as propriedades exibidas na janela Propriedades. Para cada propriedade listada na janela Propriedades,há um objeto na coleção Properties.


Objeto Reference (Modelo de objeto do suplemento VBA)
Objeto Reference

Representa uma referência a uma biblioteca de tipos ou a um projeto.

Comentários

Use o objeto Reference para verificar se uma referência continua válida.

A propriedade IsBroken retornará True se a referência não mais apontar para uma referência válida. A propriedade BuiltIn retornará True se a referência for uma referência padrão que não possa ser movida nem removida. Use a propriedade Name para determinar se a referência que você deseja adicionar ou remover é a correta.


Coleção References (Modelo de objeto do suplemento VBA)
Coleção References

Representa o conjunto de referências do projeto.

Comentários

Use a coleção References para adicionar ou remover referências. A coleção References é igual ao conjunto de referências selecionadas na caixa de diálogo Referências.


Objeto ReferencesEvents (Modelo de objeto do suplemento VBA)
Objeto ReferencesEvents

Retornado pela propriedade ReferencesEvents.

Comentários

O objeto ReferencesEvents é a origem de eventos que ocorrem quando uma referência é adicionada a um projeto ou removida do mesmo. O evento ItemAdded é acionado após a adição de uma referência a um projeto. O evento ItemRemoved é acionado após a remoção de uma referência de um projeto.


Objeto VBComponent (Modelo de objeto do suplemento VBA)
Objeto VBComponent

Representa um componente, como um módulo de classe ou módulo padrão, contido em um projeto.

Comentários

Use o objeto VBComponent para acessar o módulo de código associado a um componente ou para alterar as definições de propriedade de um componente.

Você pode usar a propriedade Type para saber a que tipo de componente o objeto VBComponent se refere. Use a propriedade Collection para saber em que coleção está o componente.


Coleção VBComponents (Modelo de objeto do suplemento VBA)
Coleção VBComponents

Representa os componentes contidos em um projeto.

Comentários

Use a coleção VBComponents para acessar, adicionar ou remover componentes de um projeto. Um componente pode ser um formulário, um módulo ou uma classe. A coleção VBComponents é uma coleção padrão que pode ser usada em um bloco For Each.

Você pode usar a propriedade Parent para retornar o projeto em que está a coleção VBComponents.

No Visual Basic for Applications, você pode usar o método Import para adicionar um componente a um projeto a partir de um arquivo.


Objeto VBE (Modelo de objeto do suplemento VBA)
Objeto VBE

O objeto raiz que contém todos os outros objetos e coleções representados no Visual Basic for Applications.

Comentários

Você pode usar as coleções a seguir para acessar os objetos contidos no objeto VBE:

•	Use a coleção VBProjects para acessar a coleção de projetos.

•	Use a coleção AddIns para acessar a coleção de suplementos.

•	Use a coleção Windows para acessar a coleção de janelas.

•	Use a coleção CodePanes para acessar a coleção de painéis de código.

•	Use a coleção CommandBars para acessar a coleção de barras de comandos.

Use o objeto Events para acessar propriedades que permitem que os suplementos se conectem a todos os eventos do Visual Basic for Applications. As propriedades do objeto Events retornam objetos do mesmo tipo do nome da propriedade. Por exemplo, a propriedade CommandBarEvents retorna o objeto CommandBarEvents.

Você pode usar a propriedade SelectedVBComponent para retornar o componente ativo. O componente ativo é o componente que está sendo rastreado na janela Projeto. Se o item selecionado na janela Projeto não for um componente, SelectedVBComponent retornará Nothing.

Observação   Todos os objetos desse modelo de objeto têm uma propriedade VBE que aponta para o objeto VBE.


Coleção VBNewProjects

Representa todos os novos projetos no ambiente de desenvolvimento.

Comentários

Use a coleção VBNewProjects para acessar projetos específicos em uma ocorrência do ambiente de desenvolvimento. VBNewProjects é uma coleção padrão que você pode iterar através do uso de um bloco For…Each.


Objeto VBProject (Modelo de objeto do suplemento VBA)
Objeto VBProject

Representa um projeto.

Comentários

Use o objeto VBProject para definir propriedades do projeto e acessar as coleções VBComponents e References.


Coleção VBProjects (Modelo de objeto do suplemento VBA)
Coleção VBProjects

Representa todos os projetos abertos no ambiente de desenvolvimento.

Comentários

Use a coleção VBProjects para acessar projetos específicos em uma ocorrência do ambiente de desenvolvimento. VBProjects é uma coleção padrão que pode ser usada em um bloco For Each.


Objeto Window (Modelo de objeto do suplemento VBA)
Objeto Window

Representa uma janela no ambiente de desenvolvimento.

Comentários

Use o objeto Window para exibir, ocultar ou posicionar janelas.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.

Você pode usar o método Close para fechar uma janela da coleção Windows. O método Close afeta tipos diferentes de janelas, como a seguir:

Janela	Resultado do uso do método Close
Janela Code	Remove a janela da coleção Windows.
Criador	Remove a janela da coleção Windows.
Objetos Window do tipo moldura de janela vinculada	As janelas se tornam janelas separadas desvinculadas.
Observação   O uso do método Close com janelas Code e criadores fecha realmente a janela. Definir a propriedade Visible como False oculta a janela, mas não a fecha. Usar o método Close com janelas do ambiente de desenvolvimento, como a janela Projeto ou a janela Propriedades, é o mesmo que definir a propriedade Visible como False.

Você pode usar o método SetFocus para mover o foco para uma janela.

Você pode usar a propriedade Visible para retornar ou definir a visibilidade de uma janela.

Para saber com que tipo de janela está trabalhando, você pode usar a propriedade Type. Se tiver mais de uma janela de um tipo como, por exemplo, vários criadores, você poderá usar a propriedade Caption para determinar a janela com que está trabalhando. Você também pode localizar a janela com a qual deseja trabalhar usando a propriedade DesignerWindow do objeto VBComponent ou a propriedade Window do objeto CodePane.


Coleção Windows (Modelo de objeto do suplemento VBA)
Coleção Windows

Contém todas as janelas abertas ou permanentes.

Comentários

Use a coleção Windows para acessar objetos Window.

A coleção Windows tem um conjunto fixo de janelas que estão sempre disponíveis na coleção, como a janela Projeto, a janela Propriedades e um conjunto de janelas que representam todas as janelas Code e de criador abertas. A abertura de uma janela Code ou criador adiciona um novo membro à coleção Windows. O fechamento de uma janela Code ou criador remove um membro da coleção Windows. Fechar uma janela permanente do ambiente de desenvolvimento não remove o objeto correspondente dessa coleção, mas resulta na invisibilidade da janela


Exemplo da propriedade ActiveCodePane

O exemplo a seguir usa a propriedade ActiveCodePane e as propriedades TopLine para obter o número da linha superior no painel de código ativo.

Debug.Print Application.VBE.ActiveCodePane.TopLine


Exemplo da propriedade ActiveVBProject

O exemplo a seguir usa a propriedade ActiveVBProject para retornar o nome do projeto ativo.

Debug.Print Application.VBE.ActiveVBProject.Name


Exemplo da propriedade ActiveWindow

O exemplo a seguir usa a propriedade ActiveWindow para retornar a legenda da janela ativa.

Debug.Print Application.VBE.ActiveWindow.Caption


Exemplo da propriedade BuiltIn

O exemplo a seguir usa a propriedade BuiltIn para retornar um Boolean que indica se uma determinada referência no projeto ativo é ou não interna.

Debug.Print Application.VBE.ActiveVBProject.References(1).BuiltIn


Exemplo da propriedade Caption

O exemplo a seguir usa a propriedade Caption para exibir a legenda da janela ativa.

Debug.Print Application.VBE.ActiveWindow.Caption


Exemplo da propriedade CodeModule

O exemplo a seguir usa as propriedades CodeModule e CountOfLines para retornar o número de linhas em um determinado módulo de código.

Debug.Print Application.VBE.ActiveVBProject.VBComponents(6).CodeModule.CountOfLines


Exemplo da propriedade CodePane

O exemplo a seguir usa as propriedades CodePane e TopLine para exibir o número da linha superior no módulo de código do objeto VBComponent selecionado.

Debug.Print Application.VBE.SelectedVBComponent.CodeModule.CodePane.TopLine


Exemplo da propriedade CodePanes

O exemplo a seguir usa as propriedades CodePanes e TopLine para exibir o número de linha da linha superior no painel de código especificado.

Debug.Print Application.VBE.CodePanes(3).TopLine


Exemplo da propriedade CodePaneView

O exemplo a seguir usa a propriedade CodePaneView para retornar um valor que indica se o painel de código especificado está em modo de exibição de procedimento ou modo de exibição de módulo completo.

Debug.Print Application.VBE.CodePanes(3).CodePaneView


Exemplo da propriedade Collection

O exemplo a seguir usa as propriedades Collection e Count para retornar o número de objetos que o projeto ativo contém, quando exibido como uma coleção de objetos.

Debug.Print Application.VBE.ActiveVBProject.Collection.Count


Exemplo da propriedade CommandBarEvents

O exemplo a seguir usa um código que inclui a propriedade CommandBarEvents para oferecer suporte a qualquer código para tratar um clique do mouse em uma barra de comandos.

Private WithEvents ce As CommandBarEvents

Sub Test()

    Dim c As CommandBarControl

    Set c = Application.VBE.CommandBars("Tools").Controls(1)

    Set ce = Application.VBE.Events.CommandBarEvents(c)

End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)

    ' Insira aqui o código de tratamento de eventos

End Sub


Exemplo da propriedade Count

O exemplo a seguir usa a propriedade Count para retornar o número de objetos VBComponent em um determinado projeto.

Debug.Print Application.VBE.VBProjects(1).VBComponents.Count


Exemplo da propriedade CountOfDeclarationLines

O exemplo a seguir usa a propriedade CountOfDeclarationLines para retornar o número de linhas de declaração em um determinado painel de código.

Debug.Print Application.VBE.CodePanes(2).CodeModule.CountOfDeclarationLines


Exemplo da propriedade CountOfLines

O exemplo a seguir usa a propriedade CountOfLines para retornar o número total de linhas em um determinado painel de código.

Application.VBE.CodePanes(2).CodeModule.CountOfLines


Exemplo da propriedade CountOfVisibleLines

O exemplo a seguir usa a propriedade CountOfVisibleLines para retornar o número de linhas visíveis ao mesmo tempo em um determinado painel de código, com base na altura do painel.

Debug.Print Application.VBE.Codepanes(3).CountOfVisibleLines


Exemplo da propriedade Description

O primeiro dos exemplos a seguir usa a propriedade Description para atribuir uma descrição a um determinado projeto; o exemplo também imprime a descrição para verificar se a atribuição foi bem-sucedida.

O segundo exemplo usa a propriedade Description para retornar os nomes descritivos dos objetos Reference especificados em um determinado projeto.

Application.VBE.VBProjects(1).Description = "Hot Sauce"

Debug.Print Application.VBE.VBProjects(1).Description

Debug.Print Application.VBE.VBProjects(1).References(1).Description

Debug.Print Application.VBE.VBProjects(1).References(2).Description


Exemplo da propriedade Designer

O exemplo a seguir usa as propriedades Designer e Count para retornar o número de controles em um formulário. Observe que a janela que contém o formulário deve estar selecionada. O objeto Designer é o próprio formulário.

Debug.Print Application.VBE.SelectVBComponent.Designer.Controls.Count


Exemplo da propriedade FullPath

O exemplo a seguir usa a propriedade FullPath para retornar o caminho completo da biblioteca de objetos da referência especificada.

Debug.Print Application.VBE.ActiveVBProject.References(1).FullPath


Exemplo da propriedade GUID

O exemplo a seguir usa a propriedade GUID para retornar o número de identificador exclusivo do objeto Reference especificado no projeto designado.

Debug.Print Application.VBE.VBProjects(1).References(1).GUID


Exemplo da propriedade HasOpenDesigner

O exemplo a seguir usa a propriedade HasOpenDesigner para retornar se o componente especificado, neste caso um formulário, de um determinado projeto possui ou não um criador aberto.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).HasOpenDesigner


Exemplo das propriedades Height e Width

O exemplo a seguir usa as propriedades Height e Width para retornar a altura e a largura da janela especificada, em twips. Essas definições de propriedade são alteradas após uma janela ser vinculada ou encaixada, porque assim elas fazem referência ao objeto Window ao qual a janela original está vinculada ou encaixada.

Debug.Print Application.VBE.Windows(9).Height

Debug.Print Application.VBE.Windows(9).Width


Exemplo da propriedade HelpContextID

O exemplo a seguir usa a propriedade HelpContextID para retornar a identificação do contexto do arquivo da Ajuda que corresponde a um projeto.

Debug.Print Application.VBE.VBProjects(1).HelpContextID


Exemplo da propriedade HelpFile

O exemplo a seguir usa a propriedade HelpFile para atribuir um arquivo da Ajuda a um projeto; o exemplo verifica se a atribuição foi bem-sucedida através da impressão do caminho completo do arquivo da Ajuda.

Application.VBE.VBProjects(1).HelpFile = "C:\HelpStuff\veenob3.hlp"

Debug.Print Application.VBE.VBProjects(1).HelpFile


Exemplo da propriedade IsBroken

O exemplo a seguir usa a propriedade IsBroken para retornar um valor que indica se o objeto Reference especificado em um determinado projeto está interrompido ou não.

Debug.Print Application.VBE.vbprojects(1).References(1).IsBroken


Exemplo das propriedades Left e Top

O exemplo a seguir usa as propriedades Left e Top para retornar as coordenadas do canto superior esquerdo de uma determinada janela, em twips. Essas definições de propriedade são alteradas após uma janela ser vinculada ou encaixada, porque assim elas fazem referência ao objeto Window ao qual a janela original está vinculada ou encaixada.

Debug.Print Application.VBE.Windows(9).Left

Debug.Print Application.VBE.Windows(9).Top


Exemplo da propriedade Lines

O exemplo a seguir usa a propriedade Lines para retornar um bloco específico de código, linhas 1 a 4, em um determinado painel de código.

Debug.Print Application.VBE.CodePanes(1).CodeModule.Lines( 1, 4)


Exemplo da propriedade MainWindow

O exemplo a seguir usa a propriedade MainWindow para retornar o objeto Window que representa a janela principal e, em seguida, imprime a legenda da janela principal.

Debug.Print Application.VBE.MainWindow.Caption


Exemplo da propriedade Major

O exemplo a seguir usa a propriedade Major para retornar o número de versão primária do objeto Reference especificado em um determinado projeto.

Debug.Print Application.VBE.VBProjects(1).References(1).Major


Exemplo da propriedade Minor

O exemplo a seguir usa a propriedade Minor para retornar o número de versão secundária do objeto Reference especificado em um determinado projeto.

Debug.Print Application.VBE.VBProjects(1).References(1).Minor


Exemplo da propriedade Mode

O exemplo a seguir usa a propriedade Mode para retornar o modo do projeto ativo. O valor retornado é uma constante predefinida que representa o modo do projeto.

Debug.Print Application.VBE.ActiveVBProject.Mode


Exemplo da propriedade Name

O exemplo a seguir usa a propriedade Name para retornar o nome do membro especificado da coleção VBComponents em um determinado projeto.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Name


Exemplo da propriedade NumIndices

O exemplo a seguir usa a propriedade NumIndices para retornar o número de índices que pertencem à propriedade especificada de um determinado objeto VBComponent.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Properties(40).NumIndices


Exemplo da propriedade Object

O exemplo a seguir carrega o nome de um ícone na lista de ícones do objeto especificado, que deve ser um formulário.

Set Application.VBE.ActiveVBProject.VBComponents(1).Properties("Icon").Object = LoadPicture("Baseball.ico")


Exemplo da propriedade Parent

O exemplo a seguir usa a propriedade Parent para retornar o nome do pai de um objeto na hierarquia de objetos.

Debug.Print Application.VBE.ActiveVBProject.VBComponents.Parent.Name


Exemplo da propriedade ProcBodyLine

O exemplo a seguir usa a propriedade ProcBodyLine para retornar o número de linha da primeira linha de código no procedimento especificado, SetupTabs, em um determinado painel de código.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcBodyLine ("SetupTabs", vbext_pk_Proc)


Exemplo da propriedade ProcCountLines

O exemplo a seguir usa a propriedade ProcCountLines para retornar o número de linhas de código no procedimento especificado, SetupTabs, em um determinado painel de código.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcCountLines ("SetupTabs", vbext_pk_Proc)


Exemplo da propriedade ProcOfLine

O exemplo a seguir usa a propriedade ProcOfLine para retornar o nome do procedimento que contém o número de linha especificado em um determinado painel de código.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcOfLine (1270, vbext_pk_Proc)


Exemplo da propriedade ProcStartLine

O exemplo a seguir usa a propriedade ProcStartLine para retornar a linha em que o procedimento especificado começa em um determinado painel de código.

Debug.Print Application.VBE.CodePanes(3).CodeModule.ProcStartLine ("SetupTabs", vbext_pk_Proc)


Exemplo da propriedade Protection

O exemplo a seguir usa a propriedade Protection para retornar um valor que indica se um projeto está protegido ou não. O valor retornado é um número que corresponde a uma constante predefinida que representa o status do projeto.

Debug.Print Application.VBE.ActiveVBProject.Protection


Exemplo da propriedade ReferencesEvents

O exemplo a seguir usa um código que inclui a propriedade ReferencesEvents para oferecer suporte ao código de gerenciamento de evento para a adição ou remoção de referências.

Private WithEvents X As ReferencesEvents

Sub Test()

    Set X = Application.VBE.Events.ReferencesEvents

End Sub

Private Sub X_ItemAdded(ByVal Reference As VBIDE.Reference)

    ' Insira aqui o código para oferecer suporte à adição de item

End Sub

Private Sub X_ItemRemoved(ByVal Reference As VBIDE.Reference)

    ' Insira aqui o código para oferecer suporte à remoção de item

End Sub


Exemplo da propriedade Saved

O exemplo a seguir usa a propriedade Saved para retornar um valor Boolean que indica se o projeto especificado foi salvo ou não no seu estado atual.

Debug.Print Application.VBE.VBProjects(1).Saved


Exemplo da propriedade SelectedVBComponent

O exemplo a seguir usa a propriedade SelectedVBComponent para retornar o componente selecionado.

Debug.Print Application.VBE.SelectedVBComponent.Name


Exemplo da propriedade TopLine

O exemplo a seguir usa a propriedade TopLine para retornar o número de linha da linha superior no painel de código especificado.

Debug.Print Application.VBE.CodePanes(3).TopLine


Exemplo da propriedade Type

O exemplo a seguir usa a propriedade Type para retornar um valor que indica o tipo do membro especificado da coleção VBComponents em um determinado projeto. O valor retornado é um número que corresponde a uma constante predefinida de um dos tipos de objeto componente.

Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Type


Exemplo da propriedade Value

O exemplo a seguir usa a propriedade Value para retornar o valor da propriedade especificada de um membro da coleção VBComponents.

Debug.Print Application.VBE. ActiveVBProject.VBComponents(1).Properties("AcceptLabelsInFormulas").Value


Exemplo da propriedade VBE

O exemplo a seguir usa as propriedades VBE e Name para retornar o nome do projeto ativo.

Debug.Print Application.VBE.ActiveVBProject.Name


Exemplo da propriedade Version

O exemplo a seguir usa a propriedade Version para retornar o número de versão do aplicativo host.

Debug.Print Application.VBE.Version


Exemplo da propriedade Visible

O exemplo a seguir usa a propriedade Visible para retornar um valor Boolean que indica se a janela especificada está visível ou não.

Debug.Print Application.VBE.Windows(9).Visible


Exemplo da propriedade Window

O exemplo a seguir usa as propriedades Window e Caption para retornar a legenda do painel de código especificado.

Debug.Print Application.VBE.CodePanes(1).Window.Caption


Exemplo da propriedade WindowState

O exemplo a seguir usa a propriedade WindowState para retornar o estado visual da janela especificada. O valor retornado é um número que corresponde a uma constante predefinida que especifica o estado visual de uma janela.

Debug.Print Application.VBE.Windows(9).WindowState


Propriedade ActiveCodePane (Modelo de objeto do suplemento VBA Add-In)
Propriedade ActiveCodePane

Retorna o objeto CodePane ativo ou mais recentemente ativo ou define o objeto CodePane ativo. Leitura/gravação.

Comentários

Você pode definir a propriedade ActiveCodePane como qualquer objeto CodePane válido, como exibido no seguinte exemplo:

Set MyApp.VBE.ActiveCodePane = MyApp.VBE.CodePanes(1)

O exemplo anterior define o primeiro painel de código de uma coleção de painéis de código como o painel de código ativo. Você também pode ativar um painel de código usando o método Set.


Propriedade ActiveVBProject (Modelo de objeto do suplemento VBA)
Propriedade ActiveVBProject

Retorna o projeto ativo na janela Projeto. Somente leitura.

Comentários

A propriedade ActiveVBProject retorna o projeto que está selecionado na janela Projeto ou o projeto no qual os componentes estão selecionados. No segundo caso, o próprio projeto não está necessariamente selecionado. Quer o projeto esteja ou não explicitamente selecionado, haverá sempre um projeto ativo.


Propriedade ActiveWindow (Modelo de objeto do suplemento VBA)
Propriedade ActiveWindow

Retorna a janela ativa no ambiente de desenvolvimento. Somente leitura.

Comentários

Quando mais de uma janela estiver aberta no ambiente de desenvolvimento, a definição da propriedade ActiveWindow é a janela que tem o foco. Se a janela principal tiver o foco, ActiveWindow retornará Nothing.


Propriedade BuiltIn (Modelo de objeto do suplemento VBA)
Propriedade BuiltIn

Retorna um valor Boolean que indica se a referência é ou não uma referência padrão que não pode ser removida. Somente leitura.

Valores retornados

A propriedade BuiltIn retorna os seguintes valores:

Valor	Descrição
True	A referência é uma referência padrão que não pode ser removida.
False	A referência não é uma referência padrão; ela pode ser removida.


Propriedade BuildFileName

Define ou retorna o nome da DLL que será usado quando o projeto for criado.

Sintaxe

object.BuildFileName

O espaço reservado object representa uma expressão de objeto que avalia um objeto na lista Aplica-se a.


Propriedade Caption (Modelo de objeto do suplemento VBA)
Propriedade Caption

Retorna uma String que contém o título da janela ativa. Somente leitura.

Comentários

O título da janela ativa é o texto exibido na barra de título da janela.


Propriedade CodeModule (Modelo de objeto do suplemento VBA)
Propriedade CodeModule

Retorna um objeto que representa o código associado ao componente. Somente leitura.

Comentários

A propriedade CodeModule retornará Nothing se o componente não tiver um módulo de código associado a ele.

Observação   O objeto CodePane representa uma janela Code visível. Um componente específico pode ter diversos objetos CodePane. O objeto CodeModule representa o código dentro de um componente. Um componente pode ter somente um objeto CodeModule.


Propriedade CodePane

Retorna um objeto CodePane. Somente leitura.

Comentários

Se existir um painel de código, ele se tornará o painel de código ativo e a janela que o contém se tornará a janela ativa. Se não existir um painel de código para o módulo, a propriedade CodePane criará um.


Propriedade CodePanes (Modelo de objeto do suplemento VBA)
Propriedade CodePanes

Retorna a coleção de objetos CodePane ativos. Somente leitura.


Propriedade CodePaneView (Modelo de objeto do suplemento VBA)
Propriedade CodePaneView

Retorna um valor que indica se o painel de código está no modo de exibição Procedimento ou no modo de exibição Módulo completo. Somente leitura.

Valores retornados

Os valores de retorno da propriedade CodePaneView são os seguintes:

Constante	Descrição
vbext_cv_ProcedureView	O painel de código especificado está no modo de exibição Procedimento.
Vbext_cv_FullModuleView	O projeto especificado está no modo de exibição Módulo completo.


Propriedade Collection (Modelo de objeto do suplemento VBA)
Propriedade Collection

Retorna a coleção que contém o objeto com que você está trabalhando. Somente leitura.

Comentários

A maioria dos objetos deste modelo de objeto tem uma propriedade Parent ou uma propriedade Collection que aponta para o objeto pai do objeto.

Use a propriedade Collection para acessar as propriedades, os métodos e os controles da coleção à qual o objeto pertence.


Propriedade CommandBarEvents (Modelo de objeto do suplemento VBA)
Propriedade CommandBarEvents

Retorna o objeto CommandBarEvents. Somente leitura.

Definições

A definição para o argumento que você passa para a propriedade CommandBarEvents é:

Argumento	Descrição
vbcontrol	Deve ser um objeto do tipo CommandBarControl.
Comentários

Use a propriedade CommandBarEvents para retornar um objeto de origem de eventos que aciona um evento ao clicar em um botão da barra de comandos. O argumento passado para a propriedade CommandBarEvents é o controle da barra de comandos para o qual o evento Click será acionado.


Propriedade Connect

Retorna ou define o estado conectado de um suplemento.

Comentários

Retorna True se o suplemento estiver registrado e conectado (ativo) atualmente.

Retorna False se o suplemento estiver registrado, mas não conectado (inativo).


Propriedade Count (Modelo de objeto do suplemento VBA)
Propriedade Count

Retorna um Long que contém o número de itens em uma coleção. Somente leitura.


Propriedade CountOfLines (Modelo de objeto do suplemento VBA)
Propriedade CountOfLines

Retorna um Long que contém o número de linhas de código em um módulo de código. Somente leitura.


Propriedade CountOfDeclarationLines (Modelo de objeto do suplemento VBA)
Propriedade CountOfDeclarationLines

Retorna um Long que contém o número de linhas de código na seção Declarações de um módulo de código. Somente leitura.


Propriedade CountOfVisibleLines (Modelo de objeto do suplemento VBA)
Propriedade CountOfVisibleLines

Retorna um Long que contém o número de linhas visíveis em um painel de código. Somente leitura.


Propriedade Description (Modelo de objeto do suplemento VBA)
Propriedade Description

Retorna ou define uma expressão de seqüência, que contém uma seqüência de caracteres descritiva associada a um objeto. Para o objeto VBProject, é leitura/gravação; para o objeto Reference, é somente leitura.

Comentários

Para o objeto VBProject, a propriedade Description retorna ou define uma seqüência de caracteres descritiva associada ao projeto ativo.

Para o objeto Reference, a propriedade Description retorna o nome descritivo da referência.


Propriedade Designer (Modelo de objeto do suplemento VBA)
Propriedade Designer

Retorna o objeto que permite o acesso às características de criação de um componente.

Comentários

Se o objeto tiver um criador aberto, ele será retornado pela propriedade Designer; caso contrário, um novo criador será criado. O criador é uma característica de determinados objetos VBComponent. Por exemplo, quando você cria determinados tipos de objeto VBComponent, um criador é criado junto com o objeto. Um componente pode ter somente um criador e é sempre o mesmo. A propriedade Designer permite que você acesse um objeto específico do componente. Em alguns casos, como em módulos padrão e módulos de classe, não é criado um criador, pois esse tipo de objeto VBComponent não dá suporte para um criador.

A propriedade Designer retornará Nothing se o objeto VBComponent não tiver um criador.


Propriedade DesignerID

A propriedade somente leitura que retorna o ProgID de um criador ActiveX.


Propriedade FullPath (Modelo de objeto do suplemento VBA)
Propriedade FullPath

Retorna uma String que contém o caminho e o nome de arquivo da biblioteca de tipos a que se faz referência. Somente leitura.


Propriedade FileName

Retorna o nome completo do caminho do arquivo de projeto   ou do documento host.

Sintaxe

object.Filename

O espaço reservado object representa uma expressão de objeto que avalia um objeto na lista Aplica-se a.

Comentários

Projetos não têm nenhum nome além do nome de arquivo.

O nome do caminho retornado sempre é fornecido como um caminho absoluto (por exemplo, "c:\projetos\meuprojeto.vba"), mesmo que seja mostrado como um caminho relativo (como "..\projetos\meu projeto.vba").


Propriedade GUID (Modelo de objeto do suplemento VBA)
Propriedade GUID

Retorna uma String que contém o identificador de classe de um objeto. Somente leitura.


Propriedade HasOpenDesigner (Modelo de objeto do suplemento VBA)
Propriedade HasOpenDesigner

Retorna um valor Boolean que indica se o objeto VBComponent tem ou não um criador aberto. Somente leitura.

Valores retornados

A propriedade HasOpenDesigner retorna os seguintes valores:

Valor	Descrição
True	O objeto VBComponent tem uma janela Criar aberta.
False	O objeto VBComponent não tem uma janela Criar aberta.


Propriedade Height (Modelo de objeto do suplemento VBA)

Retorna ou define um Single que contém a altura da janela em twips. Leitura/gravação.

Comentários

A alteração da definição da propriedade Height de uma janela vinculada ou de uma janela encaixada não tem qualquer efeito, contanto que a janela permaneça vinculada ou encaixada.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Propriedade HelpContextID (Modelo de objeto do suplemento VBA)

Retorna ou define uma String que contém o código de contexto para um tópico em um arquivo da Ajuda do Microsoft Windows. Leitura/gravação.


Propriedade HelpFile (Modelo de objeto do suplemento VBA)

Retorna ou define uma String que especifica o arquivo da Ajuda do Microsoft Windows para um projeto. Leitura/gravação.


Propriedade IndexedValue (Modelo de objeto do suplemento VBA)

Retorna ou define um valor para um membro de uma propriedade que é uma lista indexada ou uma matriz.

Comentários

O valor retornado ou definido pela propriedade IndexedValue é uma expressão que é avaliada como um tipo que é aceito pelo objeto. Para uma propriedade que é uma lista indexada ou matriz, você deve usar a propriedade IndexedValue em vez da propriedade Value. Uma lista indexada é uma expressão numérica que especifica a posição do índice.

IndexedValue aceita até quatro índices. O número de índices aceitos por IndexedValue é o valor retornado pela propriedade NumIndices.

A propriedade IndexedValue será usada somente se o valor da propriedade NumIndices for maior que zero. Os valores em listas indexadas são definidos ou retornados com um único índice.


Propriedade IsBroken (Modelo de objeto do suplemento VBA)
Propriedade IsBroken

Retorna um valor Boolean que indica se o objeto Reference aponta ou não para uma referência válida no registro. Somente leitura.

Valores retornados

A propriedade IsBroken retorna os seguintes valores:

Valor	Descrição
True	O objeto Reference não mais aponta para uma referência válida no registro.
False	O objeto Reference aponta para uma referência válida no registro.


Propriedade Left (Modelo de objeto do suplemento VBA)
Propriedade Left

Retorna ou define um Single que contém a localização da borda esquerda da janela na tela em twips. Leitura/gravação.

Comentários

O valor retornado pela propriedade Left depende de a janela estar ou não vinculada ou encaixada.

Observação   A alteração da definição da propriedade Left de uma janela vinculada ou encaixada não tem qualquer efeito, contanto que a janela permaneça vinculada ou encaixada.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Propriedade Lines

Retorna uma seqüência de caracteres que contém o número especificado de linhas de código.

Sintaxe

object.Lines(startline, count) As String

A sintaxe de Lines tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
startline	Obrigatória. Um Long que especifica o número de linha na qual iniciar.
count	Obrigatória. Um Long que especifica o número de linhas que você deseja retornar.
Comentários

Os números de linha em um módulo de código começam em 1.


Propriedade LinkedWindowFrame (Modelo de objeto do suplemento VBA)
Propriedade LinkedWindowFrame

Retorna o objeto Window que representa a moldura que contém a janela. Somente leitura.

Comentários

A propriedade LinkedWindowFrame permite que você acesse o objeto que representa a moldura de janela vinculada, que tem propriedades distintas da janela ou janelas que ela contém. Se a janela não estiver vinculada, a propriedade LinkedWindowFrame retornará Nothing.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Propriedade LinkedWindows

Retorna a coleção de todas as janelas vinculadas contidas em uma moldura de janela vinculada. Somente leitura.

Comentários

A propriedade LinkedWindows é uma propriedade acessadora (ou seja, uma propriedade que retorna um objeto do mesmo tipo do nome da propriedade).


Propriedade MainWindow (Modelo de objeto do suplemento VBA)
Propriedade MainWindow

Retorna um objeto Window que representa a janela principal do ambiente de desenvolvimento do Visual Basic. Somente leitura.

Comentários

Você pode usar o objeto Window retornado pela propriedade MainWindow para adicionar ou remover janelas encaixadas. Você também pode usar o objeto Window retornado pela propriedade MainWindow para maximizar, minimizar, ocultar ou restaurar a janela principal do ambiente de desenvolvimento do Visual Basic.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Propriedade Major (Modelo de objeto do suplemento VBA)
Propriedade Major

Retorna um Long que contém o número de versão primária da biblioteca de tipos a que se faz referência. Somente leitura.

Comentários

O número retornado pela propriedade Major corresponde ao número de versão primária armazenado na biblioteca de tipos para a qual você definiu a referência.


Propriedade Minor (Modelo de objeto do suplemento VBA)
Propriedade Minor

Retorna um Long que indica o número de versão secundária da biblioteca de tipos a que se faz referência. Somente leitura.

Comentários

O número retornado pela propriedade Minor corresponde ao número de versão secundária armazenado na biblioteca de tipos para a qual você definiu a referência.


Propriedade Mode (Modelo de objeto do suplemento VBA)
Propriedade Mode

Retorna um valor que contém o modo do projeto especificado. Somente leitura.

Valores retornados

Os valores retornados pela propriedade Mode são:

Constante	Descrição
vbext_vm_Run	O projeto especificado está no modo de execução.
vbext_vm_Break	O projeto especificado está no modo de interrupção.
vbext_vm_Design	O projeto especificado está no modo de criação.


Propriedade Name (Modelo de objeto do suplemento VBA)

Retorna ou define uma String que contém o nome usado em código para identificar um objeto. Para os objetos VBProject e VBComponent, é leitura/gravação; para os objetos Property e Reference, é somente leitura.

Comentários

A tabela a seguir descreve como a definição de propriedade Name aplica-se a diferentes objetos.

Objeto	Resultado do uso da definição de propriedade Name
VBProject	Retorna ou define o nome do projeto ativo.
VBComponent	Retorna ou define o nome do componente. Ocorrerá um erro se você tentar definir a propriedade Name como um nome que já esteja sendo usado ou um nome inválido.
Propriedade	Retorna o nome da propriedade como aparece no Pesquisador de propriedades. Esse é o valor usado para indexar a coleção Properties. O nome não pode ser definido.
Reference	Retorna o nome da referência em código. O nome não pode ser definido.
O nome padrão para novos objetos é o tipo de objeto mais um número inteiro exclusivo. Por exemplo, o primeiro novo objeto Form é Form1, um novo objeto Form é Form1 e o terceiro controle TextBox que você cria em um formulário é TextBox3.

A propriedade Name de um objeto deve iniciar com uma letra e pode ter, no máximo, 40 caracteres. Ela pode incluir números e caracteres de sublinhado (_), mas não pode incluir pontuação nem espaços. Os formulários e os módulos não podem ter o mesmo nome que outro objeto público como, por exemplo, Clipboard, Screen ou App. Embora a definição da propriedade Name possa ser uma palavra-chave, um nome de propriedade ou o nome de outro objeto, isso pode criar conflitos em seu código.


Propriedade NumIndices (Modelo de objeto do suplemento VBA)

Retorna o número de índices da propriedade retornados pelo objeto Property.

Comentários

O valor da propriedade NumIndices pode ser um número inteiro de 0 a 4. Para a maioria das propriedades, NumIndices retorna 0. Propriedades indexadas de forma convencional retornam 1. Matrizes de propriedade podem retornar 2.


Propriedade Object (Modelo de objeto do suplemento VBA)
Propriedade Object

Retorna ou define o valor de um objeto retornado por uma propriedade. Leitura/gravação.

Comentários

Se uma propriedade retornar um objeto, você deverá usar a propriedade Object para retornar ou definir o valor desse objeto.


Propriedade Parent (Modelo de objeto do suplemento VBA)
Propriedade Parent

Retorna o objeto ou a coleção que contém outro objeto ou coleção. Somente leitura.

Comentários

A maioria dos objetos tem uma propriedade Parent ou uma propriedade Collection que aponta para o objeto pai do objeto nesse modelo de objeto. A propriedade Collection será usada se o objeto pai for uma coleção.

Use a propriedade Parent para acessar as propriedades, os métodos e os controles do objeto pai de um objeto.


Propriedade ProcBodyLine

Retorna a primeira linha de um procedimento.

Sintaxe

object.ProcBodyLine(procname, prockind) As Long

A sintaxe de ProcBodyLine tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
procname	Obrigatória. Uma String que contém o nome do procedimento.
prockind	Obrigatória. Especifica o tipo de procedimento a ser localizado. Como os procedimentos de propriedade podem ter várias representações no módulo, você deve especificar o tipo de procedimento que deseja localizar. Todos os procedimentos que não sejam procedimentos de propriedade (ou seja, os procedimentos Sub e Function) usam vbext_pk_Proc.
Você pode usar uma das constantes a seguir para o argumento prockind:

Constante	Descrição
Vbext_pk_Get	Especifica um procedimento que retorna o valor de uma propriedade.
Vbext_pk_Let	Especifica um procedimento que atribui um valor a uma propriedade.
Vbext_pk_Set	Especifica um procedimento que definem uma referência a um objeto.
Vbext_pk_Proc	Especifica todos os procedimentos que não sejam procedimentos de propriedade.
Comentários

A primeira linha de um procedimento é a linha na qual aparece a instrução Sub, Function ou Property.


Propriedade ProcCountLines

Retorna o número de linhas do procedimento especificado.

Sintaxe

object.ProcCountLines(procname, prockind) As Long

A sintaxe de ProcCountLines tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
procname	Obrigatória. Uma String que contém o nome do procedimento.
prockind	Obrigatória. Especifica o tipo de procedimento a ser localizado. Como os procedimentos de propriedade podem ter várias representações no módulo, você deve especificar o tipo de procedimento que deseja localizar. Todos os procedimentos que não sejam procedimentos de propriedade (ou seja, os procedimentos Sub e Function) usam vbext_pk_Proc.
Você pode usar uma das constantes a seguir para o argumento prockind:

Constante	Descrição
Vbext_pk_Get	Especifica um procedimento que retorna o valor de uma propriedade.
Vbext_pk_Let	Especifica um procedimento que atribui um valor a uma propriedade.
Vbext_pk_Set	Especifica um procedimento que definem uma referência a um objeto.
Vbext_pk_Proc	Especifica todos os procedimentos que não sejam procedimentos de propriedade.
Comentários

A propriedade ProcCountLines retorna a contagem de todas as linhas em branco ou de comentário que precedem a declaração de procedimento e, se o procedimento for o último em um módulo de código, quaisquer linhas em branco depois do procedimento.


Propriedade ProcOfLine

Retorna o nome do procedimento no qual se encontra a linha especificada.

Sintaxe

object.ProcOfLine(line, prockind) As String

A sintaxe de ProcOfLine tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
line	Obrigatória. Um Long que especifica a linha a ser verificada.
prockind	Obrigatória. Especifica o tipo de procedimento a ser localizado. Como os procedimentos de propriedade podem ter várias representações no módulo, você deve especificar o tipo de procedimento que deseja localizar. Todos os procedimentos que não sejam procedimentos de propriedade (ou seja, os procedimentos Sub e Function) usam vbext_pk_Proc.
Você pode usar uma das constantes a seguir para o argumento prockind:

Constante	Descrição
Vbext_pk_Get	Especifica um procedimento que retorna o valor de uma propriedade.
Vbext_pk_Let	Especifica um procedimento que atribui um valor a uma propriedade.
Vbext_pk_Set	Especifica um procedimento que definem uma referência a um objeto.
Vbext_pk_Proc	Especifica todos os procedimentos que não sejam procedimentos de propriedade.
Comentários

Uma linha estará dentro de um procedimento se for uma linha em branco ou de comentário que precede a declaração de procedimento e, caso o procedimento seja o último em um módulo de código, uma ou mais linhas em branco depois do procedimento.


Propriedade ProcStartLine

Retorna a linha na qual tem início o procedimento especificado.

Sintaxe

object.ProcStartLine(procname, prockind) As Long

A sintaxe de ProcStartLine tem as seguintes partes:

Parte	Descrição
object	Obrigatória. Uma expressão de objeto que resulta em um objeto na lista Aplica-se a.
procname	Obrigatória. Uma String que contém o nome do procedimento.
prockind	Obrigatória. Especifica o tipo de procedimento a ser localizado. Como os procedimentos de propriedade podem ter várias representações no módulo, você deve especificar o tipo de procedimento que deseja localizar. Todos os procedimentos que não sejam procedimentos de propriedade (ou seja, os procedimentos Sub e Function) usam vbext_pk_Proc.
Você pode usar uma das constantes a seguir para o argumento prockind:

Constante	Descrição
Vbext_pk_Get	Especifica um procedimento que retorna o valor de uma propriedade.
Vbext_pk_Let	Especifica um procedimento que atribui um valor a uma propriedade.
Vbext_pk_Set	Especifica um procedimento que definem uma referência a um objeto.
Vbext_pk_Proc	Especifica todos os procedimentos que não sejam procedimentos de propriedade.
Comentários

Um procedimento tem início na primeira linha abaixo da instrução End Sub do procedimento precedente. Se o procedimento for o primeiro, ele terá início no final da seção Declarações geral.


Propriedade Protection (Modelo de objeto do suplemento VBA)
Propriedade Protection

Retorna um valor que indica o estado de proteção de um projeto. Somente leitura.

Valores retornados

Os valores retornados pela propriedade Protection são:

Constante	Descrição
Vbext_pp_locked	O projeto especificado está bloqueado.
Vbext_pp_none	O projeto especificado não está protegido.


Propriedade Properties

Retorna as propriedades de um objeto. Somente leitura.

Comentários

A propriedade Properties é uma propriedade acessadora (ou seja, uma propriedade que retorna um objeto do mesmo tipo do nome da propriedade).


Propriedade References

Retorna o conjunto de referências em um projeto. Somente leitura.

Comentários

A propriedade References é uma propriedade acessadora (ou seja, uma propriedade que retorna um objeto do mesmo tipo do nome da propriedade).


Propriedade ReferencesEvents (Modelo de objeto do suplemento VBA)
Propriedade ReferencesEvents

Retorna o objeto ReferencesEvents. Somente leitura.

Definições

A definição para o argumento que você passa para a propriedade ReferencesEvents é a seguinte:

Argumento	Descrição
vbproject	Se vbproject apontar para Nothing, o objeto retornado fornecerá eventos para as coleções References de todos os objetos VBProject na coleção VBProjects. Se vbproject apontar para um objeto VBProject válido, o objeto retornado fornecerá eventos somente para a coleção References desse projeto.
Comentários

A propriedade ReferencesEvents toma um argumento e retorna um objeto de origem de eventos. O objeto ReferencesEvents é a origem de eventos que são acionados quando referências são adicionadas ou removidas.


Propriedade Saved (Modelo de objeto do suplemento VBA)
Propriedade Saved

Retorna um valor Boolean que indica se o objeto foi ou não editado depois da última vez que foi salvo. Leitura/gravação.

Valores retornados

A propriedade Saved retorna os seguintes valores:

Valor	Descrição
True	O objeto não foi editado depois da última vez que foi salvo.
False	O objeto foi editado depois da última vez que foi salvo.
Comentários

O método SaveAs define a propriedade Saved como True.

Observação   Se você definir a propriedade Saved como False em código, ela retornará False e o objeto será marcado como se tivesse sido editado depois que foi salvo pela última vez.


Propriedade SelectedVBComponent (Modelo de objeto do suplemento VBA)
Propriedade SelectedVBComponent

Retorna o componente selecionado. Somente leitura.

Comentários

A propriedade SelectedVBComponent retorna o componente selecionado na janela Projeto. Se o item selecionado na janela Projeto não for um componente, SelectedVBComponent retornará Nothing.


Propriedade Top (Modelo de objeto do suplemento VBA)
Propriedade Top

Retorna ou define um Single que especifica a localização da parte superior da janela na tela em twips. Leitura/gravação.

Comentários

O valor retornado pela propriedade Top depende de a janela estar ou não encaixada, vinculada ou no modo de encaixe.

Observação   A alteração da definição da propriedade Top de uma janela vinculada ou encaixada não tem qualquer efeito, contanto que a janela permaneça vinculada ou encaixada.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Propriedade TopLine (Modelo de objeto do suplemento VBA)
Propriedade TopLine

Retorna um Long que especifica o número de linha da linha na parte superior do painel de código ou define a linha exibida na parte superior do painel de código. Leitura/gravação.

Comentários

Use a propriedade TopLine para retornar ou definir a linha exibida na parte superior do painel de código. Por exemplo, se você desejar que a linha 25 seja a primeira linha a ser exibida em um painel de código, defina a propriedade TopLine como 25.

A definição da propriedade TopLine deve ser um número positivo. Se a definição da propriedade TopLine for maior que o número real de linhas no painel de código, ela será a última linha no painel de código.


Propriedade Type (Modelo de objeto do suplemento VBA)

Retorna um valor numérico ou de seqüência de caracteres que contém o tipo de objeto. Somente leitura.

Valores retornados

As definições da propriedade Type para o objeto Window são descritas na tabela a seguir:

Constante	Valor	Descrição
vbext_wt_CodeWindow	0	Janela Code
vbext_wt_Designer	1	Criador
vbext_wt_Browser	2	Pesquisador de objeto
vbext_wt_Immediate	5	Janela Imediata
vbext_wt_ProjectWindow	6	Janela Projeto
vbext_wt_PropertyWindow	7	Janela Propriedades
vbext_wt_Find	8	Caixa de diálogo Localizar
vbext_wt_FindReplace	9	Caixa de diálogo Localizar e substituir
vbext_wt_LinkedWindowFrame	11	Moldura de janela vinculada
vbext_wt_MainWindow	12	Janela Principal
vbext_wt_Watch	3	janela Inspeção de variáveis
vbext_wt_Locals	4	janela Locais
vbext_wt_Toolbox	10	Caixa de ferramentas
vbext_wt_ToolWindow	15	Janela Ferramenta
Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.

As definições da propriedade Type para o objeto VBComponent são descritas na tabela a seguir:

Constante	Valor	Descrição
vbext_ct_StdModule	1	Módulo padrão
vbext_ct_ClassModule	2	Módulo de classe
vbext_ct_MSForm	3	Formulário Microsoft
vbext_ct_ActiveXDesigner	11	Criador ActiveX
vbext_ct_Document	100	Módulo Documento
As definições da propriedade Type para o objeto Reference são descritas na tabela a seguir:

Constante	Valor	Descrição
vbext_rk_TypeLib	0	Biblioteca de tipos
vbext_rk_Project	1	Projeto
As definições da propriedade Type para o objeto VBProject são descritas na tabela a seguir:

Constante	Valor	Descrição
vbext_pt_HostProject	100	Projeto Host
vbext_pt_StandAlone	101	Projeto Autônomo


Propriedade Value (Modelo de objeto do suplemento VBA)
Propriedade Value

Retorna ou define uma Variant que especifica o valor da propriedade. Leitura/gravação.

Comentários

Como a propriedade Value retorna uma Variant, você pode acessar qualquer propriedade. Para acessar uma lista, use a propriedade IndexedValue.

Se a propriedade que o objeto Property representa for leitura/gravação, a propriedade Value será leitura/gravação. Se a propriedade for somente leitura, a tentativa de definir a propriedade Value causará um erro. Se a propriedade for somente gravação, a tentativa de retornar a propriedade Value causará um erro.

A propriedade Value é a propriedade padrão para o objeto Property.


Propriedade VBComponents

Retorna uma coleção dos componentes contidos em um projeto.

Comentários

Use a coleção VBComponents para acessar, adicionar ou remover componentes de um projeto. Um componente pode ser um formulário, um módulo ou uma classe. A coleção VBComponents é uma coleção padrão que pode ser usada em um bloco For… Each.

Você pode usar a propriedade Parent para retornar o projeto em que está a coleção VBComponents.

No Visual Basic for Applications, você pode usar o método Import para adicionar um componente a um projeto a partir de um arquivo.


Propriedade VBE (Modelo de objeto do suplemento VBA)
Propriedade VBE

Retorna a raiz do objeto VBE. Somente leitura.

Comentários

Todos os objetos têm uma propriedade VBE que aponta para a raiz do objeto VBE.


Propriedade Version (Modelo de objeto do suplemento VBA)
Propriedade Version

Retorna uma String que contém a versão do Visual Basic for Applications que o aplicativo está usando. Somente leitura.

Comentários

O valor da propriedade Version é uma seqüência de caracteres que começa com um ou dois dígitos, um ponto e dois dígitos; o restante da seqüência de caracteres é indefinido e pode conter texto ou números.


Propriedade Visible (Modelo de objeto do suplemento VBA)
Propriedade Visible

Para o objeto Window, retorna ou define um valor Boolean que especifica a visibilidade de uma janela. Leitura/gravação. Para o objeto CodePane, retorna um valor Boolean que indica se o painel de código está ou não visível na janela. Somente leitura.

Valores retornados

A propriedade Visible retorna os seguintes valores:

Valor	Descrição
True	(Padrão) O objeto está visível.
False	O objeto está oculto.


Propriedade Width (Modelo de objeto do suplemento VBA)
Propriedade Width

Retorna ou define um Single que contém a largura da janela em twips. Leitura/gravação.

Comentários

A alteração da definição da propriedade Width de uma janela vinculada ou de uma janela encaixada não tem qualquer efeito, contanto que a janela permaneça vinculada ou encaixada.

Importante   Objetos, propriedades e métodos para controle de janelas vinculadas, molduras de janela vinculada e janelas ancoradas estão incluídos no Macintosh para fins de compatibilidade com código escrito em Windows. Entretanto, esses elementos de linguagem geram erros em tempo de execução quando executados no Macintosh.


Propriedade Window (Modelo de objeto do suplemento VBA)
Propriedade Window

Retorna a janela em que o painel de código é exibido. Somente leitura.


Propriedade WindowState (Modelo de objeto do suplemento VBA)
Propriedade WindowState

Retorna ou define um valor numérico que especifica o estado visual da janela. Leitura/gravação.

Definições

A propriedade WindowState retorna ou define os seguintes valores:

Constante	Valor	Descrição
vbext_ws_Normal	0	(Padrão) Normal
vbext_ws_Minimize	1	Minimizada (minimizada a um ícone)
vbext_ws_Maximize	2	Maximizada (ampliada ao tamanho máximo)


Propriedade CommandBars

Contém todas as barras de comandos de um projeto, incluindo as barras de comandos que oferecem suporte aos menus de atalho.


Propriedade AddIns

Retorna uma coleção que pode ser usada por suplementos para registrar seus componentes de automação no modelo de objeto de extensibilidade.

Sintaxe

object.AddIns

O espaço reservado object representa uma expressão de objeto que resulta em um objeto na lista Aplica-se a.


Propriedade Events

Fornece propriedades que permitem a conexão dos suplementos a todos os eventos no Visual Basic for Applications.

Sintaxe

object.Events

O espaço reservado object representa uma expressão de objeto que resulta em um objeto na lista Aplica-se a.


Propriedade VBProjects

Retorna a coleção VBProjects, que representa todos os projetos abertos no momento no Visual Basic IDE.

Sintaxe

object.VBProjects

O espaço reservado object representa uma expressão de objeto que resulta em um objeto na lista Aplica-se a.


Propriedade Windows

Retorna o objeto Window, que representa uma janela do Visual Basic IDE.

Sintaxe

object.Window

O espaço reservado object representa uma expressão de objeto que resulta em um objeto na lista Aplica-se a.


Propriedade ProgID

Retorna o ProgID (ID programático) do controle representado pelo objeto VBControl.

Sintaxe

object.ProgID

O espaço reservado object representa uma expressão de objeto que avalia um objeto na lista Aplica-se a.