SommePremiereColonne =0 SommeDeuxiemeColonne = 0 For i = 1 To ListView1.ListItems.Count SommePremiereColonne = ListView1.ListItems.Item(i) + SommePremiereColonne SommeDeuxiemeColonne = ListView1.ListItems.Item(i).SubItems(1) + SommeDeuxiemeColonne '... 'SommeNiemeColonne = ListView1.ListItems.Item(i).SubItems(n) + SommeNiemeColonne Next