Como ir de foxpro a excel

Hola, ¿me pueden ayudar? Tengo una base de datos muy grande casi con 10millones de registros y necesito sumar una columna y que el resultado de la suma me lo ponga en una hoja de excel.
¿Me pueden ayudar?

1 respuesta

Respuesta
1
Espero no sea tarde:
Se le tabla
Sum campo to variablesuma
loExcel=Createobject("Excel.application")
loExcel.Visible = .T.
loBook = loExcel.Workbooks.Open('c:\tablaexcel.xls')
Cen1 = loBook.Sheets['hoja1']
Cen1.ACTIVATE
WITH lobook.ActiveSheet
.Range("C4").Value =variablesuma
_Screen.LockScreen= .F.
RELEASE loExcel
Dejame intentar hacerlo como me dijiste y cualquier cosa te molesto nuevamente
Hola, nuevamente yo.
Me sirvió mucho lo que me mandaste pero tengo otra pregunta, estoy haciendo un for y dependiendo de el valor de mi contador necesito que me ponga la suma en diferentes celdas de excel, por ejemplo que me la ponfa en c4 después en c5 y así no se como puedo programas para que me vaya cambiando el numero de celda, ¿me puedes ayudar?
forma el rango segun el for por ejemplo:
for i=1 to 10
   lug='C'+alltrim(str(i))
   .range(lug).value=variable de suma
Endfor
Y apodes jugar si el for sera el mismo que corresponda al lugar puedes usmrle o restarle algún numero para que coincida.
Si resolviste tu problema finaliza la pregunta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas