Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/05/2009, 08:08
principefreddy
 
Fecha de Ingreso: julio-2008
Mensajes: 205
Antigüedad: 15 años, 10 meses
Puntos: 1
Sumar columnas de un listview

hola bueno la pregnta o inquietud que tengo es.

como hago para que en vez de sumarme todas las columnas solo me sume las filas que esten seleccionadas con los check ..

yo hice algo para que me sumara las filas de la columna que en este cs se lama (PRECIO). alguie me ayudar. con un ejemplo hecho porfavor .

Código:
Private Sub Suma_Click()
Dim Total As Double, i As Integer
  
    'Suma los valores de la columna de los Subitems(1)
    For i = 1 To Lv.ListItems.Count - 3
        Total = Total + CDbl(Lv.ListItems(i).SubItems(1))
    Next
       
    'Asigna el valor total
    Lv.ListItems("Total").SubItems(1) = FormatCurrency(Total, 2)
End Sub