在 MS 查询编辑器“Excel”中显示所有表格答案

【问题标题】：show all tables in MS query editor "Excel"在 MS 查询编辑器“Excel”中显示所有表格
【发布时间】：2010-01-14 06:37:09
【问题描述】：

通过 Excel 2003 vba 我通过这种方法建立了 dsn 连接

Sub CreateDataSourceFile()
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set txtfile = fso.CreateTextFile("C:\program files\Common Files\ODBC\Data Sources\" & Me.cnnName & ".dsn", True)
    txtfile.WriteLine ("[ODBC]")
    txtfile.WriteLine ("DBQ=" & Me.DBFolderName)
    txtfile.WriteLine (Me.DBFolderName)
    txtfile.WriteLine ("DefaultDir=C:\")
    txtfile.WriteLine ("Driver={Driver do Microsoft Access (*.mdb)}")
    txtfile.WriteLine ("DriverId = 25")
    txtfile.WriteLine ("FIL=MS Access")
    txtfile.WriteLine ("MaxBufferSize = 2048")
    txtfile.WriteLine ("MaxScanRows = 8")
    txtfile.WriteLine ("PageTimeout = 5")
    txtfile.WriteLine ("SafeTransactions = 0")
    txtfile.WriteLine ("Threads = 3")
    txtfile.WriteLine ("UserCommitSync = Yes")
    txtfile.WriteLine ("[Microsoft Office]")
    txtfile.WriteLine ("DefaultTable =" & Me.cnnName)
    txtfile.Close
End Sub

现在的问题是，当为我的连接打开 Microsoft Query 编辑器时，它会自动将默认表添加到编辑器中，我需要自动添加数据库中的所有表吗？ p>

这个可以吗？！有没有办法通过编辑 dsn 文件来做到这一点？

无论如何，如果有人能帮我解决这个问题，我会非常感谢他。

祝您有美好的一天，感谢您的阅读，

【问题讨论】：

这是stackoverflow.com/questions/2076422/access-get-all-tables 的重复——请参阅我今天发表的评论，因为它要求澄清你想要做什么，因为你问的内容是荒谬的它的脸。
向一个格式不正确的问题添加赏金不会让你很快得到答案。您需要重新表述问题。

标签： excel ms-access database vba

【解决方案1】：

您可以通过控制面板设置 ODBC 数据连接：

开始 > 控制面板 > 管理工具 > 数据源 (ODBC)

单击系统 DSN 选项卡，然后单击添加。选择驱动程序（取决于您拥有的数据库提供商），然后它会询问您相关信息——您要为数据连接提供的名称、服务器名称、身份验证类型等——它将引导您完成过程。

一旦您设置了 ODBC 数据连接，您就可以调用 Excel 的查询编辑器并告诉它连接的名称。我正在使用 Excel 2007，但我认为这是在 2003 年到达那里的方法：

数据 > 导入外部数据 > 新建数据库查询

然后它将允许您选择之前创建的 ODBC 数据源。

进入查询编辑器后，您将能够看到您有权访问的所有表。

我并不完全清楚你在追求什么。这有帮助吗？如果没有，请告诉我更多关于您如何尝试获取数据的详细信息。

【讨论】：

是的，这就是我想要的，但是对于这一部分“您将能够看到您有权访问的所有表”，我希望它能够自动将所有表添加到查询板。
我不确定有什么区别。您的意思是您想查看您实际上无权访问的表吗？如果是这样，由于数据库本身的安全设置，这可能是不可能的。