Ошибка на Dim tdf As DAO.TableDef

На второй строчке компилятор ругается и выбрасывает ошибку

Compile error:

User-defined type not defined

Private Sub Кнопка26_Click()
Dim tdf As DAO.TableDef
Dim fit As Field
Set tdf = CurrentDb.CreateTableDef("Table1")
Set fit = tdf.CreateField("Фамилия", dbText)
tdf.Fields.Append fit
CurrentDb.TableDefs.Append tdf
CurrentDb.TableDefs.Refresh
End Sub

Что делать??? Помогите, пожалуйста!!!

фак, references

А библиотека DAO подключена? И вообще, какой Акцесс?

mds_world

И вообще, какой Акцесс?

А какая разница какой Access?

Старый ворчун

А какая разница какой Access?

если новый, то по умолчанию тока адо -нет?

автор

А какая разница какой Access?

Только для определенности.

Подскажите как подключать библиотеку DAO??? Access 2002

bubucha

Старый ворчун А какая разница какой Access? если новый, то по умолчанию тока адо -нет?

Ну, если DAO и был включен, то мог быть выключен, все равно смотреть надо.
Кстати, в 2003 Access для нового файла DAO включено по умолчанию.

shemax

Подскажите как подключать библиотеку DAO??? Access 2002

Так же как и все другие библиотеки:
VBE (Visual Basic Editor) Tools -> References.

Старый ворчун

Кстати, в 2003 Access для нового файла DAO включено по умолчанию.

да точно, не знал - фигню сказал, а2002 тока адо.