В ячейках оставить большее значение

Страница 1 из 1 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин

Мир MS Excel » Вопросы и решения » Вопросы по Excel » В ячейках оставить большее значение (Формулы/Formulas)

Aimod

Дата: Пятница, 08.06.2018, 11:14 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 15

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Здравствуйте, уважаемые помогающие!
Пожалуйста, подскажите, как оставить в ячейках для ГВС бОльшее из значений в верхней строчке столбца В, а для ЦО бОльшее из значений в нижней строчке столбца В, учитывая, что некоторые ячейки столбца В содержат всего одну строчку, и в них тоже нужно оставить бОльшее из значений...?

К сообщению приложен файл: 6-.xlsx(26.4 Kb)

Ответить

alexa1965

Дата: Пятница, 08.06.2018, 11:50 | Сообщение № 2

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 100

Репутация: 3 ±

Замечаний: 0% ±

2003, 2010

А как понять что конкретное значение больше, посчитать математически? или какой то другой критерий?

Главное не быть балабастиком

Ответить

sboy

Дата: Пятница, 08.06.2018, 11:56 | Сообщение № 3

Группа: Друзья

Ранг: Старожил

Сообщений: 2105

Репутация: 604 ±

Замечаний: 0% ±

Excel 2010

Добрый день.
Вариант на Power Query

К сообщению приложен файл: 4574844.xlsx(56.6 Kb)

Ответить

Aimod

Дата: Пятница, 08.06.2018, 12:06 | Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 15

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Цитата alexa1965, 08.06.2018 в 11:50, в сообщении № 2 ()

А как понять что конкретное значение больше, посчитать математически? или какой то другой критерий?

Я не знаю, наверное математически.. Макрос бы я точно сохранил

sboy, Спасибо!

PS: Почему я не могу плюсануть репутацию помогающим? Сайт говорит, что форма заполнена неправильно, а как правильно заполнить?
PPS: О-о, спс! " Ураа, заработало!" (с)

Сообщение отредактировал Aimod - Пятница, 08.06.2018, 13:19

Ответить

abtextime

Дата: Пятница, 08.06.2018, 12:53 | Сообщение № 5

Группа: Проверенные

Ранг: Ветеран

Сообщений: 828

Репутация: 117 ±

Замечаний: 0% ±

Excel 2010

Код

=ЕСЛИ(A1="ГВС";MaxS(ЛЕВБ(B1;НАЙТИ(СИМВОЛ(10);B1)-1));ЕСЛИ(ПОДСТАВИТЬ(B1;СИМВОЛ(10);"")=B1;MaxS(B1);MaxS(ПРАВБ(B1;ДЛСТР(B1)-НАЙТИ(СИМВОЛ(10);B1)))))

UDF

[vba]

Код

Public Function MaxS(S As String) As Long
    Tail = Trim(S)
    If Right(Tail, 1) = Chr(10) Then Tail = Left(Tail, Len(Tail) - 1)
    Tail = Tail & "/"
    Do While Tail <> ""
        NextNum = CLng(Left(Tail, InStr(Tail, "/") - 1))
        Tail = Replace(Tail, CStr(NextNum) & "/", "")
        MaxS = Application.WorksheetFunction.Max(NextNum, MaxS)
    Loop
End Function

[/vba]

К сообщению приложен файл: 6-.xlsm(34.8 Kb)

Ответить

Aimod

Дата: Пятница, 08.06.2018, 13:17 | Сообщение № 6

Группа: Пользователи

Ранг: Новичок

Сообщений: 15

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

abtextime, спасибо!

Ответить

_Boroda_

Дата: Пятница, 08.06.2018, 22:17 | Сообщение № 7

Группа: Модераторы

Ранг: Местный житель

Сообщений: 13187

Репутация: 5422 ±

Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS

Просто формулой массива (вводится одновременным нажатием Контрл Шифт Ентер)

Код

=МАКС(ЕСЛИОШИБКА(--(ПСТР(ПОДСТАВИТЬ("/"&ЕСЛИОШИБКА(ЗАМЕНИТЬ(B1;ПОИСК(СИМВОЛ(10);B1)^(A1="ГВС");ЕСЛИ(A1="ЦО";ПОИСК(СИМВОЛ(10);B1);99););B1);"/";ПОВТОР(" ";99));99*СТРОКА($1:$8);99));))

К сообщению приложен файл: 6-1.xlsx(71.9 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по Excel » В ячейках оставить большее значение (Формулы/Formulas)

Страница 1 из 1
1