Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Количество строк, отобранных автофильтром / 2 сообщений из 2, страница 1 из 1
07.02.2006, 21:58:16
    #33529949
Elena Gadjieva
Elena Gadjieva
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Количество строк, отобранных автофильтром
Подскажите, каким образом можно узнать количество строк отобранных с помощью автофильтра?
Код: plaintext
1.
2.
3.
4.
 
 Dim MySheet as String
 Set rngActive = exlSheet.Range(CellFrom & ":" & CellTo) 
 rngActive.Select
 Selection.AutoFilter Field:= 1 , Criteria1:="=" & MySheet
Selection.Rows.COUNT возвращает разницу между количеством строк в заданном диапазоне и количеством отобранных фильтром строк.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2006, 23:15:23
    #33530025
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Количество строк, отобранных автофильтром
Код: plaintext
? rngActive.SpecialCells(xlCellTypeVisible).Rows.Count

И какой идиот учил вас использовать Select и Selection?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Количество строк, отобранных автофильтром / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 293ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2185278]:
 0ms
get settings:
 5ms
get forum list:
 10ms
check forum access:
 1ms
check topic access:
 1ms
track hit:
 46ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 22ms
get tp. blocked users:
 1ms
others: 200ms
total:  293ms
x
x
Закрыть


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