In outlook I instatiate outlook using the following.

Set objOutlook = GetObject(, "Outlook.Application")
' If outlook was not open then instantiate outlook
If objOutlook Is Nothing Then
Set objOutlook = CreateObject("Outlook.Application")
'HandleOutlook = True
End If

In Outlook in the Application_Startup() Event I then open the VBE so that I
can call an outlook macro from excel without any popups using the following

Set objNameSpace = Application.GetNamespace("MAPI")
Set objExplorer = Application.Explorers.Add(objNameSpace.Folders(1),
olFolderDisplayFolderOnly)
objExplorer.CommandBars.FindControl(, 1695).Execute
objExplorer.Close

My problem is that I cannot figure out how to close Outlook's VBE from Excel

I'd like to use the GetObject method then using the .Quit method, but I have
been unable to locate the appname for Outlooks VBE. Does anyone know the
appname and/or a better way to close Outlook's VBE?

Quick correction... In Excel I instantiate outlook using the following

> Set objOutlook = GetObject(, "Outlook.Application")
> ' If outlook was not open then instantiate outlook
> If objOutlook Is Nothing Then
> Set objOutlook = CreateObject("Outlook.Application")
> 'HandleOutlook = True
> End If
>
> In Outlook in the Application_Startup() Event I then open the VBE so that I
> can call an outlook macro from excel without any popups using the following
>
> Set objNameSpace = Application.GetNamespace("MAPI")
> Set objExplorer = Application.Explorers.Add(objNameSpace.Folders(1),
> olFolderDisplayFolderOnly)
> objExplorer.CommandBars.FindControl(, 1695).Execute
> objExplorer.Close
>
> My problem is that I cannot figure out how to close Outlook's VBE from Excel
>
> I'd like to use the GetObject method then using the .Quit method, but I have
> been unable to locate the appname for Outlooks VBE. Does anyone know the
> appname and/or a better way to close Outlook's VBE?