Home Excel - Dicas Microsoft Excel VBA Excel VBA - Soma Excel planilha vba soma funcao personalizada

Excel planilha vba soma funcao personalizada

E-mail Imprimir PDF

Saberexcel - o site de quem precisa aprender Macros Microsoft Excel VBA.

E
ssa Função personalizada do Aplicativo Microsoft Excel VBA(Visual Basic Application), retorna o total da soma dos números existentes em determinada coluna, dependendo do critério inserido na fórmula contendo a função personalizada SomaColuna() abaixo.
'- Na folha de planiha use a seguinte fórmula, destacando o critério da soma da coluna desejada.
Retorna a soma da coluna do mês de Março.......:     '=SOMA(SomaColuna("Plan1";"Março"))
Retorna a soma da coluna do mês de Dezembro.:     '=SOMA(SomaColuna("Plan1";"Dezembro"))

Function SomaColuna
(vDados As String, vNome As String) As Range
    'variável vDados representa toda a tabela(meses e dados)
    Dim i As Integer
    Dim vCelula1 As String
    Dim vCelula2 As String
    Dim vColunas As Long
    Dim vLinhas As Long
   
    vColunas = Worksheets(vDados).UsedRange.Columns.Count
    vLinhas = Worksheets(vDados).UsedRange.Rows.Count
   
    For i = 1 To vColunas
        If UCase(Worksheets(vDados).Cells(1, i)) = UCase(vNome) Then
           vCelula1 = Worksheets(vDados).Cells(2, i).Address
           vCelula2 = Worksheets(vDados).Cells(vLinhas, i).Address
           
           Set SomaColuna = Worksheets(vDados).Range(vCelula1 & ":" & vCelula2)
        End If
     Next

End Function




Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel




  Baixe o exemplo de plnailha contendo a função personalizada acima.
Excel planilha vba soma funcao personalizada (68.46 KB)




Publicidade
Compre com segurança, garantia e ótimos preços
Eletrônicos - Submarino.com.br

Última atualização em Ter, 23 de Agosto de 2011 08:57  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje4966
mod_vvisit_counterOntem5059
mod_vvisit_counterEsta Semana24472
mod_vvisit_counterSemana passada36487
mod_vvisit_counterEsse mês38201
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10461030
Aprenda MS Excel VBA

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA