Excel VBA-记住SQL ODBC用户/密码

Question

第一次来这里，所以我希望得到我的答案，我在整个Google上浏览，但找不到答案。

好吧，我得到了VBA代码，该代码在Exel上的SQL中刷新了代码。

VBA代码：Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

每次我的ODBC登录名/密码都询问时，我尝试手动刷新，我想通过将这些信息保存在Excel单元格或直接在VBA中自动运行（我更喜欢在“ Validaçãode Dados”表）。然后，通过强制用户以表格形式插入这些信息（以保持更好的外观）来使其变得更好。 但是问题在于，每次我尝试运行宏时，都会收到错误消息（例如“身份验证失败” ）。

• 我在Excel位置中的SQL代码：

• 询问我的用户并登录：

• 由于未保存用户/登录而导致的错误：

Office版本：Microsoft Office 365商业版

谢谢大家！

Answer 1

如果您有SQL Server，则还应该能够使用Windows集成身份验证。您必须在SSMS中添加用户。

https://docs.microsoft.com/en-us/sql/connect/odbc/linux-mac/using-integrated-authentication?view=sql-server-2017

Answer 2

我设法通过以下代码从标准窗口中询问密码：

ActiveWorkbook.Worksheets("Base").ListObjects(1).QueryTable.Refresh

“基础”是工作表的名称，ListObjects(1)是您只有一个SQL查询的情况。