Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема с филтром в VBA / 10 сообщений из 10, страница 1 из 1
09.10.2003, 10:40
    #32288499
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Привет, народ! Снова я со своими дурацкими вопросами. :) Поиск результата не дал, вот и пишу.
Надо отфильтровать записи в форме. Рабочий код:
...
Me.Filter="[Адрес]='" & adress & "'"
...
Все фильтруется замечательно. Но у меня выдает ошибку, если я пытаюсь извратиться с Like adress.
Помогите, плиз. Как правильно написать код???
...
Рейтинг: 0 / 0
09.10.2003, 10:51
    #32288518
Hummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Код: plaintext
Me.Filter =  "[Адрес] like '*" & adress & "*'" 


И всё должно работать.
...
Рейтинг: 0 / 0
09.10.2003, 11:01
    #32288529
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Вываливается с ошибкой 2448 на этой строке: "Невозможно присвоить значение объекту". Аксес 2000. :((
Еще какие предложения? Хелп ми!!!
...
Рейтинг: 0 / 0
09.10.2003, 13:00
    #32288738
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Челы, челы, хелп, хелп!!! :))
Ну как сделать фильтр с Like в VBA????? Ну очень нужно.
...
Рейтинг: 0 / 0
09.10.2003, 13:05
    #32288747
Владимир Саныч
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
А строка точно такая?

Код: plaintext
Me.Filter =  "[Адрес] like '*" & adress & "*'" 

Или в ней что-то изменено?
...
Рейтинг: 0 / 0
09.10.2003, 13:12
    #32288761
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Код: plaintext
1.
2.
3.
4.
    Dim adress As String
    adress = Me![Адрес]
    Me.Filter =  "[Адрес]=Like '*" & adress & "*'" 
    Me.FilterOn = True

Метод Copy'n'Paste
...
Рейтинг: 0 / 0
09.10.2003, 13:14
    #32288765
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Народ, не бейте меня ногами!!!! Я догнал.
Саныч, сорри, я понял!!! Лишнее (=) стоит!!!
Усе заработало!!!!
Каюсь. :)
...
Рейтинг: 0 / 0
10.10.2003, 11:32
    #32289717
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Народ, есть еще один вопросик по фильтрам. :)
Допустимформа отфильтрован по контрагенту и дате. Теперь надо в этот набор филтров добавить еще один скажем по адресу доставки. Как это сделать не отменяя тот фильтр который уже присутствует???
Проблема в том, что я не знаю, какой на данный момент установлен фильтр на форму. Вот как его узнать програмно???
Ну и второй вопросик, как исключить фильтр из набора? Т.е. если отфильтровано Контрагент и дата, то при двойном клике на дате, надо чтобы остался фильтр только по контрагенту. Если отфильтровано по Контрагенту, дате и адресу, надо чтобы остался фильтр только по Контрагенту и адресу.
Помогите, плиз.
...
Рейтинг: 0 / 0
10.10.2003, 11:53
    #32289753
Hummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
Заведи строковую переменную, присвой ей значение из Me.filter и анализируй строчку, а потом производи какие-то свои действия.
Фильтр - это как SQL инструкция Where.
...
Рейтинг: 0 / 0
10.10.2003, 12:12
    #32289776
TRoUbLEs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с филтром в VBA
То Hummer:
Т.е. достаточно сделать fltr=Me.Filter и все???? Опа, а я что-то вчера ночью стормозил. :( Может строку не так написал. :( В общем, спасибо. Сегодня вечером дома или завтра попробую сделать это.
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема с филтром в VBA / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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