Saberexcel - o site de quem precisa Aprender Macros Microsoft Excel VBA
Essa Função do Aplicativo Microsoft Excel VBA, exibe uma soma de determinado intervalo de células, mesma finalidade da Função Soma do Aplicativo Excel
Function SSOMAX(Valor_Cel As Range)
Dim rnCell As Range
Application.Volatile
For Each rnCell In Valor_Cel
If Not (rnCell.Rows.Hidden Or rnCell.Columns.Hidden) Then
If IsNumeric(rnCell.Value) Then
SSOMAX = SSOMAX + rnCell.Value
End If
End If
Next rnCell
End Function
Sub plan_calc()
Saber1.Calculate
End Sub
Aprenda tudo sobre Aplicativo Microsoft Excel VBA, sozinho, praticando com os produtos didáticos SaberExcel
Baixe o exemplo de planilha contendo a função acima
Excel planilha vba soma funcao ssomax vba igual funcao soma (33.15 kB)