Запустил макрос, пишет:
“Введенное выражение содержит имя функции, которое приложению Access не удается найти.” Суть в том, что он не находит таблицу user-tabl, а почему, не понимаю.

Слово Public перед описанием функции-написал.
Имя функции в модуле не отличается от того имени в макросе.
Не находит таблицу user-tabl, т.к. при запуске VBA, пишет, что не удается найти объект (user-tabl). :-)

Спасибо бльшое, у меня все запустилось!!!
Но он выполняет только три первых строчки, а остальные не успевает выполнять (т.к. не успевает закрыть Word) и берет в буфер обмена всю табличку.
Я написал программу "задержки" по времени:

Public Declare Function timeGetTime_
Lib "winmm.dll" () As Long
IPause = 10
ITimeStart = timeGetTime()
ITime = timeGetTime() - ITimeStart < IPause
ITime = timeGetTime() - ITimeStart
Loop

но она почему-то не хочет работать, ругает две первых строчки, подскажите пожалуйста, что я не так делаю.

Программу задержки выполнил так:
For N = 1 To 20000
Next N

Но программка все-равно выполняет только первые три строчки!!!
Помогите, что же делать?

"Какая разница автору вопроса, какой чужой код передирать - программный или не программный?" Разница есть: не программно для меня понятней и я смогу в нем что-либо изменить (т.к. данные из одного OLE поля мне надо было: 1.разнести по трем полям 2.разнести по шести полям).
Кстати (может кому-нибудь пригодится), после долгих раздумий я все-таки решил проблему!
Надо просто открыть и держать открытым Word, тогда все работает без проблем, а временная задержка здесь не помогает! :-)))
P.S. Спасибо всем за советы!