Точка в имени листа Excel и Select

[Andrey Fedorov]

В модуле книги выполняется запрос:

Код: Выделить всё

    r.Open "SELECT F1, F7, F8" & vbCrLf _
                & "FROM [" & Me.Worksheets(i).Name & "$A3:P65535] WHERE NOT F3 IS NULL AND NOT F12 IS NULL AND NOT F13 IS NULL ORDER BY F16"

Все бы прекрасно, но юзер может ввести в имя листа "нехороший символ" (я натолкнулся на точку), после чего данная на данной строчке получим приведенную ниже ошибку.

Соответственно вопрос - как этого избежать?

[Andrey Fedorov]

Как - никто значит не знает ответа?

Пока обошелся тем что в именах листов предварительно заменяю "нехорошие символы" на подчеркивание. Но не хотелось бы их трогать...

[alibek]

Сделать именованный диапазон и обращаться к нему?
Ошибку похоже генерит не ADO, а провайдер для XLS-файлов.

[Gloom]

У меня такая ошибка не воспроизводится.
Версия ado - 2.81.1117.0

Хотя нет, воспроизводится - сразу после точки должен следовать пробел.

А точку в имени листа можно так победить: Replace(WorksheetName, ".", "#")