Close Book1, Open Book2, Activate Macro1 Of Book2

I have this code in Book1:


sub OpenCloseMacro1()
Workbooks.Open Filename:="E:closeopenBook2.xlsm"
Workbooks("Book1.xlsm").Close SaveChanges:=True
Application.Run ("Book2.xlsm!Macro1")
End Sub
It closes Book1 and saves it, it opens book2, but Macro1 does not activate. Why?

by the way. Macro1 is:


Sub Macro1()
Userform1.show
End sub


sub OpenCloseMacro1()
Workbooks.Open Filename:="E:closeopenBook2.xlsm"
Application.Run ("Book2.xlsm!Macro1")
Workbooks("Book1.xlsm").Close SaveChanges:=True

End Sub
It opens book2, and activates macro1, but Book1 is not closed