gling, хотела привязаться к дате и уникальному значению в столбце "А"  к примеру 1Елена1. Стоимостной инжинирингНеделя 15 (15.04.2025) и неделя.
Что бы поиск выполнялся и вертикально и горизонтально.
Елена Стоимостной инжиниринг метрика 1 дата такая-то и подтягивается значение такое-то

gling, спасибо, получилось, я просто думала через уникальные как-то подтянуть
в столбце а пыталась взять уникально и с датой связать

Добрый вечер, мучаюсь уже давно, не понимаю почему не подтягивается, хотя диапазон расширяла:
=ИНДЕКС(Инжцентр!$C$1:$AH$69;СТРОКА();ПОИСКПОЗ($AF$1;Инжцентр!$D$1:$AH$1)+1)
через массив применяла формулу, я с листа "Инжцентр" хотела сделать "Dashboard неделя", но при добавлении новой недели все слетело.....
Помогите пожалуйста, не понимаю, как осуществить  
В столбцах А и В постаралась сделать уникальные имена
Название темы ни о чем, мне написал модератор, поменяла

Добрый вечер, мучаюсь уже давно, не понимаю почему не подтягивается, хотя диапазон расширяла:
=ИНДЕКС(Инжцентр!$C$1:$AH$69;СТРОКА();ПОИСКПОЗ($AF$1;Инжцентр!$D$1:$AH$1)+1)
через массив применяла формулу, я с листа "Инжцентр" хотела сделать "Dashboard неделя", но при добавлении новой недели все слетело.....
Помогите пожалуйста, не понимаю, как осуществить  

Vik_tor, Гений! Спасибо!)

Vik_tor, Спасибо!
Но что-то не так в логике формулы, может надо что-то еще "приклеить" к ней?

Vik_tor, а как на две соседние ячейки прописать, не пойму что-то, что бы еще подтянуть "Значение" и "% достижения".
Фиксирую диапазоны и все равно что-то не находит  

Добрый день! Искала по форуму, но не нашла точного ответа как это реализовать.
В моей таблице есть лист Инжцентр, я пыталась там создать уникальные сцепки для "индекспоиспоз",
дальше создала лист "Dashboard неделя" и хочу в него подтягивать только актуальные данные по недели.
На листе "Dashboard неделя" в ячейке AF1 создала выпадающий список, что бы можно было выбирать неделю и подтягивались данные с листа "Инжцентр"
Помогите пожалуйста реализовать данный функционал.

ВовавВова, Спасибо! Очень красиво, но я еще больше запуталась)
Я думала можно формулой фильтр какой-то)  

Здравствуйте, подскажите пожалуйста, как на лист DashBoard подтянуть информацию с листа "Нормы"
Не понимаю как это осуществить.
Как я вижу смторит что в столбце N п/п и смотрит какая профессия и на основание эт ого подтягивает весь блок.
Еще сделала несколько сцепок на листе Для_заполнения.
Еще думала может какой-то последовательный фильтр можно сделать, если "Исполнительный аппарат СПБ" то предлагает только профессии в этом блоке, но опять же не тот уровень в Excel.
Как сделать не понимаю
Спасибо за помощь, сильно не ругайте)  

Sanja, Лучший ответ, который решил задачу моментально

andypetr, суть в том что формулы на листах тренинг и консультации в сумме выдают большую сумму чем на листах свод и ведом. Это связанно тем что в ячейках где под датами только один вид услуг консультация к примеру они уже неправильно считают  

artemkau88, с него формируется сама сводная таблица, "свод"

artemkau88, После вставки формул webley, считаю общее кол-во, по листам оно не совпадает с сводом, кол-во в своде= кол-ву в ведом (409), по листам тренинга и консультаций больше. Формула следает на тех ячейках где указан только один вид услуг или только консультация или только тренинг  

R091n, к сожалению кол-во не совпадает, даты 26,29 не имеют соседних пустых ячеек. По этому неправильно подтягивает

итоги по сформированным таблицам совпадают со сводной

andypetr, Добрый день почему-то теперь не совпадает кол-во в ведомости и сводной 409, а уменя 433 по двум листам 🤷‍♂️

я написал вот такую формулу, но в ней нет привязки к ФИО и номеру:

Дорогие форумчане, добрый день! Уже битый час ищу решение данного вопроса и не могу понять как осуществить.
В файле есть лист "свод" собственно само наполнение откуда нужно вытянуть информацию.
На лист консультации соответсвенно нужно вытянуть информацию по датам когда были консультации в связке с ФИО и индивидуальным номером
Аналогичная ситуация на листе с тренингами.
Пробовал индексом на пересечении не получилось..
Версия Excel 2019. Помогите, пожалуйста!
Заранее благодарен!

P.S. Странно, вроде решение простое должно быть, пробовал Индекс поискпоз по горизонтали и вертикали, но все равно не получается...  

Мертвый, прошлогодний вопрос....

Добрый вечер! Интересует информация есть-ли аналог CellBIM for Excel, жизненно необходимо, триал подходит к концу. Есть-ли альтернативные решения или кто-нибудь владеет информацией по активации, буду благодарен за любой совет.

Sanja, Спасибо!

Благодарю! Работает!  
Огромное спасибо!

Да в столбце с фамилиями считает ячейки: 5 ячеек (три с фамилиями, две пустые) UDF видит 4ре значения

Знаешь, что заметил, считает уникальным и пустые ячейки, можно как-то поправить?)
Я что-то не понял...

