
24/08/2008, 19:56
|
| | Fecha de Ingreso: agosto-2008
Mensajes: 1
Antigüedad: 16 años, 5 meses Puntos: 0 | |
Respuesta: Cerrar aplicación Excel Estimados...
Soy nuevo en el foro y encontré este codigo que les será de utilidad
La deben llamar para cerrar el Libro, la hoja y el excel ....
Dim oXL
oXL = CreateObject("Excel.Application")
oXL.Visible = False
If Not oXL Is Nothing Then
EiminaReferencias(oXL)
End If
Private Sub EiminaReferencias(ByRef Referencias As Object)
Try
'Bucle de eliminacion
Do Until _
System.Runtime.InteropServices.Marshal.ReleaseComO bject(Referencias) <= 0
Loop
Catch
Finally
Referencias = Nothing
End Try
End Sub
buenas noches ... StgoChilito |