Заполнение пропущенных значений в диапазоне чисел
poluninnn
Дата: Воскресенье, 07.12.2014, 01:40 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация:
0
±
Замечаний:
0% ±
Excel 2003, 2007, 2010
Добрый день. Помогите с решением поставленной задачи. Имеется таблица. В столбце А причем в столбце В, на против некоторых значений столбца А, есть еще значения. требуемая задача: добавить в столбец С (макросом или формулой) промежуточные значения между ячейкой столбца А и ячейкой под тем же номером ячейки В заранее благодарен.
Добрый день. Помогите с решением поставленной задачи. Имеется таблица. В столбце А причем в столбце В, на против некоторых значений столбца А, есть еще значения. требуемая задача: добавить в столбец С (макросом или формулой) промежуточные значения между ячейкой столбца А и ячейкой под тем же номером ячейки В заранее благодарен. poluninnn
Сообщение отредактировал poluninnn - Воскресенье, 07.12.2014, 01:48
Ответить
Сообщение Добрый день. Помогите с решением поставленной задачи. Имеется таблица. В столбце А причем в столбце В, на против некоторых значений столбца А, есть еще значения. требуемая задача: добавить в столбец С (макросом или формулой) промежуточные значения между ячейкой столбца А и ячейкой под тем же номером ячейки В заранее благодарен. Автор - poluninnn Дата добавления - 07.12.2014 в 01:40
poluninnn
Дата: Воскресенье, 07.12.2014, 01:47 |
Сообщение № 2
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация:
0
±
Замечаний:
0% ±
Excel 2003, 2007, 2010
файл в формате excel 2003 не хочет прикрепляться
файл в формате excel 2003 не хочет прикрепляться poluninnn
Сообщение отредактировал poluninnn - Воскресенье, 07.12.2014, 01:47
Ответить
Сообщение файл в формате excel 2003 не хочет прикрепляться Автор - poluninnn Дата добавления - 07.12.2014 в 01:47
Serge_007
Дата: Воскресенье, 07.12.2014, 01:59 |
Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
В Москве ночь файл в формате excel 2003 не хочет прикрепляться
Неужели? А зачем в Вашем файле более двух тысяч строк, когда для решения задачи достаточно одного десятка (см. правила форума и вложение)? "промежуточные значения" - это какие? В файле покажите, что должно получиться
В Москве ночь файл в формате excel 2003 не хочет прикрепляться
Неужели? А зачем в Вашем файле более двух тысяч строк, когда для решения задачи достаточно одного десятка (см. правила форума и вложение)? "промежуточные значения" - это какие? В файле покажите, что должно получиться Serge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение В Москве ночь файл в формате excel 2003 не хочет прикрепляться
Неужели? А зачем в Вашем файле более двух тысяч строк, когда для решения задачи достаточно одного десятка (см. правила форума и вложение)? "промежуточные значения" - это какие? В файле покажите, что должно получиться Автор - Serge_007 Дата добавления - 07.12.2014 в 01:59
krosav4ig
Дата: Воскресенье, 07.12.2014, 02:01 |
Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация:
989
±
Замечаний:
0% ±
Excel 2007,2010,2013
poluninnn , чето ничего не понятно. покажите в файле в каком виде должен быть результат
poluninnn , чето ничего не понятно. покажите в файле в каком виде должен быть результатkrosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение poluninnn , чето ничего не понятно. покажите в файле в каком виде должен быть результатАвтор - krosav4ig Дата добавления - 07.12.2014 в 02:01
poluninnn
Дата: Воскресенье, 07.12.2014, 09:23 |
Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация:
0
±
Замечаний:
0% ±
Excel 2003, 2007, 2010
так должно получиться выделил цветом промежуточные значения эта операция должна проводится над большим количеством значений (2000-30000 строк), и не один раз. врукопашную 2000 строк обработать могу минут за 20 (в зависимости от количества пропущенных значений), но когда таких операций нужно сделать раз 30 в день , голова пойдет кругом, и боюсь просто пропустить какие-нибудь значения (доверяю автоматизации).
так должно получиться выделил цветом промежуточные значения эта операция должна проводится над большим количеством значений (2000-30000 строк), и не один раз. врукопашную 2000 строк обработать могу минут за 20 (в зависимости от количества пропущенных значений), но когда таких операций нужно сделать раз 30 в день , голова пойдет кругом, и боюсь просто пропустить какие-нибудь значения (доверяю автоматизации). poluninnn
Сообщение отредактировал poluninnn - Воскресенье, 07.12.2014, 09:40
Ответить
Сообщение так должно получиться выделил цветом промежуточные значения эта операция должна проводится над большим количеством значений (2000-30000 строк), и не один раз. врукопашную 2000 строк обработать могу минут за 20 (в зависимости от количества пропущенных значений), но когда таких операций нужно сделать раз 30 в день , голова пойдет кругом, и боюсь просто пропустить какие-нибудь значения (доверяю автоматизации). Автор - poluninnn Дата добавления - 07.12.2014 в 09:23
Nic70y
Дата: Воскресенье, 07.12.2014, 10:29 |
Сообщение № 6
Группа: Друзья
Ранг: Экселист
Сообщений: 8761
Репутация:
2273
±
Замечаний:
0% ±
Excel 2010
вариант с кучей дополнительных столбцов:
вариант с кучей дополнительных столбцов: Nic70y
К сообщению приложен файл:
700.xls
(44.5 Kb)
ЮMoney 41001841029809
Ответить
Сообщение вариант с кучей дополнительных столбцов: Автор - Nic70y Дата добавления - 07.12.2014 в 10:29
poluninnn
Дата: Воскресенье, 07.12.2014, 17:32 |
Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация:
0
±
Замечаний:
0% ±
Excel 2003, 2007, 2010
Nic70y , Спасибо за подсказку, в столбце D немного подправил формулу, т.к. в исходных данных в столбцах B и C в одной строке могут встречаться одинаковые значения. Из-за этого в столбце D появляются отрицательные значения, в следствие чего формула в столбце G спотыкается об это минусовое значение и постоянно выдает после него предыдущее значение. было стало но опять таки, это вариант подойдет если строк с данными не много, а если таковых 3 000, 30 000 и более, то сколько же Excel будет пересчитывать все значения?..
Nic70y , Спасибо за подсказку, в столбце D немного подправил формулу, т.к. в исходных данных в столбцах B и C в одной строке могут встречаться одинаковые значения. Из-за этого в столбце D появляются отрицательные значения, в следствие чего формула в столбце G спотыкается об это минусовое значение и постоянно выдает после него предыдущее значение. было стало но опять таки, это вариант подойдет если строк с данными не много, а если таковых 3 000, 30 000 и более, то сколько же Excel будет пересчитывать все значения?..poluninnn
Сообщение отредактировал poluninnn - Воскресенье, 07.12.2014, 17:37
Ответить
Сообщение Nic70y , Спасибо за подсказку, в столбце D немного подправил формулу, т.к. в исходных данных в столбцах B и C в одной строке могут встречаться одинаковые значения. Из-за этого в столбце D появляются отрицательные значения, в следствие чего формула в столбце G спотыкается об это минусовое значение и постоянно выдает после него предыдущее значение. было стало но опять таки, это вариант подойдет если строк с данными не много, а если таковых 3 000, 30 000 и более, то сколько же Excel будет пересчитывать все значения?..Автор - poluninnn Дата добавления - 07.12.2014 в 17:32
Gustav
Дата: Воскресенье, 07.12.2014, 21:56 |
Сообщение № 8
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2748
Репутация:
1137
±
Замечаний:
0% ±
начинал с Excel 4.0, видел 2.1
Макрик для файлов из сообщений 1 или 3: [vba]Код
Sub io() Dim varr, larr(), i&, j&, k& Range("C:C").ClearContents varr = Range("A2").CurrentRegion For i = 1 To UBound(varr) If VarType(varr(i, 2)) = vbDouble Then For j = varr(i, 1) + 1 To varr(i, 2) - 1 k = k + 1 ReDim Preserve larr(1 To k) larr(k) = j Next j End If Next i Range("C2").Resize(k) = WorksheetFunction.Transpose(larr) End Sub
[/vba] P.S. А если вдруг в столбце C понадобится полный список значений (с учетом границ, указанных в столбцах A и B), то макрос надо будет слегка изменить: [vba]Код
Sub io2() Dim varr, larr(), i&, j&, k& Range("C:C").ClearContents varr = Range("A2").CurrentRegion For i = 1 To UBound(varr) If VarType(varr(i, 2)) <> vbDouble Then varr(i, 2) = varr(i, 1) For j = varr(i, 1) To varr(i, 2) k = k + 1 ReDim Preserve larr(1 To k) larr(k) = j Next j Next i Range("C2").Resize(k) = WorksheetFunction.Transpose(larr) End Sub
[/vba]
Макрик для файлов из сообщений 1 или 3: [vba]Код
Sub io() Dim varr, larr(), i&, j&, k& Range("C:C").ClearContents varr = Range("A2").CurrentRegion For i = 1 To UBound(varr) If VarType(varr(i, 2)) = vbDouble Then For j = varr(i, 1) + 1 To varr(i, 2) - 1 k = k + 1 ReDim Preserve larr(1 To k) larr(k) = j Next j End If Next i Range("C2").Resize(k) = WorksheetFunction.Transpose(larr) End Sub
[/vba] P.S. А если вдруг в столбце C понадобится полный список значений (с учетом границ, указанных в столбцах A и B), то макрос надо будет слегка изменить: [vba]Код
Sub io2() Dim varr, larr(), i&, j&, k& Range("C:C").ClearContents varr = Range("A2").CurrentRegion For i = 1 To UBound(varr) If VarType(varr(i, 2)) <> vbDouble Then varr(i, 2) = varr(i, 1) For j = varr(i, 1) To varr(i, 2) k = k + 1 ReDim Preserve larr(1 To k) larr(k) = j Next j Next i Range("C2").Resize(k) = WorksheetFunction.Transpose(larr) End Sub
[/vba] Gustav
МОИ: Ник , Tip box: 41001663842605
Сообщение отредактировал Gustav - Воскресенье, 07.12.2014, 23:29
Ответить
Сообщение Макрик для файлов из сообщений 1 или 3: [vba]Код
Sub io() Dim varr, larr(), i&, j&, k& Range("C:C").ClearContents varr = Range("A2").CurrentRegion For i = 1 To UBound(varr) If VarType(varr(i, 2)) = vbDouble Then For j = varr(i, 1) + 1 To varr(i, 2) - 1 k = k + 1 ReDim Preserve larr(1 To k) larr(k) = j Next j End If Next i Range("C2").Resize(k) = WorksheetFunction.Transpose(larr) End Sub
[/vba] P.S. А если вдруг в столбце C понадобится полный список значений (с учетом границ, указанных в столбцах A и B), то макрос надо будет слегка изменить: [vba]Код
Sub io2() Dim varr, larr(), i&, j&, k& Range("C:C").ClearContents varr = Range("A2").CurrentRegion For i = 1 To UBound(varr) If VarType(varr(i, 2)) <> vbDouble Then varr(i, 2) = varr(i, 1) For j = varr(i, 1) To varr(i, 2) k = k + 1 ReDim Preserve larr(1 To k) larr(k) = j Next j Next i Range("C2").Resize(k) = WorksheetFunction.Transpose(larr) End Sub
[/vba] Автор - Gustav Дата добавления - 07.12.2014 в 21:56
krosav4ig
Дата: Понедельник, 08.12.2014, 02:24 |
Сообщение № 9
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация:
989
±
Замечаний:
0% ±
Excel 2007,2010,2013
что-то меня опять проперло на монстроформулы, держите вариант с 1 допстолбцом в C1 Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+1+СУММ(СЧЁТЕСЛИ(C$1:C1;ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+СТРОКА(ДВССЫЛ("1:"&ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))))))));"")
в D1 Код
=ЕСЛИОШИБКА(ИНДЕКС(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))-1);ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(1:1));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));));"")
обе формулы масивные
что-то меня опять проперло на монстроформулы, держите вариант с 1 допстолбцом в C1 Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+1+СУММ(СЧЁТЕСЛИ(C$1:C1;ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+СТРОКА(ДВССЫЛ("1:"&ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))))))));"")
в D1 Код
=ЕСЛИОШИБКА(ИНДЕКС(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))-1);ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(1:1));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));));"")
обе формулы масивные krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Понедельник, 08.12.2014, 02:27
Ответить
Сообщение что-то меня опять проперло на монстроформулы, держите вариант с 1 допстолбцом в C1 Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+1+СУММ(СЧЁТЕСЛИ(C$1:C1;ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+СТРОКА(ДВССЫЛ("1:"&ПРОСМОТР(СТРОКА(C1)-1;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))));););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);--(0&СМЕЩ($D$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))))))));"")
в D1 Код
=ЕСЛИОШИБКА(ИНДЕКС(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))-1);ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(1:1));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$99^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));));"")
обе формулы масивные Автор - krosav4ig Дата добавления - 08.12.2014 в 02:24
poluninnn
Дата: Понедельник, 08.12.2014, 15:28 |
Сообщение № 10
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация:
0
±
Замечаний:
0% ±
Excel 2003, 2007, 2010
Спасибо всем. Очень помогли.
Ответить
Сообщение Спасибо всем. Очень помогли. Автор - poluninnn Дата добавления - 08.12.2014 в 15:28
Hugo
Дата: Понедельник, 08.12.2014, 16:12 |
Сообщение № 11
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3254
Репутация:
707
±
Замечаний:
0% ±
2019
Думаю лучше не ReDim Preserv'ить, а собирать коллекцию (можно с ключом собирать уникальные, или словарь). В финале выгрузить. На большом количестве данных должно быть быстрее, да и вдруг нужны уникальные?
Думаю лучше не ReDim Preserv'ить, а собирать коллекцию (можно с ключом собирать уникальные, или словарь). В финале выгрузить. На большом количестве данных должно быть быстрее, да и вдруг нужны уникальные? Hugo
excel@nxt.ru webmoney: E265281470651 Z422237915069
Ответить
Сообщение Думаю лучше не ReDim Preserv'ить, а собирать коллекцию (можно с ключом собирать уникальные, или словарь). В финале выгрузить. На большом количестве данных должно быть быстрее, да и вдруг нужны уникальные? Автор - Hugo Дата добавления - 08.12.2014 в 16:12
krosav4ig
Дата: Четверг, 18.12.2014, 18:18 |
Сообщение № 12
Группа: Друзья
Ранг: Старожил
Сообщений: 2347
Репутация:
989
±
Замечаний:
0% ±
Excel 2007,2010,2013
все-таки сделал без доп. столбца Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+1+СУММ(СЧЁТЕСЛИ(D$1:D1;ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+СТРОКА(ДВССЫЛ("1:"&ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1)))));"")
только будет весь день нересчитываться
все-таки сделал без доп. столбца Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+1+СУММ(СЧЁТЕСЛИ(D$1:D1;ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+СТРОКА(ДВССЫЛ("1:"&ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1)))));"")
только будет весь день нересчитываться krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Четверг, 18.12.2014, 18:19
Ответить
Сообщение все-таки сделал без доп. столбца Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+1+СУММ(СЧЁТЕСЛИ(D$1:D1;ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))))))+СТРОКА(ДВССЫЛ("1:"&ПРОСМОТР(СТРОКА()-2;МУМНОЖ(ЕСЛИОШИБКА(ЕСЛИ(ТРАНСП(СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))<=СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))-1;ТРАНСП(Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1);););СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))^0);Ч(СМЕЩ($B$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-Ч(СМЕЩ($A$1;ПОИСКПОЗ(НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A)))););;НАИМЕНЬШИЙ(ЕСЛИ((0&СМЕЩ($B$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A)))-СМЕЩ($A$1;ПОИСКПОЗ(1;$A$1:$A$76^0;)-1;;СЧЁТЗ($A:$A))>1;СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))));СТРОКА(СМЕЩ($A$1;;;СЧЁТЗ($A:$A))))))-1)))));"")
только будет весь день нересчитываться Автор - krosav4ig Дата добавления - 18.12.2014 в 18:18