当宏调用ADODB函数时Excel 2010崩溃

从我的开发机器正常工作，在用户（典型）上失败。获取没有错误信息。只是崩溃的Excel。事件日志是无用的。当宏调用ADODB函数时Excel 2010崩溃

安装MDAC以防万一。

我知道这是不是太多去，任何想法，将不胜感激......

Private Function ObtainDatabaseConnection() As ADODB.Connection 

    Dim cnt As ADODB.Connection     

    'prod 
    Const stADO As String = "driver={SQL Server};" & _ 
     "server=XXXX;uid=XXXX;pwd=XXXX;database=XXXXX" 

    Set cnt = New ADODB.Connection 
    cnt.Provider = "MSDASQL" 
    cnt.ConnectionString = stADO 
    cnt.Open 

    Set ObtainDatabaseConnection = cnt 

End Function

来源

2011-08-03 eschneider

编辑在新机器上的代码后，我开始收到此错误：“对象库功能不支持”，这导致回答链接。 – eschneider

以下一台机器上工作：

去编辑宏

工具菜单/参考

取消选中“Microsoft ActiveX Data Objects 6.0 Library”

保存Excel工作表

然后再选中“Microsoft ActiveX数据对象6.0库”

来源

2011-08-03 05:53:55 eschneider

当宏调用ADODB函数时Excel 2010崩溃

回答

相关问题