Страницы: 1
RSS
Значение фильтра в отдельную ячейку
 
Добрый день форумчане. Подскажите как вывести в ячейку значение по которому работает фильтр. Понимаю что есть сложные условия фильтра, мне надо самый простой как я указал в примере. Поиском не смог найти в старом форуме ссылки не открываются.
 
Смотрим здесь
 
Или тутова
:)
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
А если будет отмечено более 2-х значений, то надо будет перебирать массив:

Код
Sub moreThan2criteria()

    Dim wks As Worksheet
    Dim arr As Variant
    Dim i   As Integer
    
    Set wks = Worksheets(1)
    
    arr = wks.AutoFilter.Filters(2).Criteria1
    
    For i = 1 To UBound(arr)
        Debug.Print arr(i)
    Next i
    
End Sub

=дым
=лимонад
=пар
 
Уважаемые форумчане, на старом форуме тему с ответом не нашёл. Ответ в этой теме не смог применить. Помогите, пожалуйста.

Есть в таблице столбец с датами. фильтрация будет выполняться по месяцам. Мне нужно в заголовке столбца или в любой произвольной ячейке получить через запятую или через пробел список месяцев, по которым выполняется фильтрация. Пример таблицы во вложении. Заранее благодарен.
 
.
 
Nic70y,спасибо за реализацию, но построение дополнительной табицы или матрицы не желательно. Может это можно сделать макросом?
Страницы: 1
Наверх