locked
Como passar um intervalo de celulas a uma função vba? RRS feed

  • Pergunta

  • Olá pessoal, como estão?

    Estou querendo fazer uma função, onde eu preciso passar um intervalo de celulas para essa  função.
    Suponha que eu queria passar os valores entre as células A1:C1... Então teria que passar os valores A1, B1 e C1 a uma função.

    Bem gostaria de saber como criar uma função para receber esse tipo de parametro.

    Alguém tem alguma id´´eia de como fazer isso?
    Se tiver algum tutorial que explique agradeço!

    Abraços,

    Carlos
    quinta-feira, 9 de abril de 2009 15:12

Todas as Respostas

  • Não sei se entendi corretamente a tua dúvida, mas a definição dos parâmetros de uma função é dada na sua declaração.
    A função abaixo realiza a multiplicação dos valores do intervalo informado com parâmetro da função
    Function MULT_VALORES(Intervalo as Range)
    MULT_VALORES = 1
    For Each Célula in Intervalo
    If Isnumeric(Célula) Then MULT_VALORES = MULT_VALORES * Célula
    Next Célula
    End Function
    Se vc quiser utilizar o intervalo A1:C1 como argumento da função, basta digitar numa célula =MULT_VALORES(A1:C1).
    Se a dúvida não era essa, poderia explicá-la melhor?
    [ ]s

    Adilson Soledade - MOS
    • Sugerido como Resposta adilsonsoledade sexta-feira, 10 de abril de 2009 01:41
    sexta-feira, 10 de abril de 2009 01:40