Работа с автофильтрами

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Анна
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 21.10.2003 (Вт) 10:50

Работа с автофильтрами

Сообщение Анна » 21.10.2003 (Вт) 10:59

Дело такое: надо организовать поиск фрагмента текста по всей книге в EXCEL. XP дает такую возможность, но не ищет по скрытым ячейкам. Значит надо снимать все автофильтры на листе - Отобразить все, но эта штука в менюшке просто неактивна, если и так все показано, а программным путем это вычленить я возможности не знаю. Подскажите, плз.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 21.10.2003 (Вт) 11:08

Способ первый:
Код: Выделить всё
Cells.EntireRow.Hidden = False

Способ второй:
Код: Выделить всё
Range("E3").AutoFilter
Range("E3").AutoFilter Field:=1, Criteria1:="..."
Range("E3").AutoFilter Field:=1
Range("E3").AutoFilter
Lasciate ogni speranza, voi ch'entrate.

Анна
Начинающий
Начинающий
 
Сообщения: 15
Зарегистрирован: 21.10.2003 (Вт) 10:50

Я уже нашла

Сообщение Анна » 21.10.2003 (Вт) 12:10

Неа, вот так красивее :)
If Worksheets(N).FilterMode = True Then Worksheets(N).ShowAllData


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 6

    TopList  
cron