Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Сравнение значений в диапазоне с объединенными ячейками
 
#1
19.07.2015 23:49:29
Доброго времени суток. В общем такая ситуация, есть три столбца, в первом значения внесены в каждой ячейке, второй столбец может быть заполнен через строку, в третьем необходим итог. Если подробнее: необходимо сравнить значение объединенной ячейки (B1 B2), в которой стоит цифра 2 с каждой ячейкой из диапазона А1:А3 до непустой ячейки В3 (т.е. с А1 и А2) и вывести результат в ячейку С1 (если A1<B1 и А2 < В1, то "М", если A1<B1 и А2 > В1 "Н") посредством стандартных формул без использования VBA и использования дополнительных строк и ячеек. Возможна ли такая реализация или проще не ломать голову над этой задачей?
АBC
112Н
23Н
345М
Прошу прощения, забыл про пример
Изменено: DeLakrua - 20.07.2015 00:24:23
 
 
 
#2
19.07.2015 23:50:46
У Вас нет файлов для примера?
 
 
 
#3
20.07.2015 21:41:33
DeLakrua, во-первых, Ваш пример не соответствует описанию, а во-вторых в реальном файле объединенные ячейки тоже будут случайным образом перемежаться "одиночными"?
Изменено: МВТ - 20.07.2015 21:41:53
 
 
 
#4
20.07.2015 21:54:17
да, в общем необходимо сравнение объединенной ячейки с ячейками правее, которые соответствую области объединения
 
 
 
#5
20.07.2015 22:17:39
Я к тому, что стандартными функциями не очень удобно вычислять объединенная ячейка или нет. Можно проверять не является ли следующая строка в данном столбце пустой, но мне кажется, с VBA будет проще
UPD проверяйте
Код
=ЕСЛИ(B1="";"";ЕСЛИ(И(СМЕЩ(B1;1;;;)="";A1<>"");ЕСЛИ(И(A1<B1;A2<B1);"М";ЕСЛИ(И(A1<B1;A2>B1);"Н";""));ЕСЛИ(B1>A1;"М";"Н")))
Изменено: МВТ - 20.07.2015 22:55:30
 
 
 
#6
20.07.2015 22:57:13
формулами в принципе значения подбить в объединенной ячейке не проблема, через функцию "ПРОСМОТР", но дальше не хватает фантазии, поскольку общее значение объединенной ячейки будет "М" не зависимо от того, что нижние значения будут "Н"
 
 
 
#7
20.07.2015 22:59:15
DeLakrua, Вы мою формулу проверили?
 
 
 
#8
20.07.2015 23:10:54
посмотрел в принципе работает, единственное, для трех объединенных ячеек формула увеличится почти на порядок. а есть ли вариант найти последнюю пустую ячейку перед последующей непустой и на том уровне сверить числа?
 
 
 
#9
20.07.2015 23:14:30
DeLakrua, формула написана по Вашему примеру, про возможность объединения более 2-х ячеек Вы не писали. Опять попробую посоветовать делать через VBA
 
 
 
#10
20.07.2015 23:16:55
У меня вот такая формула массива получилось
Код
=ЕСЛИ(B1="";"";ЕСЛИ(И(СМЕЩ(A1;;;ПОИСКПОЗ(ИСТИНА;B2:B999<>"";))<B1);"M";"H"))
По сравнению с формулой МВТ она требует, чтобы после списка в ст. В была непустая ячейка. Но число просматриваемых ячеек, соответствующих объединенной, практически неограничено (999).
 
 
 
#11
20.07.2015 23:27:34
Посмотрите варианты, может что понравится. Ячейка в столбце В ниже таблицы должна быть не пустой.
Код
=ЕСЛИ(B2="";C2;ЕСЛИ(МАКС(ИНДЕКС($A$1:A1;ПОИСКПОЗ(9^9;$B$1:B1;1)):ИНДЕКС($A$1:A1;СТРОКА()))<ИНДЕКС($B$1:B1;ПОИСКПОЗ(9^9;$B$1:B1;1));"М";"Н"))
Поторопился. Варианты не правильные, но убирать не буду, может кого на правильную мысль наведет.
Изменил формулу файл тоже. Длинновата формула получилась. Вроде правильная, проверяйте.
Изменено: gling - 20.07.2015 23:50:07
 
 
 
#12
20.07.2015 23:39:15
Вариация:
=ЕСЛИ(B3="";"";СИМВОЛ(205-(A2<ИНДЕКС($B$1:B2;ПОИСКПОЗ(9^9;$B$1:B2)))))
 
 
 
#13
20.07.2015 23:52:31
Вот такая UDF получилась
Код
Function ОбъединеннаяЯчейка(Ячейка As Range) As String
If Ячейка = "" Then Exit Function
Dim Maxi
With Ячейка.MergeArea
    If Ячейка.MergeCells Then
        Maxi = Application.WorksheetFunction.Max(.Offset(, -1).Resize(.Rows.Count))
    Else: Maxi = .Offset(, -1)
    End If
End With
If Ячейка > Maxi Then ОбъединеннаяЯчейка = "М" Else ОбъединеннаяЯчейка = "Н"
End Function
 
 
 
#14
21.07.2015 07:19:16
спасибо всем, что откликнулись, gling Ваш вариант лучше всего мне подходит
 
 
 
Страницы: 1
Читают тему
Наверх