在禁用 ActiveX 的情况下保存的 Excel 2003 电子表格将不再弹出 ActiveX 的提示

Question

我有一个使用ActiveX的电子表格。我意识到，如果用户在第一次提示输入 ActiveX 时选择"否"，然后保存工作表，则工作表将永远不会提示用户再次启用 ActiveX。

但是，我正在开发的工作表需要启用 ActiveX。所以我的问题是：

如果用户在提示启用 ActiveX 并保存工作表时第一次选择"否"。如何在下次重新打开工作表时仍提示输入 ActiveX？换句话说，如何始终提示用户启用 ActiveX？

Answer 1

我的工作表中有一个登录宏，如果未启用 ActiveX，它将引发错误。因此，如果未启用 ActiveX，我会隔离并捕获该错误，并强制保存并关闭工作表。

法典：

Private Sub Workbook_Open()
  ' ...some code...
  On Error GoTo InitializeLoginErrorHandler:
    DoLogin
  Exit Sub
  InitializeLoginErrorHandler:
    MsgBox "ActiveX has not been enabled. ActiveX must be enabled for worksheet to function. Restart worksheet and enable ActiveX." _
      & vbNewLine & vbNewLine & "worksheet will now close without saving any changes."
    ThisWorkbook.Close savechanges:=False
End Sub
Private Sub DoLog()
  ' Login to system through linked .dlls and .ocx. This portion requires ActiveX to be enabled. 
End sub