Problemas con excel

himaguary
13 de Diciembre del 2005
Hola,

estoy desarrollando una aplicacion que abre un fichero excel mete datos en el y despues lo cierra,el problema es que queda abierto un proceso excel que me impide hacer nada con excel hasta que no cierro la aplicacion.Os pego aquí como abro y cierro el archivo excel,espero que alguien me pueda ayudar

thanks

Private xlsFicheroOrigen As Excel.Application

Set xlsFicheroOrigen = New Excel.Application
xlsFicheroOrigen.Workbooks.OpenText rutaFichero

'introduzco los datos en el fichero

xlsFicheroOrigen.ActiveWorkbook.Save
xlsFicheroOrigen.ActiveWorkbook.Close

xlsFicheroOrigen.Quit
Set xlsFicheroOrigen = Nothing

El caso es que desde que lo abro me queda el proceso excel abierto y ya no se cierra hasta que no cierro la aplicacion

Salu2

Silvina
13 de Diciembre del 2005
lo que te conviene hacer en este caso es no abrir excel, te escribo el codigo q uso en una d mis aplicaciones, espero q t sirva:

Dim xl As New excel.Application
Dim MiXL As excel.Workbook
Set MiXL = xl.Workbooks.Open("archivo.xls")

'introducis los datos en el fichero refiriendote a las hojas de la siguiente manera
(MiXL.Worksheets(1).Range(Chr(ii) & jj).Value) = "un valor"


MiXL.Close False
Set MiXL = Nothing
Set xl = Nothing