Матрицы

[Hugo121]

Да, получил.
Теперь уже 8.5 кодов, если эти считать за 1.5

Чуть раньше поступил восьмой вариант от IgorGo (в смысле восьмой всего, а не восьмой от IgorGo)
Теперь и я понял из этого кода, как что куда
Просто перебором всех - вот пара строк:

...
If cl < mi Then Set mi = cl
...
If ma Is Nothing Then Set ma = mi Else If mi > ma Then Set ma = mi
...

и вывод:
MsgBox ma.Address(ReferenceStyle:=xlR1C1) & " = " & ma

Даже как-то непонятно, как это мне в голову не пришло
Алгоритм почти как у MCH, но за счёт наименования переменных доходчивее.
За счёт того, что Эксель сам перебирает построчно, нет нужды прописывать это в коде, как делал я на массивах.
И поэтому код короче, но в начале непонятно, как оно работает - ведь нигде нет перебора строк

[IgorGO]

восьмой вариант от IgorGo))) - это круто. до чего бывают люди падкие на призовые))) неужели это все обо мне?
кстати, последний вариант хорош еще и тем, что исходный массив может лежать где угодно (не обязательно начинаться с А1)

[Hugo121]

Да, я ему в помощь такое написал, чтоб запустить:

Sub MaxOfMin2Help()
MaxOfMin2 [a1].CurrentRegion
End Sub

[Roky]

Какие лучшие работы?

[doober]

Сообщение от IgorGO

я то же сделал пару дней назад и по случайному стечению обстоятельств отослал Hugo.

"конкурсные работы" еще принимаются... через день-два Hugo обьявит победителя... спонсором единогласно выбран Roky...

следите за сообщениями, не переключайтесь)))

Высылаете призовые руководителю конкурса Hugo121
Он выкладывает все работы,вы определяете победителя

[Hugo121]

-я пересылаю призовые согласно рейтинга

[R Dmitry]

Сообщение от Roky

Какие лучшие работы?

утром деньги - вечером стулья...
вечером деньги - утром стулья...

Игорь в моем вывод результатов лучше так:

MsgBox "строка : " & lr & "    столбец : " & cl & "    значение : " & tmp

[Hugo121]

Надеешься призовые увеличить?
Кстати, сообщество авторов пока не определилось с призовым фондом...

Если тема утонет, напомните через месяц - может быть всё же есть смысл решения показать?

[R Dmitry]

Сообщение от Hugo121

Надеешься призовые увеличить?
Кстати, сообщество авторов пока не определилось с призовым фондом...

Если тема утонет, напомните через месяц - может быть всё же есть смысл решения показать?

Игорь расходы по трафику, давно привысили бюджет "призовых"

[IgorGO]

Порадовала реакция Roky:

Какие лучшие работы?

улавливыается в этой фразе легкая недоговоренность, фантазия навязчиво возвращается к одному и тому варианту:
"Какие лучшие работы? Вы что - охренели?" -, как бы справляется у форумчан Roky... но скромно не пишет полный вариант фразы.
есть замечательный сценарий технического сьезда с темы:Roky, если Вы видите что размер призовых начинает обганять рыночную стоимость Вашего имущества смело пишите прямо сюда: "Не очень-то и хотелось, я сам все решил, отстаньте мяньяки!" Это древний тибетский заговор, произносить надо в полнолуние, глядя на отражение горящей свечи.

Игорь, пора вываливать решения. Господа, когда вы еще столько позитивных эмоций получали от от одного простого вопроса?

Извините прет...
есть такой вариант:
строки кода можно поперемешивать в один. Задача разобрать кучу до исходных кодов. что скажете? У тех кто принял участие в конкурсе есть преимущество - они запросто выберут свой код из общей кучи, как курочки выбирают зернышки из... общей кучи
а с чужими кодами надо будет поработать. Ну что скоробеи, вперед?