获得本地表的名称和VBA链接表(Get the name of local table and li

我在我的应用程序，其中两个是本地表和三个链接表五桌，我不知道我的代码如何获得表的名称。 我想为我提供两种类型的表名的分别使用循环的名称的代码。

表名

LocalTable1
LocalTable2
LinkTable1
LinkTable2
LinkTable3

码

Dim td As TableDef
Dim stConnect As String
For Each td In CurrentDb.TableDefs
  Debug.Print td.Name 
Next

Answer 1:

您可以使用源表名：

Dim db As Database
Dim tdf As TableDef

Set db = CurrentDb

For Each tdf In db.TableDefs
    If Left(tdf.Name, 4) <> "MSys" Then
        Debug.Print tdf.Name & IIf(tdf.SourceTableName <> "", "  source table: " _
            & tdf.SourceTableName, "")
    End If
Next

文章来源: Get the name of local table and linked table in vba