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

Вход

Регистрация

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

 

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

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Подсчет уникальных значений по месяцам (Формулы/Formulas)
Подсчет уникальных значений по месяцам
Чиков Дата: Пятница, 26.06.2015, 14:16 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день!

Форумчане помогите написать формулу, которая поможет подсчитать уникальные значения помесячно, файл с примером прикреплен.

Заранее спасибо.
К сообщению приложен файл: 4841914.xlsx (10.7 Kb)
 
Ответить
СообщениеДобрый день!

Форумчане помогите написать формулу, которая поможет подсчитать уникальные значения помесячно, файл с примером прикреплен.

Заранее спасибо.
Автор - Чиков
Дата добавления - 26.06.2015 в 14:16
vikttur Дата: Пятница, 26.06.2015, 14:19 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Репутация: 526 ±
Замечаний: 0% ±

Вводится, как формула массива:
Код
=СЧЁТ(1/ЧАСТОТА(ЕСЛИ($A$1:$A$15=E3;ПОИСКПОЗ($B$1:$B$15;$B$1:$B$15;));СТРОКА($B$1:$B$15)))


Сообщение отредактировал vikttur - Пятница, 26.06.2015, 14:20
 
Ответить
СообщениеВводится, как формула массива:
Код
=СЧЁТ(1/ЧАСТОТА(ЕСЛИ($A$1:$A$15=E3;ПОИСКПОЗ($B$1:$B$15;$B$1:$B$15;));СТРОКА($B$1:$B$15)))
Автор - vikttur
Дата добавления - 26.06.2015 в 14:19
Чиков Дата: Пятница, 26.06.2015, 14:27 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
спасибо, пробую подставить формулу в таблицу, пока не получается, если не трудно, заполните мой файл и прикрепите, буду разбираться по работающим формулам.
спасибо еще раз.
 
Ответить
Сообщениеспасибо, пробую подставить формулу в таблицу, пока не получается, если не трудно, заполните мой файл и прикрепите, буду разбираться по работающим формулам.
спасибо еще раз.
Автор - Чиков
Дата добавления - 26.06.2015 в 14:27
vikttur Дата: Пятница, 26.06.2015, 14:31 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Репутация: 526 ±
Замечаний: 0% ±

Формула массива вводится сочетанием трех клавиш. Не ленитесь, пользуйтесь поиском.
 
Ответить
СообщениеФормула массива вводится сочетанием трех клавиш. Не ленитесь, пользуйтесь поиском.
Автор - vikttur
Дата добавления - 26.06.2015 в 14:31
Чиков Дата: Пятница, 26.06.2015, 14:54 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Я вставил Вашу формулу под январь, так как в формуле ссылка на январь, формула выдает 1 уникальное значение, что не соответствует истине. прикрепляю файл
,
К сообщению приложен файл: 4811013.xlsx (11.1 Kb)
 
Ответить
СообщениеЯ вставил Вашу формулу под январь, так как в формуле ссылка на январь, формула выдает 1 уникальное значение, что не соответствует истине. прикрепляю файл
,
Автор - Чиков
Дата добавления - 26.06.2015 в 14:54
vikttur Дата: Пятница, 26.06.2015, 14:59 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2941
Репутация: 526 ±
Замечаний: 0% ±

Ай-яй-яй... В двух моих сообщениях написано словосочетание "формула массива" и просьба не лениться, воспользоваться поиском и почитать, как вводится формула массива.
 
Ответить
СообщениеАй-яй-яй... В двух моих сообщениях написано словосочетание "формула массива" и просьба не лениться, воспользоваться поиском и почитать, как вводится формула массива.
Автор - vikttur
Дата добавления - 26.06.2015 в 14:59
Чиков Дата: Пятница, 26.06.2015, 17:16 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
спасибо, все работает. Сейчас буду адаптировать в свой файл.
 
Ответить
Сообщениеспасибо, все работает. Сейчас буду адаптировать в свой файл.
Автор - Чиков
Дата добавления - 26.06.2015 в 17:16
_Boroda_ Дата: Суббота, 27.06.2015, 03:36 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 16890
Репутация: 6611 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Еще 2 варианта. Тоже формулы массива
Код
=СУММ(--ЕСЛИОШИБКА(ПОИСКПОЗ(E3&$B1:$B15;$A1:$A15&$B1:$B15;0)=СТРОКА(B1:B15);))

