ListBox и поиск в нем

[Aqil_f]

Как можно здесь искать не по 1-м словам, а по 2-м.
Например,если в текстбокс2 писать "Стандартная ерундовина" по буквам, тогда в листбокс найдется этот запис. А как искать по 2-му слову: "ерундовина" тоже по буквам?
И еще: как делать так что, если несколько таких записей, их можно было видеть подрять, один за другим?

[Aent]

Этот запис искать прост. Надо вводит в поле TextBox2 "* ер" и больше ничего делать ненад.
По 2-у вопросу: либо сортировать список - одинаковый запис подрять виден будет - либо пользоваться функцией Filter.

[The_Prist]

Сообщение от Aent

Этот запис искать прост. Надо вводит в поле TextBox2 "*ер" и больше ничего делать ненад.

Aent, позвольте подправлю по первому пункту: вводить лучше "* ер"(с пробелом после звезды), тогда точно только по второму слову будет искать.

[Aent]

The_Prist, да, конечно, пробел пропал при наборе текста. Поправил пост.

[Aqil_f]

Если не трудно покажите это на примере пожалуйста.

[Aqil_f]

Хотел 2-й вопрос решать с помощи фильтирации.

Selection.AutoFilter Field:=2, Criteria1:=Trim(UserForm1.TextBox2.Text)

На листе фильтирированные записи видно, но в Listbox-e не видно. Как это делать так что фильтирированные записи (отфильтирированные записи тоже) в Listbox-e тоже видно было?

[Aent]

1) Фильтр листа к RowSource отношения не имеет. Максимум что можно сделать если идти по этому пути - использовать расширенный фильтр - получать отфильтрованные данные в другом месте листа и переназначать
для листбокса источник данных. Но проще динамически перестраивать список.
2) К сожалению, при формировании списка с помощью метода .additem
невозможно задать заголовки столбцов. Поэтому я отрисовал их на форме
с помощью labels.
3) Добавил на форму кнопку по которой происходит фильтрация по продукту. Код очевиден.
4) Разумеется меняется и код обработчика клика для списка.