☰

如何与其他用户共享包含嵌入式 SQL 查询的 Excel 表，而无需他们提供登录凭据？

tag-icon • tag-icon microsoft-excel sql-server
如何与其他用户共享包含嵌入式 SQL 查询的 Excel 表，而无需他们提供登录凭据？

我为一位（不懂技术的）同事创建了一个 Excel（Microsoft 365）工作表，用于从 SQL 数据库中提取数据。但是，由于他无权访问数据库，因此他无法在他的计算机上刷新查询（通过点击“全部刷新”）。当他尝试刷新时，系统会要求他提供他没有的登录凭据。

我有什么办法可以把表单发给他，并让他用我的凭证保持登录状态吗？最好他永远不需要输入任何登录信息，只需点击刷新即可更新查询。

答案1

Const adTypeBinary = 1
Const adSaveCreateOverWrite = 2

Main()

Sub Main()  
    
   Dim cn,rs        
' bring on the databse access
    Set cn = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.Recordset")
    
    connectionString = "Driver={MySQL ODBC 5.3 Unicode Driver};Server=<server_name>;Database=database_name;User=username; Password=password;"
    'connectionString = "Driver={MariaDB ODBC 3.0 Driver};Server=server_name;Database=database_name; User=username; Password=password;"
    cn.Open connectionString
    rs.ActiveConnection = connectionString 
        rs.Open "select concat(""

如果您添加了宏，则可以嵌入仅具有读取权限的用户名和密码。我不知道您如何使用它，但您可能必须在宏中添加更多代码。您可能必须将嵌入的 SQL 查询移动到一个或多个宏中。

相关内容