Код
=СУММ(--ЕСЛИ($A1:$A15=E3;ПОИСКПОЗ($A1:$A15&$B1:$B15;$A1:$A15&$B1:$B15;0)=СТРОКА(B1:B15)))
К сообщению приложен файл: 4811013_1.xlsx (11.8 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеЕще 2 варианта. Тоже формулы массива
Код
=СУММ(--ЕСЛИОШИБКА(ПОИСКПОЗ(E3&$B1:$B15;$A1:$A15&$B1:$B15;0)=СТРОКА(B1:B15);))

Код
=СУММ(--ЕСЛИ($A1:$A15=E3;ПОИСКПОЗ($A1:$A15&$B1:$B15;$A1:$A15&$B1:$B15;0)=СТРОКА(B1:B15)))
Автор - _Boroda_
Дата добавления - 27.06.2015 в 03:36
Чиков Дата: Суббота, 27.06.2015, 20:06 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Всем большое спасибо.
 
Ответить
СообщениеВсем большое спасибо.
Автор - Чиков
Дата добавления - 27.06.2015 в 20:06
sv2014 Дата: Понедельник, 29.06.2015, 20:46 | Сообщение № 10
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация: 61 ±
Замечаний: 0% ±

Excel 2013
Чиков, высылаю вам макрос

[vba]
Код
Sub incert_formulas1()
Dim i%, j%, k%
Dim V1(2 To 12) As String, V2(2 To 12) As Integer
j = Range("A1").End(xlDown).Row
For k = 2 To 12
    V1(k) = Range("E3:P3").Cells(k).Value
    V2(k) = Range("A1:A" & j).Find(V1(k)).Row
    Range("E2:P2").Cells(k).Value = V2(k)
Next k
For k = 1 To 10
Range("F4:O4").Cells(k).FormulaArray = _
"=SUM(1/COUNTIF(B" & V2(k + 1) & ":B" & V2(k + 2) - 1 & ",B" & V2(k + 1) & ":B" & V2(k + 2) - 1 & "))"
Next k
Range("E4").FormulaArray = _
"=SUM(1/COUNTIF(B1:B" & V2(2) & ",B1:B" & V2(2) & "))"
Range("P4").FormulaArray = _
"=SUM(1/COUNTIF(B" & V2(12) & ":B" & j & ",B" & V2(12) & ":B" & j & "))"
End Sub
[/vba]
 
Ответить
СообщениеЧиков, высылаю вам макрос

[vba]
Код
Sub incert_formulas1()
Dim i%, j%, k%
Dim V1(2 To 12) As String, V2(2 To 12) As Integer
j = Range("A1").End(xlDown).Row
For k = 2 To 12
    V1(k) = Range("E3:P3").Cells(k).Value
    V2(k) = Range("A1:A" & j).Find(V1(k)).Row
    Range("E2:P2").Cells(k).Value = V2(k)
Next k
For k = 1 To 10
Range("F4:O4").Cells(k).FormulaArray = _
"=SUM(1/COUNTIF(B" & V2(k + 1) & ":B" & V2(k + 2) - 1 & ",B" & V2(k + 1) & ":B" & V2(k + 2) - 1 & "))"
Next k
Range("E4").FormulaArray = _
"=SUM(1/COUNTIF(B1:B" & V2(2) & ",B1:B" & V2(2) & "))"
Range("P4").FormulaArray = _
"=SUM(1/COUNTIF(B" & V2(12) & ":B" & j & ",B" & V2(12) & ":B" & j & "))"
End Sub
[/vba]
Автор - sv2014
Дата добавления - 29.06.2015 в 20:46
sv2014 Дата: Понедельник, 29.06.2015, 21:39 | Сообщение № 11
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация: 61 ±
Замечаний: 0% ±

Excel 2013
Чиков,
посылаю вам файл пример
К сообщению приложен файл: example_29_06_2.xlsm (18.8 Kb)
 
Ответить
СообщениеЧиков,
посылаю вам файл пример
Автор - sv2014
Дата добавления - 29.06.2015 в 21:39
Чиков Дата: Среда, 01.07.2015, 23:11 | Сообщение № 12
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
спасибо!

но я изначально делал ставку только на формулу, но думаю что обсуждаемая тема пригодиться не только мне, но и многим форумчанам.

Всем спасибо за внимание...
 
Ответить
Сообщениеспасибо!

но я изначально делал ставку только на формулу, но думаю что обсуждаемая тема пригодиться не только мне, но и многим форумчанам.

Всем спасибо за внимание...
Автор - Чиков
Дата добавления - 01.07.2015 в 23:11
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Подсчет уникальных значений по месяцам (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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