Hola amigos estoy realizando un programita que crea varios exceles los cuales los trabaja 1*1 con forme se vayan trabajando es asi como los va a ir cerrando, les pongo mis codigos para crear y cerrar los archivos,
Public oExcel As Excel.Application
Public oBook As Excel.Workbook
Public oSheet As Excel.Worksheet
Sub CreaLibro()
Set oExcel = New Excel.Application
Set oBook = oExcel.Workbooks.Add
Set oSheet = Worksheets(1)
End Sub
Sub CerrarLibro()
oExcel.Quit
Set oBook = Nothing
Set oExcel = Nothing
End Sub
Lo que va haciendo el programa es que , crea el libro excel, lo recorre , lo graba y lo cierra, lo envia por email, luego elimina el archivo, luego empieza nuevamente por el inicio, crea,recorre,graba,envia,elimina y asi 'n' veces, pero al momento que realiza la 2da creacion me muestra el mensaje 462, "The remote Server machine does not exist or is unavailable."
Muchas gracias por su ayuda amigos !!!