Amigos saludos otra vez, tengo un problema y queria saber si pueden resolverlo, en un datagrid que me muestra informacion de facturas, y unos textbox que recogen la sumatoria de las columnas, y unos dtpicker para buscar por rango de fechas en el datagrid.
el problema es que cuando tengo varios datos que sumar, el resultado mismo es correcto, pero si tengo solo un registro no me muestra ningun valor, no se si me explico esto es si hay un dato que contenga por ej. 10000, en el texbox no me muestra ese valor me sale 0, y ademas estuve probando con numeros grandes esto es 24500125 y tampoco los suma solo me coloca un 0 en el textbox, la rutina que ejecuto para sumar los campos de las columnas es el siguiente:

Private Sub SumaExento()
Dim i As Integer, j As Integer, k As Integer, l As Integer

'asigno el número de filas
k = DataGrid1.ApproxCount

With DataGrid1
'me sitúo en la columna Entrada
.Col = 6
'comienzo a recorrer el bucle (resto 1 porque el .approxcount comienza de 1 y el .Row de 0)
For i = 0 To k - 1
'captura errores
On Error Resume Next
'me sitúo en la fila del Indice
.Row = i
'guardo el valor
j = .Text
'uso un acumulador para sumar los contenidos
l = l + j
Next
'despliego el resultado
txtexento = l
End With
End Sub

espero puedan ayudarme a solucionar este problema, sin mas que solicitar me despido desde ya muchas gracias.


Saludos desde Osorno

Carlos Alarcón G.

No suelo utilizar datagrid como objeto de mostrar datos, pero te sugiero que en vez de Aporcount, utilices el valor Rows que te indica el número de filas que tiene.

Por otra parte, no sé como has definido la variable en la que acumulas al sumatorio, pero trata de definirla como tipo double.

Espero que te resulte útil.

__________________
Un cordial saludo
-Acalanto-

Madrid - España

Visual Basic
Videos Programacion
Foro Programacion
Tutoriales Programacion

No tienes ninguna garantía de obtener respuesta válida recorriendo las filas de la grilla. El .Row se refiere a las filas que se presentan el pantalla, no a las filas que componen la grilla.

Tienes que utilizar los campos del recordset que alimenta al DataGrid, además de tener la precaución que te indica Acalanto, que la variable "l" debes dimensionarla como Double.

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion

Muchas gracias maestro J.M.Movilla, tu codigo me ha ayudado bastante y me ha quitado un peso de encima.