Ms access 跨多个访问表创建主键

我最近将40多个excel文件导入Access，但现在我想为每个文件添加一个PK

我有以下代码，但它没有经过db.execute行，我在CREATEINDEX语句中不断得到错误3291语法错误。看起来不错，但不确定为什么会发生这种情况

Public Sub AddPrimaryKey()

Dim db As DAO.Database
Dim td As DAO.TableDef



Set db = CurrentDb()

    For Each td In db.TableDefs

    If Left(td.Name, 6) = "REPORT" Then

    db.Execute "CREATE INDEX Employee No ON td.Name (Employee No) WITH PRIMARY"


    End If

Next td


End Sub

---

字段名似乎包含空格，请将其括起来

将

td.Name

的值添加到字符串中

db.Execute“创建索引[员工编号]”&td.Name&_
“（[员工编号]）与主”

字段名似乎包含空格，所以将其括起来

将

td.Name

的值添加到字符串中

db.Execute“创建索引[员工编号]”&td.Name&_
“（[员工编号]）与主”

如果Employee No是单个列的名称，则应将其引用如果Employee No是单个列的名称，则应将其引用