VBA Excel连接刷新 - 运行时91错误

Question

我正在尝试刷新一个为枢轴提供的连接（四个）。其他三个连接是相对静态的，不需要定期刷新。我使用录音机创建了以下内容，但是当它运行时，我在第一个选择行得到“运行时错误91”。我搜索了几个论坛但找不到完全匹配的东西。有什么建议？

Sub RefreshPareto()
'
' RefreshPareto Macro
'
Sheets("Paretos").Select
Selection.ListObject.TableObject.Refresh
Selection.ListObject.TableObject.Refresh
ActiveWorkbook.Connections( _
    "WorksheetConnection_Work Order Tracker.xlsx!Tracker").Refresh

' Add date stamp

Range("C30").Value = Now()

End Sub