[vfp] Save as en automatización Excel

[Hernandez Gabriel]

Hola a todos.

Estoy necesitando, una vez que he abierto, di formato a un archivo Excel 2007 o 2010, poder guardarlo con formato para Office 2003.

Utilizo XLApp.APPLICATION.activeworkbook.SAVEAS("nombre_archivo")

pero por defecto lo guarda con formato 2007 o 2010, según tengan instalado mis clientes el office.

 

Bueno, le he agregado XLApp.APPLICATION.activeworkbook.SAVEAS("&caminoexcelx")+".xls"

Pero al momento de tratar de abrilo con Office 2003, es cero legible.

La pregunta es:

Al momento de hacer XLApp.APPLICATION.activeworkbook.SAVEAS("&caminoexcelx"), hay alguna indicación adicional para el tipo de formato a guardar?

Gracias y espero se entienda lo que necesito.

Saludos

Gabriel

[Luis Maria Guayan]

Debes pasar el segundo parámetro con el formato elegido

Ej. para Excel 2003
.SAVEAS("MiArchivo.xls", 56)

51 = xlOpenXMLWorkbook (without macro's in 2007-2010, xlsx)
52 = xlOpenXMLWorkbookMacroEnabled (with or without macro's in 2007-2010, xlsm)
50 = xlExcel12 (Excel Binary Workbook in 2007-2010 with or without macro's, xlsb)
56 = xlExcel8 (97-2003 format in Excel 2007-2010, xls)

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Hernandez Gabriel]

La verdad decirle Maestro es poco..................

Gracias por la pronta respuesta y efectividad de la misma.

Este era un problema a resolver bastante importe.

Gracias de nuevo.

Saludos

Gabriel