Cerrar bien archivo abierto de Excel, Ayuda

Board index FiveWin para Harbour/xHarbour Cerrar bien archivo abierto de Excel, Ayuda

Posts: 418

Joined: Wed Nov 26, 2008 06:33 PM

Cerrar bien archivo abierto de Excel, Ayuda

Posted: Thu Apr 12, 2018 04:57 PM

Saludos.

Hace tiempo expuse el mismo tema de hoy y sigo teniendo problemas para cerrar correctamente un archivo abierto de excel...

Tengo esto:

Code (fw): Select all Collapse

  bSalida:=Mensaje('...','Importando codigos de excel SAT')
  oExcel:=TOleAuto():New( "Excel.Application" )
  oExcel:WorkBooks:Open('P:\tmp\CSAT.xlsx')
  oHoja := oExcel:Get( "ActiveSheet" )
  nRows := oHoja:UsedRange:Rows:Count()
  nCols := oHoja:UsedRange:Columns:Count()
  //
  //
  oExcel:Quit()
  eval(bSalida)

Abre el archivo de excel sin problemas, el caso es que no se como cerrarlo.
Al final le doy el oExcel:Quit() pero el archivo abierto se queda asi, al intentar abrirlo con EXCEL me dice "Solo lectura" y pues igual no lo puedo eliminar.

Ayuda porfa...

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com

karinha

Posts: 8559

Joined: Tue Dec 20, 2005 07:36 PM

Re: Cerrar bien archivo abierto de Excel, Ayuda

Posted: Thu Apr 12, 2018 05:37 PM

Intenta asi,

Code (fw): Select all Collapse

   oExcel:DisplayAlerts := .F.

   oWorkBook:Close()

   oExcel:Quit()
     
   oWorkBook := NIL

   oHoja := NIL

   oExcel := NIL
     
   Release oWorkBook
   Release oHoja
   Release oExcel

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

noe aburto

Posts: 418

Joined: Wed Nov 26, 2008 06:33 PM

Re: Cerrar bien archivo abierto de Excel, Ayuda

Posted: Thu Apr 12, 2018 06:39 PM

Solucionado con:

oExcel:WorkBooks:Close()
oExcel:Application:Quit()

gracias.

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com

FiveTech Support Forums

Cerrar bien archivo abierto de Excel, Ayuda

Re: Cerrar bien archivo abierto de Excel, Ayuda

Re: Cerrar bien archivo abierto de Excel, Ayuda

Continue the discussion