In the ThisWorkbook code module of Workbook_B, paste the following code:

Private Sub Workbook_Open()
Workbooks("Workbook_A").Close SaveChanges:=False
End Sub

Edit the workbook name if not Workbook_A.

"JB" wrote in message
...
I have two workbooks. WorkbooK_A and Workbook_B. With a command button on
Workbook_A I open Workbook_B. When Workbook_B opens a userform is called
by
Workbool_Open. I want to close Workbook_A at this time. I cannot close
it
from the code that opened the userform because the userform is running.
A line that opens the Workbook_B
A line that shows the userform
A line that closes Workbook_A
I tried inserting the Workbook close in the 'UserForm_Initialize'. this
will close it but the userform does not show. I know I could load
Workbook_B, Close Workbook_A then have a object on Workbook_B that would
show
the user form when clicked. That works but it would look seamless to the
user if I could Close Workbook_A and show the userform with out any action
by
the user. I have a feeling that I cannot do this but any help would be
appreciated.