Use the Visual Studio. Net client to run the automation function without exiting the Office application code

1.

VB.net

Imports Microsoft. Office. InterOP
Private sub nar (byval o as object)
Try
System. runtime. interopservices. Marshal. releasecomobject (o)
Catch
Finally
O=Nothing
End try
End sub

private sub button#click (byval sender as system. object, byval e as system. eventargs) handles button1.click
dim oapp as new excel. application ()
dim obooks as Excel. workbooks = oapp. workbooks
dim obook as Excel. workbook = obooks. add
dim osheet as Excel. worksheet = oapp. activesheet

Nar (osheet)
Obook. Close (false)
Nar (obook)
Nar (obooks)
Oapp. Quit ()
Nar (oapp)

GC. Collect ()

Debug. writeline ("Sleeping")
System. Threading. thread. Sleep (5000)
Debug. writeline ("End Excel")
End sub

 

C #

Code
Private   Void Nar ( Object O)
{
Try  
{
System. runtime. interopservices. Marshal. releasecomobject (O );
}
Catch {}
Finally  
{
O =   Null ;
}
}

Exbook. Close (dbnull. Value, dbnull. Value, dbnull. value)
Exapp. workbooks. Close ()
Exapp. Quit ()
System. runtime. interopservices. Marshal. releasecomobject (exapp)
System. runtime. interopservices. Marshal. releasecomobject (exsheet)
System. runtime. interopservices. Marshal. releasecomobject (exbook)
Exapp = nothing
Exbook = nothing
Exsheet = nothing
GC. Collect ()

reference Article : http://support.microsoft.com /? Id = 317109