Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 08.05.2009, 15:15   #1
spree
Новичок
Джуниор
 
Регистрация: 08.05.2009
Сообщений: 2
По умолчанию поиск

День добрый!
Заранее извиняюсь, если данный на данный вопрос уже отвечали.

Есть : список З/Ч с артикульными номерами, и данные по операциям с ними(куда кому когда продавалась).

нужно: сделать типа фильтра(или поиска) со строкой ввода чтобы по нужной запчасти отображались все операции.
spree вне форума
Старый 08.05.2009, 15:27   #2
IFRSoff
Форумчанин
 
Аватар для IFRSoff
 
Регистрация: 23.02.2009
Сообщений: 306
По умолчанию

вот так нужно?
Вложения
Тип файла: rar Поиск.rar (10.2 Кб, 196 просмотров)
Лень - двигатель прогресса!
IFRSoff вне форума
Старый 11.05.2009, 13:44   #3
spree
Новичок
Джуниор
 
Регистрация: 08.05.2009
Сообщений: 2
По умолчанию

Спасибо большое!
был - дурак, признаю)

просто на старой работе работал в отделе логистики, занимался вопросами З/Ч, там такая таблица была до меня создана(и там без сводной таблицы была такая функция) а на нынешней работе хочу сам себе упростить работу
spree вне форума
Старый 12.05.2009, 03:41   #4
knahrn
Пользователь
 
Регистрация: 08.05.2009
Сообщений: 12
По умолчанию

Цитата:
Сообщение от IFRSoff Посмотреть сообщение
вот так нужно?
тоже стало интересно. Можешь рассказать как так сделать?
knahrn вне форума
Старый 12.05.2009, 06:57   #5
IFRSoff
Форумчанин
 
Аватар для IFRSoff
 
Регистрация: 23.02.2009
Сообщений: 306
По умолчанию

Это простой код. Его можно увидеть нажав в Excel Alt+F11 или правой кнопкой мыши на ярлычке листа Исходный текст. Этот код необходимо скопировать в твой файл, на лист с таблицей (правой кномкой мыши на ярлычке листа Исходный текст) и переделать под структуру таблицы. Предварительно добавив Textbox.
Код:
Dim a_text As String

Private Sub TextBox1_Change()
If TextBox1.Value = "" Then
    Selection.AutoFilter Field:=2
Else
    a_text = "*" & TextBox1.Text & "*"
    Selection.AutoFilter Field:=2, Criteria1:=a_text, Operator:=xlAnd
End If
End Sub
Лень - двигатель прогресса!

Последний раз редактировалось IFRSoff; 12.05.2009 в 17:42.
IFRSoff вне форума
Старый 13.05.2009, 03:38   #6
knahrn
Пользователь
 
Регистрация: 08.05.2009
Сообщений: 12
По умолчанию

Цитата:
Сообщение от IFRSoff Посмотреть сообщение
Это простой код. Его можно увидеть нажав в Excel Alt+F11[/CODE]
Программировал последний раз еще в школе, буду потихоньку осваивать заново.
Еще раз спасибо.
knahrn вне форума
Старый 13.05.2009, 04:39   #7
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Для предотвращения возможной ошибки, я бы добавил проверку: включен ли режим автофильтра?
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 15.05.2009, 12:26   #8
vostok
Форумчанин
 
Регистрация: 29.04.2009
Сообщений: 119
По умолчанию

для IFRSoff, очень заинтересовался Вашим решением поиска http://www.programmersforum.ru/attac...9&d=1241782057, мне в работе тоже нужен такой поиск, и этот меня устроил, единственно, хочу спросить, а нельзя добавить еще на этом же листе поиск по коду? Пусть будут 2 окна ввода (кстати, как их сделать крупнее?) Ну и, простите за наглость, еще иногда надо быстро найти товар по цене, реально? Пусть будут 3 окошка ввода. Свой файл прикрепляю. Очень жду ответа, спасибо заранее.
Вложения
Тип файла: rar Поиск.rar (12.3 Кб, 66 просмотров)
vostok вне форума
Старый 15.05.2009, 13:34   #9
ZORRO2005
Форумчанин
 
Аватар для ZORRO2005
 
Регистрация: 26.11.2006
Сообщений: 584
По умолчанию

Фильтр работает по принципу "Содержит".
Но "Содержит" работает только с текстом.
Посоветуйте,какой код написать для числового поля.
ZORRO2005 вне форума
Старый 15.05.2009, 13:48   #10
vostok
Форумчанин
 
Регистрация: 29.04.2009
Сообщений: 119
По умолчанию

кстати, у меня коды пишутся в текстовом именно формате ячеек, (чтобы виделись нули)т.е. это текст, что дальше?
vostok вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
поиск red-serg Помощь студентам 1 09.01.2009 22:20
Поиск Witaliy Общие вопросы Delphi 1 01.05.2008 18:42
ПОИСК В БД HOMER БД в Delphi 2 20.12.2007 21:41
Поиск Andr Microsoft Office Excel 2 18.07.2007 11:49
поиск Lonix Общие вопросы Delphi 2 04.04.2007 01:59