Olá.
Eu também estou com o mesmo problema, já revisei a planilha mas os dados estão corretos. Preciso de ajuda, por favor.
Public Sub Somar_Valores()
Dim soma As Double
For i = 1 To lstAjudante.ListItems.Count
soma = soma + lstAjudante.ListItems.Item(i).SubItems(2)
Next i
txtSoma2 = soma
End Sub
Esta codificação é para fazer a soma dos valores da segunda coluna de uma listview ( lstAjudante ).