不可用时在Excel中阻止数据源提示

Question

我有一个Excel文件，其中包含多个ODBC数据连接。用户可以通过两种不同的方式打开它。连接无法运行的服务器，以及连接无法运行的桌面。我已将连接设置为仅在服务器上运行但是尽管未在桌面上运行，但始终会弹出数据源提示。如何防止数据源提示在桌面上打开？

以下是我使用的代码：

Private Sub Workbook_Open()

On Error Resume Next
If Application.OperatingSystem = "Windows (32-bit) NT 6.01" Then
    Application.AskToUpdateLinks = False
    ActiveWorkbook.RefreshAll
End If

Worksheets("New").Select
Range("J4").Select


End Sub