Vba 在另一个打开的工作簿中引用复选框

我试图在另一个工作表中引用ActiveX复选框控件的值。我的目标是使当前工作簿中的复选框值与另一个打开工作簿中的复选框值相同

我可以在同一工作簿中不同工作表上的两个复选框之间执行此操作：

Private Sub CommandButton1_Click()

If Sheets("Sheet2").Box2.Value = True Then
    Box1.Value = True
Else: Box1.Value = False
End If

End Sub

但在运行以下代码时，我收到一个运行时错误“9”“下标超出范围”：

Private Sub CommandButton2_Click()

If Worksheets("Book2").OLEObjects("Box3").Value = True Then
    Box1.Value = True
Else: Box1.Value = False
End If

端接头

当我尝试调试代码时，“If Worksheets”行将突出显示。我肯定我没有正确地引用另一个复选框，但我已经到处寻找正确的方法来引用它，没有任何运气。提前感谢您的帮助

If Worksheets("Book2").OLEObjects("Box3").Value = True Then

“Book2”不是工作表的名称，可能是另一本书的名称。在这种情况下：

If WorkBooks("Book2").Worksheets(1).OLEObjects("Box3").Value = True Then

---

…或使用另一本书中工作表的名称。

好的，这很有意义；不幸的是，我仍然看到运行时错误。