Ver Mensaje Individual
  #3  
Antiguo 20-01-2006
Avatar de RONPABLO
[RONPABLO] RONPABLO is offline
Miembro Premium
 
Registrado: oct 2004
Posts: 1.514
Reputación: 21
RONPABLO Va por buen camino
Primero que todo agradecer a Roman por su pronta respuesta... A continuación paso a describir como estoy haciendo lo que me sugirio

Código Delphi [-]
 
var
   Libro : _WORKBOOK;
   Hoja  : _WORKSHEET;
begin
   try
      try
         Excel := CreateOLEObject('Excel.Application');
         Excel.Workbooks.Open(rutaArchivo);
         Excel.DisplayAlerts := false;
//         Excel.DisplayAlerts[0]:= True;
         Excel.Save;
         Excel.Quit;
//         Excel.SaveAs;
         {rutaArchivo,null,
            Null,
            Null,
            false,
             false,
             xlNoChange,
             xlUserResolution,
             false,
             Null,
             Null,
             0
           );}
      except
         raise;
      end;
   finally
      Excel.Quit;
   end;
end;

Pero al guardar no me cambia el formato del archivo a excel 8.0, sera posible que desde los parametros que trae SaveAs se pueda hacer esto, como tal desde excel al darle "guardar como" aparese una opción de cambiar el formato del archivo a excel 3.0, 4.0... y otros superiores, me imagino que desde codigo pueda hacer esto de forma trasparente, he buscado en las ayudas de excel pero no tengo instalado las ayudas para vb, por el momento sigo buscando por otro lado y esperando a ver si el codigo que tengo esta errado, de antemano muchas gracias.
Responder Con Cita