需启用“打开文件时刷新”选项:一、通过【数据】→【连接属性】→【用法】选项卡勾选;二、在【查询和连接】窗格右键连接→【属性】→勾选刷新并启用后台刷新;三、用VBA在Workbook_Open事件中设置RefreshOnOpen=True。

Excel如何设置自动刷新数据连接_在连接属性中勾选打开文件时刷新  第1张

如果您在Excel中设置了外部数据连接,但每次打开工作簿时数据未自动更新,则可能是因为连接属性中未启用“打开文件时刷新”选项。以下是实现该功能的具体步骤:

一、通过数据连接对话框启用自动刷新

此方法适用于已建立的数据连接,通过“编辑链接”或“连接属性”界面直接配置刷新行为,确保工作簿打开时自动获取最新数据。

1、在Excel工作表中,点击任意已导入外部数据的单元格区域。

2、切换到【数据】选项卡,找到并点击【连接】组中的【连接属性】按钮。

3、在弹出的“连接属性”对话框中,切换至【用法】选项卡。

4、勾选打开文件时刷新此连接复选框。

5、点击【确定】保存设置。

二、通过查询和连接窗格配置刷新选项

当工作簿包含多个连接或使用Power Query导入数据时,可通过“查询和连接”窗格统一管理并启用自动刷新,避免遗漏单个连接设置。

1、在【数据】选项卡中,点击【查询和连接】按钮,打开右侧窗格。

2、在窗格中右键单击目标连接名称(如“Query - Sheet1”或对应连接名)。

3、选择【属性】,打开连接属性窗口。

4、在【刷新控制】区域,勾选打开文件时刷新数据

5、确认勾选【启用后台刷新】以避免打开时界面卡顿。

6、点击【确定】完成配置。

三、通过VBA代码强制启用自动刷新

若需批量处理多个连接,或标准界面中选项不可用(如部分ODBC连接),可使用VBA脚本遍历所有连接并统一设置自动刷新属性。

1、按Alt + F11打开Visual Basic编辑器。

2、在左侧工程资源管理器中,双击当前工作簿对应的ThisWorkbook对象。

3、在代码窗口中输入以下语句:

Private Sub Workbook_Open()
    Dim conn As WorkbookConnection
    For Each conn In ThisWorkbook.Connections
        conn.ODBCConnection.BackgroundQuery = True
        conn.ODBCConnection.RefreshOnOpen = True
    Next conn
End Sub

4、关闭编辑器,保存工作簿为启用宏的格式(.xlsm)。

5、重新打开文件时,所有ODBC连接将按代码设定自动启用打开时刷新