cambio de formato excel

[Irlandes 1960]

Hola colegas, estoy tratando de abrir un libro de msexcel y guardarlo con formato 5.0

que me permita luego importar su contenido a un cursor usando el comando

      append from (lcfile) type xls

sin depender de que el usuario lo tenga que abrir por las suyas para reemplazar el formato.

para eso intento abrir la planilla, cambiar su formato, y guardarlo, usando el siguiente codigo, el cual desgraciadamente no tiene efecto alguno sobre la planilla, que ignora olimpicamente todos mis vanos intentos por domesticarla

oleapp =

createobject('excel.application')

with oleapp

.

visible = .F.

.Workbooks.

open(LCFILE)

LNFORMATO = .ActiveWorkbook.FILEFORMAT &&solo para ver como viene

&& 56 corresponde al libro estandar del excel, que lo quiero cambiar

.DEFAULTSAVEFORMAT = 39   && es el formato 5.0 que maneja VFP 

.ActiveWorkbook.SAVED = .T.

.DISPLAYALERTS = .F.   &&para que no pida permiso de pisarlo

.ActiveWorkbook.

saveAS(LCFILE)

.ActiveWorkbook.

CLOSE

.QUIT

ENDWITH

rele

oleApp

todo muy bonito pero no cambia nada, la planilla sigue en el formato que traia (56).

Probe de guardarla con otro nombre y tampoco, y se me acaban las ideas.

Desde ya gracias por sus aportes.

[Miguel Canchas]

saveAS(LCFILE,39,.F., .F., .F.)

[Miguel Canchas]

saveAS(LCFILE,39,””,””,.F., .F.)

 

 

MK

[Irlandes 1960]

gracias, es justa la respuesta

[Jairo]

Para hacer mas completo el código debería conocerse primero la versión de excel que fue guardado.., o no ¿?

JM

[Irlandes 1960]

En realidad esto obedece a la necesidad de poder incorporar con append datos que vienen en una planilla que ya se con una version mas moderna que las que maneja el comando.

En cambio si estoy seguro procede de un sistema que graba en versiones compatibles de excel, no me hace falta y lo importo de una.

Y lo mas lento del proceso es instanciar el excel, y abrir la planilla.