'客户端'Excel工作簿无法关闭'主机'使用VBA添加

Question

我有2个名为Client.xls和Host.xlam

的工作簿

目标如下

1. 打开客户端时，它还会打开主机添加
2. 主机添加将关闭客户端工作簿
3. 当客户端工作簿关闭时，它还会关闭主机添加

出于某种原因，当我运行此过程时，主机添加是否保持打开状态？

这是我的代码

Client.xls

Private Sub Workbook_Open()

MsgBox ("Open Host")
Workbooks.Open ("C:\Users\nggmgwr\Desktop\Host test\Host.xlam")

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)

    MsgBox ("Close Host")
    Workbooks("Host.xlam").Close

End Sub

Host.xlam

Private Sub Workbook_Open()

    MsgBox ("Close Client")
    Workbooks("Client.xls").Close

End Sub