Скрытый текст

Function СЧЕТУНИКЕСЛИМН(rngU As Range, ParamArray Conditions()) As Long 'rngU - диапазон поиска уникальных значений, обязательный 'Conditions() - массив ПАР значений вида: Диапазон_Условий1;Условие1;Диапазон_Условий2;Условие2...Диапазон_УсловийN;УсловиеN, обязательный '               должен иметь хотя-бы одну пару значений. 'Все диапазоны должны состоять из одного столбца и иметь равное кол-во строк Dim cl() Dim arrFlag() As Boolean Dim I&, J& Dim rngCond() On Error Resume Next cl = rngU.Value With CreateObject("Scripting.Dictionary")    For I = 1 To UBound(cl)        ReDim arrFlag(Int(UBound(Conditions) / 2))        For J = LBound(Conditions) To UBound(Conditions) Step 2            If IsObject(Conditions(J)) Then rngCond = Conditions(J).Value            If IsNumeric(rngCond(I, 1)) Then                If Application.Evaluate(Replace(rngCond(I, 1), ",", ".") & Conditions(J + 1)) Then arrFlag(Int(J / 2)) = True            Else                If rngCond(I, 1) Like Conditions(J + 1) Then arrFlag(Int(J / 2)) = True            End If        Next        If WorksheetFunction.And(arrFlag) = True Then            varTemp = .Item(cl(I, 1))        End If    Next    СЧЕТУНИКЕСЛИМН = .Count End With End Function

Спасибо огромное!

Помогло, благодарю

CountByFontColor (диапазон, код_цвета) – считает ячейки с заданным цветом шрифта.
SumByColor (диапазон, код_цвета) – вычисляет сумму ячеек с заданным цветом заливки.
SumByFontColor (диапазон, код_цвета) – вычисляет сумму ячеек с заданным цветом шрифта.
CellColor (ячейка) — узнать код цвета заливки ячейки
CellFontColor (ячейка) — узнать код цвета ШРИТФА

Скрытый текст

Function GetCellColor(xlRange As Range)    Dim indRow, indColumn As Long    Dim arResults()    Application.Volatile    If xlRange Is Nothing Then        Set xlRange = Application.ThisCell    End If    If xlRange.Count > 1 Then      ReDim arResults(1 To xlRange.Rows.Count, 1 To xlRange.Columns.Count)       For indRow = 1 To xlRange.Rows.Count         For indColumn = 1 To xlRange.Columns.Count           arResults(indRow, indColumn) = xlRange(indRow, indColumn).Interior.Color         Next       Next     GetCellColor = arResults    Else     GetCellColor = xlRange.Interior.Color    End If End Function Function GetCellFontColor(xlRange As Range)    Dim indRow, indColumn As Long    Dim arResults()    Application.Volatile    If xlRange Is Nothing Then        Set xlRange = Application.ThisCell    End If    If xlRange.Count > 1 Then      ReDim arResults(1 To xlRange.Rows.Count, 1 To xlRange.Columns.Count)       For indRow = 1 To xlRange.Rows.Count         For indColumn = 1 To xlRange.Columns.Count           arResults(indRow, indColumn) = xlRange(indRow, indColumn).Font.Color         Next       Next     GetCellFontColor = arResults    Else     GetCellFontColor = xlRange.Font.Color    End If End Function Function CountCellsByColor(rData As Range, cellRefColor As Range) As Long    Dim indRefColor As Long    Dim cellCurrent As Range    Dim cntRes As Long    Application.Volatile    cntRes = 0    indRefColor = cellRefColor.Cells(1, 1).Interior.Color    For Each cellCurrent In rData        If indRefColor = cellCurrent.Interior.Color Then            cntRes = cntRes + 1        End If    Next cellCurrent    CountCellsByColor = cntRes End Function Function SumCellsByColor(rData As Range, cellRefColor As Range)    Dim indRefColor As Long    Dim cellCurrent As Range    Dim sumRes    Application.Volatile    sumRes = 0    indRefColor = cellRefColor.Cells(1, 1).Interior.Color    For Each cellCurrent In rData        If indRefColor = cellCurrent.Interior.Color Then            sumRes = WorksheetFunction.Sum(cellCurrent, sumRes)        End If    Next cellCurrent    SumCellsByColor = sumRes End Function Function CountCellsByFontColor(rData As Range, cellRefColor As Range) As Long    Dim indRefColor As Long    Dim cellCurrent As Range    Dim cntRes As Long    Application.Volatile    cntRes = 0    indRefColor = cellRefColor.Cells(1, 1).Font.Color    For Each cellCurrent In rData        If indRefColor = cellCurrent.Font.Color Then            cntRes = cntRes + 1        End If    Next cellCurrent    CountCellsByFontColor = cntRes End Function Function SumCellsByFontColor(rData As Range, cellRefColor As Range)    Dim indRefColor As Long    Dim cellCurrent As Range    Dim sumRes    Application.Volatile    sumRes = 0    indRefColor = cellRefColor.Cells(1, 1).Font.Color    For Each cellCurrent In rData        If indRefColor = cellCurrent.Font.Color Then            sumRes = WorksheetFunction.Sum(cellCurrent, sumRes)        End If    Next cellCurrent    SumCellsByFontColor = sumRes End Function

в сообщении выше я писал

Аксакалы, кто-нибудь нашел решение этой задачки?  

С макросом