Как добавить / изменить значение свойства «Описание» для LinkTable в VBA?

Question

У меня есть LinkTable, которая указывает на существующую таблицу сервера SQL в моей базе данных Access.Мне нужно изменить значение свойства «Описание» для этой ссылки на таблицу.

Я пробовал много способов, но не смог этого сделать.

Может ли кто-нибудь помочь мне в этом отношении?

Answer 1

Некоторые заметки.

Dim db As DAO.Database
Dim tdf As TableDef

Set db = CurrentDb
Set tdf = db.TableDefs("Table1")

On Error Resume Next
tdf.Properties("Description") = "Link"

If Err.Number = 3270 Then
    Set prp = tdf.CreateProperty("Description", _
        dbText, "Link")
    tdf.Properties.Append prp
End If