Como passar uma coleção para uma função em VBA

Escrito por jaime avelar | Traduzido por alexandre lima
  • Compartilhar
  • Tweetar
  • Compartilhar
  • Pin
  • E-mail
Como passar uma coleção para uma função em VBA
Crie uma função recebendo um objeto como parâmetro em VBA (Medioimages/Photodisc/Photodisc/Getty Images)

Passar uma coleção para uma função em Visual Basic for Applications (VBA) é bem parecido com passar qualquer outro tipo de dados. Uma coleção é um objeto que é usado para agrupar outros objetos ou itens similares. Você precisará definir o parâmetro da função como sendo "Object" para poder passá-la corretamente. Assim que ela estiver na sua função, você poderá acessar seus dados através da propriedade "Items".

Nível de dificuldade:
Moderado

Outras pessoas estão lendo

Instruções

  1. 1

    Abra o Microsoft Excel, clique na aba "Desenvolvedor" e então em "Visual Basic" para abrir o editor VBA. Clique no menu "Inserir" e então em "Módulo" para criar um novo módulo VBA.

  2. 2

    Adicione o seguinte código para criar um novo procedimento:

    Private Sub criarColecao()

  3. 3

    Copie e cole o seguinte código para criar uma nova coleção:

    Dim colecaoProdutos As Collection Set colecaoProdutos = New Collection

  4. 4

    Adicione itens na sua coleção através do seguinte código:

    colecaoProdutos.Add "telefones" colecaoProdutos.Add "computador" colecaoProdutos.Add "monitor" colecaoProdutos.Add "celulares"

  5. 5

    Chame a função "getColection" e passe-a com o parâmetro:

    Call getColection(colecaoProdutos) End Sub

  6. 6

    Copie e cole o seguinte código para criar a função "getColecion" e mostrar os itens da mesma usando a janela de depuração:

    Private Function getColecao(minhaColecao As Object) Debug.Print (minhaColecao.Item(1)) Debug.Print (minhaColecao.Item(2)) Debug.Print (minhaColecao.Item(3)) Debug.Print (minhaColecao.Item(4)) End Function

  7. 7

    Aperte Ctrl+G para mostrar a janela de depuração e clique dentro do procedimento "criarColecao". Aperte F5 para executar o programa e ver os resultados.

Não perca

Filtro:
  • Geral
  • Artigos
  • Slides
  • Vídeos
Mostrar:
  • Mais relevantes
  • Mais lidos
  • Mais recentes

Nenhum artigo disponível

Nenhum slide disponível

Nenhum vídeo disponível