批量更新Excel文件连接字符串

Question

我们最近更改了我们的SQL数据库服务器,我想知道是否会有更新所有Excel文件连接字符串的脚本或更简单的方法？

如果他们使用连接文件会更容易,但不幸的是他们都是手动设置的,我们有大约600个报告......

任何帮助深表感谢.

谢谢

缺口

Answer 1

是的，你可以...你用 c# 或 vb.net 编写一个程序，循环遍历所有 600 个文档并打开这些文档，然后使用

    oModule = oBook.VBProject.VBComponents.Add(VBIDE.vbext_ComponentType.vbext_ct_StdModule)
    oModule.CodeModule.AddFromString(sCode)

根据您在 sCode 变量中的设置，您有一个循环遍历 Excel.Connections 的宏或

    For Each wks In ActiveWorkbook.Worksheets
      For Each qt In wks.QueryTables
        With qt
          .Connection ="myconnstring" 
        End With
      Next qt
    Next wks