none
Erro em tempo de execução '13'. Tipos incompatíveis RRS feed

  • Pergunta

  • 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 ).

    segunda-feira, 19 de junho de 2017 16:26

Todas as Respostas

  • Roger,

    Só retornará erro no seu método se você não possuir 3 colunas no seu ListView ou se a terceira coluna for um texto e não um número.

    no seu exemplo o subItems(2) representa a 3ª coluna da matriz.

    Abraço!


    Natan

    segunda-feira, 19 de junho de 2017 23:54