' Запрос
vbSQL = "CREATE TABLE TABLEDATA " _
& "(ID COUNTER, " _
& "DATESHORT DATETIME, " _
& "DATELONG CHAR (20), " _
& "NAMEORG CHAR (255), " _
& "COUNT1 CHAR (50), " _
& "COUNT2 CHAR (50), " _
& "SUMMA1 CHAR (10), " _
& "BANK1 CHAR (255), " _
& "SUMMA2 CHAR (255), " _
& "NOTE CHAR (255));"

' При имени поля NOTE выдает ошибку:
' -2147217900 - Ошибка синтаксиса при определении поля. [Microsoft JET Database Engine]

' При имени поля NOTE с добавлением каких-либо символов, выполняется.
& "TEXTNOTE CHAR (255));"

' Выполнение запроса
Set ADOrs = ADOcn.Execute(vbSQL)

В список из файла: Справочник по SQL
- Зарезервированные слова SQL ядра базы данных Microsoft Jet
Необходимо зарезервировать слово NOTE.

Ваши замечания!

Таблица создана.
:-)

Интересно...