Упрвление таблицей Access из Excel

Да, с SQL выражением я в спешке промахнулся...  С учетом диапазона надо так:

INSERT INTO Clean SELECT * FROM [Excel 8.0;HDR=Yes;DATABASE=" & ActiveWorkBook.FullName & "].[" & ActiveSheet.Name & "$A3:P113];

Это если количество и пследовательность полей совпадают, иначе:

INSERT INTO Clean (Поле1, Поле2) SELECT xl.Поле1, xl.Поле2 FROM [Excel 8.0;HDR=Yes;DATABASE=" & ActiveWorkBook.FullName & "].[" & ActiveSheet.Name & "$A3:P113] As xl;

Попробуйте сначала настроить запрос в вашей БД.