Данные с определенных колонок файла XLS в таблицу

Konst888
Дата: 28.11.2006 18:21:48
Хочу сделать импорт в таблицу данных с определенных колонок екселевского файла.
Как это лучше сделать.
Я сделал так.
Беру запросом
StrSQL = "SELECT * FROM [" & Sheet_Name & "$A1:W1] IN '" & FilePath & "'[Excel 8.0;HDR=no;IMEX=2;];"
выбираю колонки все колонки в список. Потом в другой список отбираю только необходимые для обработки.
Потом строкой
    StrSQL = "insert into Потребители ([Лицевой счет],[ФИО],[Адрес])" _
           & " SELECT " & str_column & " FROM [" & Sheet_Name & "$A2:W65535] IN '" & FilePath & "'[Excel 8.0;HDR=NO;IMEX=2;];"
уже вставляю в таблицу только данные из необходимых полей (их содержит строка str_column)

Все нормально, когда есть данные в диапазоне Sheet_Name & "$A1:W1. А если их там нет
вылезает сообщение "Таблица содержит ячейки, выходящие за границы диапазона ячеек, определенного на данном листе."
Как побороть.
nibbles
Дата: 29.11.2006 08:18:00
... WHERE  Not  (F1 Is Null OR F2 Is Null ... OR Fn Is Null)
Konst888
Дата: 29.11.2006 09:03:44
Упростил строку - оставил для выборки две колонки
StrSQL = "SELECT * FROM [" & Sheet_Name & "$A1:B1] IN '" & FilePath & "'[Excel 8.0;HDR=no;IMEX=2;] WHERE  not (F1 Is Null OR F2 Is Null);"
Все равно ругается также.
Мне хочется получить данные из диапазона A1:W1, но если выдается ошибка, то вернуть пользователю сообщение о том, сто файл для обработки не в надлежащем виде...
mds_world
Дата: 29.11.2006 09:13:36
Konst888
Мне хочется получить данные из диапазона A1:W1, но если выдается ошибка, то вернуть пользователю сообщение о том, сто файл для обработки не в надлежащем виде...
Обработка ошибок - то, что доктор прописал.
Sub 
    On Error GoTo ErrMsg

.........................
.........................
.........................
    Exit Sub
ErrMsg:
    MsgBox "файл для обработки не в надлежащем виде..."
End Sub
Konst888
Дата: 29.11.2006 10:19:58
mds_world
Обработка ошибок - то, что доктор прописал.

Так и поступил. Спасибо.