使用 VBA 在 Excel 中刷新与 SQL Server 的连接（使用密码）答案

【问题标题】：Refresh a connection in Excel to SQL Server (with password) using VBA使用 VBA 在 Excel 中刷新与 SQL Server 的连接（使用密码）
【发布时间】：2018-04-26 13:09:10
【问题描述】：

我有 10 个 Excel 文件通过 OLEDB 连接到 SQL Server，我需要每天手动刷新它们。当我刷新它们时，我需要插入密码。我试图制作一个宏来自动化这个过程，但我没有成功。我做了这个功能来自动化我的一个工作簿：

Sub updateABC()
  Workbooks("Teste").Connections("SQL Server_Azure1").OLEDBConnection.Refresh
End Sub

Excel 要求输入 SQL Server 登录密码。有没有办法使用 vba 自动输入这个密码？

谢谢。

【问题讨论】：

密码总是一样吗？我不完全确定你想在这里做什么。
密码提示是否会自动出现供您输入？换句话说，不需要点击吗？也许您可以设置延迟自动击键？
我觉得你需要看看ADO和connection string。
stackoverflow.com/questions/35879899/…
抱歉耽搁了。所有工作簿的密码都相同。每次刷新工作簿时，都会“自动提示”一个窗口，要求输入 sql server 登录密码。

标签： sql-server vba passwords connection refresh

【解决方案1】：

在没有 VBA 的 Excel 中有一种方法：

您可以转到数据，然后转到连接
单击顶部连接上的属性
单击定义选项卡
大约一半有一个“保存密码”复选框，您将收到有关密码存储未加密的提示。
对此表示同意
点击确定

对所有连接执行相同操作

然后您可以刷新所有连接，系统将提示您输入每个连接的密码。完成此操作并保存文档后，它不会再次要求您输入密码。

您还可以在“使用”选项卡上勾选“打开文件时刷新数据”，以在打开工作簿时刷新连接。

【讨论】：