Liberar objeto

Por que con este codigo no me libera el objeto de memoria?. Agradecido
Set xl = CreateObject("Excel.Application")
ruta = "C:\Documents and Settings\Administrador.HELMUTH\Mis documentos\facturacion\pagos\informe.xls"
xl.Application.Workbooks.Open ruta
xl.Worksheets("Hoja1").Activate
xl.Worksheets("Hoja1").Columns("B:B").ColumnWidth = 12.71
xl.Worksheets("Hoja1").Rows("7:7").Select
'ActiveWindow.SelectedSheets.PrintOut (True)
xl.ActiveWorkbook.Save
xl.Workbooks.Close
xl.Application.Quit
Set xl = Nothing
1

1 Respuesta

15.350 pts.
Pues asi es como se libera!
...
Prueba poniendo
set xl=Nothing
DoEvents
VbGopher!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas