Criando funções próprias no VBA

CRIANDO FUNÇÕES PRÓPRIAS NO VBA

O Excel fornece muitas funções próprias, mas que nem sempre atendem plenamente a nossa necessidade. Por exemplo uma função que permita você somar valores de células de uma determinada cor em uma planilha.

Para resolver estes problemas o Excel permite que sejam criadas funções no Visual Basic for Applications.

São necessários conhecimentos de programação para criar novas funções, mas nada impede que um usuário sem conhecimentos nesta área sigam o post.

Apenas para fins didáticos, iresmos no exemplo deste passo a passo criar uma função que multiplique dois valores.

Passo 1:

Abra o Excel 2007 e caso a guia Desenvolvedor não esteja ativa clique no menu representado pelo símbolo do Excel no canto superior esquerdo, clique em Opções (último item do menu), e na Geral da janela que será aberta marque a opção Guia do Desenvolvedor.

Passo 2:

Clique na guia Desenvolvedor e pressione o botão Visual Basic, irá abrir a janela de edição.

Botão Visual Basic.png

Botão para abrir o editor do VBA

Na janela de edição é necessário que seja criado um módulo, para isso clique na guia da esquerda em VBA Project (Pasta 1) e clique em Inserir e em seguida Módulo conforme a figura.

Inserir módulo.png

Inserir módulo

Passo 3:

Clique na pasta Módulos e clique sobre o novo objeto criado, chamado Módulo1.

Na área em branco ao lado direito digite a função:

‘Função que multiplica dois valores
Function fMultNumber(vValue1 As Double, vValue2 As Double) As Double
fMultNumber= vValue1 * vValue2
End Function

Por partes neste código temos:

  • O nome da função fMultNumber
  • Os parâmetros vValue1 e vValue2
  • Os tipos como Double
  • Retorno do valor fMultNumber= vValue1 * vValue2

Clique em Salvar e feche a tela de desenvolvimento VBA, a opção já estará pronta para utilização.

Passo 4:

Digite dois valores nas células A1 e B1 e na célula C1 pressione as teclas Shift + F3, na tela que segue selecione a função criada na lista.

Fórmula.png

Inserir fórmula

Na tela que segue selecione as células A1 e B1 e clique em OK.

Na célula C1 irá constar o resultado da função criada.

Em um próximo post iremos mostrar como compartilhar funções criadas por usuários e também criar funções realmente úteis para o seu dia-a-dia.

Espero que tenha sido útil e até o próximo post.

Rieper


Marcos Rieper

Pai, marido, professor e consultor em Excel.

Obrigado por ler este artigo, este blog foi criado para difundir o conhecimento em Excel à todos.

Divulgamos novos artigos nas redes sociais, basta clicar nos ícones abaixo.

Excel não precisa ser complicado

Assine nossa newsletter e receba dicas práticas para dominar o excel