powered by simpleCommunicator - 2.0.57     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel. Фильтр по данным из Recordset
12 сообщений из 12, страница 1 из 1
Excel. Фильтр по данным из Recordset
    #38589199
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
АДОшный Recordset возвращает одну строчку (или вообще не возвращает)
Хочу её использовать при установке автофильтра (которая точно не пустая, т.е. проверяю EOF).

Да вот как-то неполучается. Чё-то с преобразованием данных не идёт.

CopyFromRecordset rs, 1, 1
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589215
Денис Б.АДОшный Recordset возвращает одну строчку (или вообще не возвращает)
Хочу её использовать при установке автофильтра (которая точно не пустая, т.е. проверяю EOF).

Да вот как-то неполучается. Чё-то с преобразованием данных не идёт.

CopyFromRecordset rs, 1, 1
Это ты так справочный пример ws.Range("A2").CopyFromRecordset rs
перегрузил?)))
-----
Не люблю Progress OpenEdge.
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589226
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
грязный комплектовщик,
это я так показал (видимо зря), что нужна одна строка первого столбца
строка из АДОшного запроса и в нём TOP 1
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589233
гр к
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Денис Б.грязный комплектовщик,
это я так показал (видимо зря), что нужна одна строка первого столбца
строка из АДОшного запроса и в нём TOP 1
А, понял - ты пытаешься выгрузить в непустую ячейку?
Зря.
-----
Не люблю Progress OpenEdge.
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589234
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
помог
rs.GetString()
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589240
гр к
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
гр кДенис Б.грязный комплектовщик,
это я так показал (видимо зря), что нужна одна строка первого столбца
строка из АДОшного запроса и в нём TOP 1
А, понял - ты пытаешься выгрузить в непустую ячейку?
Зря.
-----
Не люблю Progress OpenEdge.
Тьфу ты, как-то пригрезилось, что нельзя выгружать в непустую ячейку.
Без проблем сейчас в эксель 2003 выгрузил 1 ячейку адошного рекордсета.
Range("A1").CopyFromRecordset Recordset, 1, 1
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589257
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вопрос-то был чтобы не в ячейку, а сразу в автофильтр
.AutoFilter Field:=6, Criteria1:=rs.GetString()

p.s. срабатывает (в фильтр ставится), но значения не отфильтровываются. видимо что-то с данными ещё
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589280
гр к
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Денис Б., а кавычек там - Criteria1:=rs.GetString() -не должно быть?
Типа Criteria1:="" & rs.GetString() & ""
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38589300
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
гр кДенис Б., а кавычек там - Criteria1:=rs.GetString() -не должно быть?
Типа Criteria1:="" & rs.GetString() & ""
и так и так неправильно срабатывает
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38590091
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот прилагаю файл.
Подозреваю, что rs.GetString() возвращает в какой-то другой кодировке
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38590100
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если из rs.GetString() записать в ячейку, то выглядит как 4!$A$8, а если скопировать в блокнот, то появляются кавычки "4!$A$8". Похоже в этом и проблема. Фильтр не хочет правильно работать, хотя значение в столбце и параметр фильтра выглядят совершенно одинаково, но являются разными значениями.
...
Рейтинг: 0 / 0
Excel. Фильтр по данным из Recordset
    #38591429
Денис Б.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проблема была в переводе каретки, который вставляет Recordset. Я заблуждался, что .GetString() возвращает только само значение без разделителей.

2013 Excel вообще почему-то не отображает символ перевода каретки. В 2010-м хотя-бы квадратик отрисовывается и можно заметить.

Решил проблему так:

Replace(rs.GetString(), Chr(13), "")
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel. Фильтр по данным из Recordset
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]