Sumar Registros
Nesecito sumar todos los registros de una columna en un msflexgrid.
Ayuda !!!!
Ayuda !!!!
Hola,
Dim j As Long
Dim suma As Double
For j = 1 To mfGrid.Rows - 1
mfGrid.Row = j
suma = suma + CDbl(mfGrid.TextMatrix(j, 2))
Next j
MsgBox "La suma total es " & suma
Pero de todas formas te he mandado un ejemplo a tu correo
salu2
sdemingo
Dim j As Long
Dim suma As Double
For j = 1 To mfGrid.Rows - 1
mfGrid.Row = j
suma = suma + CDbl(mfGrid.TextMatrix(j, 2))
Next j
MsgBox "La suma total es " & suma
Pero de todas formas te he mandado un ejemplo a tu correo
salu2
sdemingo
