Reporte a excel

Hola amigo .. Mira tengo este código para un reporte en excel, el archivo de excel ReporLPM.xls ya esta creado y ya tiene formato como color, tamaño, tipo de letra etc... El problema es que cuando se genera un reporte de mi sistema y si tengo otro o otros archivos de excel abiertos de otra cosa, el reporte que genero se sobreescribe en los archivos de excel abiertos ya que no me lo abre como otro archivo o documento de exel... Espero que me haiga esxplicado...
LOCAL xFila
xFila= 15
SELECT curfacturas
GO TOP IN curfacturas
DO WHILE !EOF("curfacturas")
tmpsheet = GetObject("C:\LPM\ReporLPM.xls")
XLApp = tmpsheet.application
XLApp.Parent.Windows(1).Visible = .t.
XLSheet = XLApp.ActiveSheet
XLApp.Visible = .t.
XLSheet.Cells(xFila,1) = contador
XLSheet.Cells(xFila,2) = curfacturas.numero
XFila = xFila + 1
SKIP IN curfacturas
enddo

1 Respuesta

Respuesta
1
Lo que estas olvidando es crear un nuevo libro en el cual vas a enviar el reporte
No olvides valorar la respuesta es tan importante como dar las gracias, si te queda alguna duda vuelve a preguntar

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas