Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Подсчёт уникальных значений в умной таблице - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Подсчёт уникальных значений в умной таблице
Подсчёт уникальных значений в умной таблице
Yuraonline Дата: Суббота, 01.02.2020, 16:07 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 23
Репутация: 0 ±
Замечаний: 0% ±

Приветствую уважаемые форумчане! Нужно решить задачу, чтобы в умной таблице, в столбце «Комплект №» был подсчёт уникальных значений в итоговой строке, и подсчёт вёлся только не скрытых фильтром значений. То есть подсчёт уникальных значений менялся динамически, в зависимости от фильтрации.
К сообщению приложен файл: 0406576.xlsx(20.0 Kb)
 
Ответить
СообщениеПриветствую уважаемые форумчане! Нужно решить задачу, чтобы в умной таблице, в столбце «Комплект №» был подсчёт уникальных значений в итоговой строке, и подсчёт вёлся только не скрытых фильтром значений. То есть подсчёт уникальных значений менялся динамически, в зависимости от фильтрации.

Автор - Yuraonline
Дата добавления - 01.02.2020 в 16:07
Pelena Дата: Суббота, 01.02.2020, 17:13 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16499
Репутация: 3566 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Подсчёт - это сумма или количество?
Сколько должно получиться в примере?


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеПодсчёт - это сумма или количество?
Сколько должно получиться в примере?

Автор - Pelena
Дата добавления - 01.02.2020 в 17:13
Yuraonline Дата: Суббота, 01.02.2020, 17:25 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 23
Репутация: 0 ±
Замечаний: 0% ±

Количество уникальных значений. Если например, поставить фильтр пад 800, то в столбце «Комплект №» должно быть количество значений 6.


Сообщение отредактировал Yuraonline - Суббота, 01.02.2020, 17:29
 
Ответить
СообщениеКоличество уникальных значений. Если например, поставить фильтр пад 800, то в столбце «Комплект №» должно быть количество значений 6.

Автор - Yuraonline
Дата добавления - 01.02.2020 в 17:25
parovoznik Дата: Суббота, 01.02.2020, 22:20 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 380
Репутация: 20 ±
Замечаний: 0% ±

Excel 2007
Yuraonline, может через сводную
К сообщению приложен файл: 3225065.xlsx(25.8 Kb)
 
Ответить
СообщениеYuraonline, может через сводную

Автор - parovoznik
Дата добавления - 01.02.2020 в 22:20
anvg Дата: Суббота, 01.02.2020, 23:02 | Сообщение № 5
Группа: Друзья
Ранг: Ветеран
Сообщений: 553
Репутация: 250 ±
Замечаний: 0% ±

2016, 365
Доброе время суток
Можно Udf-функцию задействовать
[vba]
Код
Public Function UniqueVisibleCount(ByVal TableFieldColumn As Range)
    Dim pCell As Range, pDict As Object
    Set pDict = CreateObject("Scripting.Dictionary")
    For Each pCell In TableFieldColumn
        If Not pCell.EntireRow.Hidden Then pDict(pCell.Value) = 0
    Next
    UniqueVisibleCount = pDict.Count
End Function
[/vba]
=UniqueVisibleCount([М2])
 
Ответить
СообщениеДоброе время суток
Можно Udf-функцию задействовать
[vba]
Код
Public Function UniqueVisibleCount(ByVal TableFieldColumn As Range)
    Dim pCell As Range, pDict As Object
    Set pDict = CreateObject("Scripting.Dictionary")
    For Each pCell In TableFieldColumn
        If Not pCell.EntireRow.Hidden Then pDict(pCell.Value) = 0
    Next
    UniqueVisibleCount = pDict.Count
End Function
[/vba]
=UniqueVisibleCount([М2])

Автор - anvg
Дата добавления - 01.02.2020 в 23:02
Yuraonline Дата: Воскресенье, 02.02.2020, 07:41 | Сообщение № 6
Группа: Пользователи
Ранг: Новичок
Сообщений: 23
Репутация: 0 ±
Замечаний: 0% ±

может через сводную

Через сводную неудобно работать с этими данными.
 
Ответить
Сообщение
может через сводную

Через сводную неудобно работать с этими данными.

Автор - Yuraonline
Дата добавления - 02.02.2020 в 07:41
Yuraonline Дата: Воскресенье, 02.02.2020, 07:45 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 23
Репутация: 0 ±
Замечаний: 0% ±


Доброе время суток
Можно Udf-функцию задействовать

А как это реализовать практически? Моих знаний Excel хватает только, на несложные формулы.


Сообщение отредактировал Yuraonline - Воскресенье, 02.02.2020, 07:46
 
Ответить
Сообщение

Доброе время суток
Можно Udf-функцию задействовать

А как это реализовать практически? Моих знаний Excel хватает только, на несложные формулы.

Автор - Yuraonline
Дата добавления - 02.02.2020 в 07:45
anvg Дата: Воскресенье, 02.02.2020, 09:54 | Сообщение № 8
Группа: Друзья
Ранг: Ветеран
Сообщений: 553
Репутация: 250 ±
Замечаний: 0% ±

2016, 365
А как это реализовать практически?

Изучить, например Создание макросов и пользовательских функций на VBA. И на этом форуме тоже есть материалы. А уж сколько их в интернете и книгах :)
 
Ответить
Сообщение
А как это реализовать практически?

Изучить, например Создание макросов и пользовательских функций на VBA. И на этом форуме тоже есть материалы. А уж сколько их в интернете и книгах :)

Автор - anvg
Дата добавления - 02.02.2020 в 09:54
Pelena Дата: Воскресенье, 02.02.2020, 11:41 | Сообщение № 9
Группа: Админы
Ранг: Местный житель
Сообщений: 16499
Репутация: 3566 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Формулой тоже можно
[vba]
Код
=СУММПРОИЗВ(ПРОМЕЖУТОЧНЫЕ.ИТОГИ(3;СМЕЩ(Таблица1[[#Заголовки];[Комплект №]];СТРОКА([Комплект №])-1;0))*(ПОИСКПОЗ([Грит пада]&[Комплект №];[Грит пада]&[Комплект №];0)=СТРОКА([Комплект №])-1))
[/vba]
К сообщению приложен файл: 8948811.xlsx(21.2 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеФормулой тоже можно
[vba]
Код
=СУММПРОИЗВ(ПРОМЕЖУТОЧНЫЕ.ИТОГИ(3;СМЕЩ(Таблица1[[#Заголовки];[Комплект №]];СТРОКА([Комплект №])-1;0))*(ПОИСКПОЗ([Грит пада]&[Комплект №];[Грит пада]&[Комплект №];0)=СТРОКА([Комплект №])-1))
[/vba]

Автор - Pelena
Дата добавления - 02.02.2020 в 11:41
Yuraonline Дата: Воскресенье, 02.02.2020, 20:21 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 23
Репутация: 0 ±
Замечаний: 0% ±

Pelena, это то, что нужно! Спасибо!
 
Ответить
СообщениеPelena, это то, что нужно! Спасибо!

Автор - Yuraonline
Дата добавления - 02.02.2020 в 20:21
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Подсчёт уникальных значений в умной таблице
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2020 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!