{quote}{login=Mr2}{date=06.01.2009 09:29}{thema=}{post}A это наивысшая оценка....Тебе что нибудь говорит слово "Fighting"{/post}{/quote}  
Ну про оценки было сразу понятно:) "Fighting" навевает мысли о боях без правил:)

Впрочем, как вам будет угодно.

Никакой ошибки здесь не вижу. Ищется наиболее длинная последовательность, содержащая оценки А и В, но не обязательно вместе, т.е. например из АААААА, АВАВВ, BBB будет выбрана самая длинная АААААА как наилучший по оценкам результат. Если нужно обязательно вместе, то придется менять алгоритм расчета, но тогда какой смысл такой выборки? Если один человек 6 периодов подряд получал А и ни одного А+В, а другой за все время получил только однажды А+В+В, то кто лучше работал по рейтингу А+В? Или здесь вообще не система оценок, а что-то другое?

В этот раз формулы пришлось немного усложнить из-за использования динамических диапазонов (чтобы не перезадавать в именах ссылки на исходную таблицу при ее изменении + при расчете по конкретному человеку сразу брать данные из нужного столбца). Формулы жестко привязаны к положению искомых символов в ячейках столбца "Итог" для 1 и 2 варианта, поэтому не изменяйте их порядок в других ячейках.  
ЗЫ. Можно было бы конечно написать пользовательскую функцию, но на макротворчество меня что-то в последнее время не тянет:)

{quote}{login=Mr2}{date=04.01.2009 07:44}{thema=}{post}Raptor, не бросай на полпути!!!!  
Ты же понимаеш моего интелекта не достаточно,я да же не понял логике в твоей формуле!!!!{/post}{/quote}  
Спокойствие, только спокойствие:)) Сейчас немного занят, но в ближайшее время усё будет:)

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

{quote}{login=Марина }{date=29.12.2008 08:45}{thema=}{post}Юра, спасибо за участие.    
Я придумала, что мне нужно было сделать.  
Теперь у меня другая проблема с переносом на другой лист, окрашенные в разные цвета, строки.    
Нужно сделать так, чтобы после выборки, цвет строк на новом листе оставался прежним. Не знаю, ясно ли я изложила проблему.  
Если есть какие-то соображения по этому вопросу, просьба поделиться.  
Спасибо.{/post}{/quote}  
Объясните пожалуйста, Марина, чем вас не устраивает предложенный ранее вариант, который вы так настойчиво пытаетесь найти:  
Sub Copy()  
Sheets(1).Copy Sheets(1)  
ActiveSheet.UsedRange.Offset(2).ClearContents  
End Sub ?

Навскидку:  
Sub Copy()  
Sheets(1).Copy Sheets(1)  
ActiveSheet.UsedRange.Offset(2).ClearContents  
End Sub

Ах да, забыл:) Вот так точнее: имя присваивается списку, содержащему порядковые номера элементов, которые не равны искомому либо являются последним элементом списка (в данном случае 20-ым) независимо от равенства искомому.

{quote}{login=}{date=29.12.2008 09:42}{thema=}{post}  
Только попутал колличество ячеек,периодов 20,но 20-ый период стоит в 21 ячейке.($2:$20){/post}{/quote}  
Эмм... Вообще-то я ничего не "попутал" - СТРОКА($1:$19) и СТРОКА($2:$20) привязаны не к абсолютному месторасположению элементов на листе, а к их количеству в списке. Ко вашему вопросу - вам вообще знакомо использование имен в Excel и в частности в формулах?  
2Юра  
Ничего особенного там нету:) Имя присваивается списку, содержащему порядковые номера элементов, которые не равны искомому. Максимальная из разниц между каждой парой из них минус 1 и будет нужным результатом.

Добрый день. Вот по-быстрому накидал вариантик с помощью формул. Т.к. строк с формулами много, автоматический пересчет на листе отключил (при необходимости выполняйте его вручную, но при этом наберитесь терпения:). Для корректной работы формул данные  телекомуникационной компании на 1 листе должны быть отсортированы по дате и времени.  
ЗЫ. Микки, не все так просто, потому что состояние данных в исходном примере можно охарактеризовать как близкое к хаосу:) Да и предложенная формула не совсем годится в связи с тем, что может быть больше 1 звонка с одного и того же номера на протяжении 30 мин.

А вот косяки с логином остались. Нехорошооооо.....

Здравствуйте. Приятно, что форум вновь заработал, а то я уже по нему успел соскучится, хотя и заглядываю не так часто:) По теме: для вашего случая, как я понимаю, выборка нужна отдельно по столбцам "Счетчик 1" и "Счетчик 2" (см. файл). Принцип самой формулы: с помощью функции ЧАСТОТА строится массив, содержащий элементы, которые повторяются в исходном столбце значений счетчика. Затем эти элементы последовательно перебираюся ф-цией НАИМЕНЬШИЙ, причем каждый из них берется из массива дважды - один раз для поиска в исходном столбце первой его позиции ("начало"), другой раз - последней позиции ("окончание") с помощью ПОИСКПОЗ. Функция ИНДЕКС позволяет выбрать по найденой позиции нужный элемент.

Перебирал различные варианты, остановился на таком (см. файлик). Надеюсь, правильно угадал, чего хочет автор=)

Или так:  
=ИНДЕКС($B:$B;ПОИСКПОЗ(9E+307;$B:$B))  
9E+307 - это оооооочень большое число=))

{quote}{login=слэн}{date=06.12.2008 10:08}{thema=}{post}макросом можно, наверное обработать, анализируя границы ячеек и меняя их.. для каждой ячейки..  
 
