Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Excel, применение фильтров / 6 сообщений из 6, страница 1 из 1
21.11.2003, 09:01
    #32330932
chkalov
chkalov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel, применение фильтров
Что-то не могу разобраться как программно установить фильтр на колонку и применить его....

примрно так

Dim UColumn, UFiter
UColumn = Worksheets("Лист1").Range("H14").Value
UFilter = Worksheets("Лист1").Range("F15").Value
Worksheets("Лист2").Range(UColumn).AutoFilter field:=3, Criteria1:=UFilter, VisibleDropDown:=False

На последней команде вылетает ошибка
Application-defined or object-defined error

Что, ге и как я забыл определить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.11.2003, 10:47
    #32331094
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel, применение фильтров
Что, ге и как я забыл определить
Для начала - Option Explicit.
Это помогло бы тебе семантически уточнить смысл переменных UColumn, UFiter .
Синтаксис верный (тип Variant), а семантика хромает:
для себя не прояснил, значение ( Value ) какого типа
ты ожидаешь (ещё на этапе кодирования) получить во втором операторе.
И текстовые комментарии были бы нелишни...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.11.2003, 11:32
    #32331165
chkalov
chkalov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel, применение фильтров
Как обычно, я уже ответил сам на свой вопрос:)
И тут же возник другой:
Как посчитать или где находится свойство, содержащее количество отображаемых строк (после фильтра), и как простейшим образом организовать цикл по отобранным записям?

Заранее благодарен
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.11.2003, 14:13
    #32331480
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel, применение фильтров
Range Property (AutoFilter Object)
(нашёл только сейчас, не испытал.
Раньше просто перебирал диапазон и считал видимые строки).
Испытаешь, поделись.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.11.2003, 09:15
    #32332066
chkalov
chkalov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel, применение фильтров
Я тоже потыкался с этим свойством... Возвращает количество строк .Range.Rows.Count и количество столбцов .Range.Columns.Count использованных в документе до первой пустой строки и пустого столбца
(причем независимо от применяемого фильтра, кажеться :( )
А как помечаются отображаемые после фильтра строки, в каком свойстве?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.11.2003, 15:27
    #32332363
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel, применение фильтров
Раньше просто перебирал диапазон и считал видимые строки)
Код: plaintext
1.
2.
3.
4.
5.
    For i = AreaBegin +  1  To nr
        If Rows(i).Hidden = False Then
'           Do something
        End If
    Next i
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Excel, применение фильтров / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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