Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Como somar itens por coluna no formulário VBA (excel)?
Como somar itens por coluna no formulário VBA (excel)?
Quero somar cada item de cada coluna, no List Box, alguém poderia me ajudar?
- Reinaldo
- Jedi
- Mensagens: 1537
- Registrado em: Sex Ago 01, 2014 4:09 pm
- Localização: Garça - SP / SCS - SP
Re: Como somar itens por coluna no formulário VBA (excel)?
Adapte a sua realidade
Código: Selecionar todos
Private Sub Somar()
Dim lItem As Double
Dim Total As Double
Total = 0
For lItem = 0 To ListBox1.ListCount - 1
If IsNumeric(ListBox1.List(lItem, 4)) = True Then
Total = Total + CDbl(ListBox1.List(lItem, 4))
End If
Next
Label107.Caption = Total
End Sub