написать алгоритм поворота нужно толко для одной ячейки, а дальше цикл рулит :){/post}{/quote}  
Поддерживаю. Если есть необходимость делать такие "картинки" именно в Экселе, тут только макрос... А еще неплохо бы увидеть, как вы хотите совместить схемы. В примере только повернутая, но не совмещенная схема.

Юрий, ваш вариант формулы не работает, потому что некоторые функции в Excel не могут работать с двумя массивами в качестве аргументов так, чтобы один массив оставался фиксированным, а во втором при этом последовательно перебирались значения. К таким функциям, в частности, относится и ВПР. В таких случаях можно обходить ограничение, например, с помощью построения "виртуального" двухмерного массива, стороны которого соразмерны двум сопоставляемым по вышеуказанному принципу диапазонам.  
ЗЫ. Возможно, есть и более простой способ, но это первое, что пришло в голову:)

Добрый вечер, скорее даже ночь:) Юрий, ваша настойчивость достойна уважения -  не мог пройти мимо:) Прошу прощения за столь поздний визит, но заглядываю когда есть время и возможность. По сути вопроса: в принципе ув. nik правильно пояснил необходимость интересующего вас "домножения" - это способ отфильтровать результаты проверки ВСЕХ ячеек в диапазоне G6:AA6 так, чтобы осталась только каждая третья, т.е. только дата СЛЕДУЮЩЕЙ выдачи. Каждый "множитель" в формуле - это своеобразный фильтр для всего диапазона, отбирающий нужное условие. Путем умножения эти фильтры накладываются друг на друга, в результате получается массив с 0 и 1, где 1 - признак "срабатывания" всех трех фильтров. Сумма всех элементов такого массива показывает, есть ли среди них ненулевые.

{quote}{login=Mikhanik}{date=29.11.2008 12:09}{thema=}{post}Во время исполнения макроса отображается окошко UserForm2. Единственное плохо.. Никаких процентов бегущих нет, вообще окошко пусто. Что-то не хватает.. Можно ли как-то поправить?{/post}{/quote}  
Хм.. решил сам проверить - работает, прогресс вижу. Добавил DoEvents, хотя работает и с ним, и без оного... Убирать блокировку экрана сознательно не хочу, т.к. одни мигания видеть будете.

{quote}{login=svobodniy}{date=28.11.2008 10:34}{thema=}{post}  
...  
Но как то логичнее и привычнее красным отмечать ошибки, т.е. в данном случае - различные цены у одинаковых товаров.{/post}{/quote}  
Согласен - последуем логике:)

Так как свой прогресбар сочинять лень, прикручу любезно предложенный Barracuda. Может даже будет работать - право тестирования оставляю автору поста:)

Добрый вечер! Давненько на форум не заглядывал... Вот проходил мимо, дай, думаю, зайду:) Тем более всегда интересовался масштабными дискуссиями вокруг нетривиальных задач:) Позвольте и мне предложить несложный вариантик решения по данному вопросу.

{quote}{login=Максим}{date=20.11.2008 07:04}{thema=}{post}Вот смотрите - что-то получилось, но не совсем то что надо :){/post}{/quote}  
Не то что надо, потому что в вопросе вы некорректно указали то, что хотели получить на самом деле. Если вам надо вставить строки полностью, а не содержимое диапазона A45:A54, используйте Rows("45:54").Copy rng.Offset(1).EntireRow.Cells(1)

Да, на всякий случай для соблюдения правильного порядка поиска добавьте условие в Find:  
Set rng = Cells.Find("При измерениях присутствовал", [a1],SearchOrder:=xlByRows)

Пока ув. Игорь отсутствует, попробуйте вот так:)  
Sub new_block()  
Dim First$, rng As Range  
Set rng = Cells.Find("При измерениях присутствовал", [a1])
If rng Is Nothing Then Exit Sub  
First = rng.Address  
Do Until First = Cells.FindNext(rng).Address  
Set rng = Cells.FindNext(rng)  
Loop  
[A45:A54].Copy rng.Offset(1)
MsgBox "ГОТОВО!!!"  
End Sub

Не ссорьтесь, господа:) Задача решается простенькой формулой. Отдельный респект DL - позволю себе использовать его прием выбора уникальных записей :))

Очередная вариация на тему "Биржи vs Excel" - пожалуй, самая запутанная по алгоритму версия:). Смотрим файлик, проводим боевые испытания, тащим раскуроченную технику в ремонт:)

{quote}{login=танцующий джигу}{date=13.11.2008 08:13}{thema=}{post}...как Вы пришли к тому что данный алгоритм выбора элемента решает поставленную задачу?{/post}{/quote}  
Это несложно. Если исходная задача - найти наибольший из 3 минимальных элементов, при этом минимум 2 из них должны входить в топ3, то очевидно возможны 2 варианта: 1)искомый элемент будет максимальным ТОЛЬКО из 3х топовых, минимальных во всем наборе; 2) искомый элемент будет максимальным из 2х топовых и одного наименьшего из антитоповых. Как проверять эти 2 варианта одновременно? Ответ - совместить их. Получим набор из 4х элементов, который полностью учитывает базовые условия задачи. Дальше - дело техники:) - извлекаем наибольший из 3 минимальных элементов в этом наборе либо (что равнозначно) второй наибольший из 4х элементов набора.

{quote}{login=}{date=13.11.2008 12:26}{thema=}{post}=НАИМЕНЬШИЙ(B10:F10+0;3+(СУММ(1*((РАНГ($B$3:$F$3;$B$3:$F$3)>3)*((B10:F10)<=НАИМЕНЬШИЙ(B10:F10;3))))=2)){/post}{/quote}  
Да, теперь намного лучше:) Отличное решение!  
ЗЫ. Обязательно загляну:)

Вот вариант без дополнительных столбцов (см. файлик)