Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Заполнение пропущенных значений в диапазоне чисел - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Заполнение пропущенных значений в диапазоне чисел (Формулы/Formulas)
Заполнение пропущенных значений в диапазоне чисел
poluninnn Дата: Воскресенье, 07.12.2014, 01:40 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2003, 2007, 2010
Добрый день. Помогите с решением поставленной задачи.
Имеется таблица. В столбце А причем в столбце В, на против некоторых значений столбца А, есть еще значения.

требуемая задача:
добавить в столбец С (макросом или формулой) промежуточные значения между ячейкой столбца А и ячейкой под тем же номером ячейки В

заранее благодарен.
К сообщению приложен файл: 0436821.xlsx (49.5 Kb)


Сообщение отредактировал 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 не хочет прикрепляться


Сообщение отредактировал 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 не хочет прикрепляться
Неужели? А зачем в Вашем файле более двух тысяч строк, когда для решения задачи достаточно одного десятка (см. правила форума и вложение)?

"промежуточные значения" - это какие?
В файле покажите, что должно получиться
К сообщению приложен файл: poluninnn.xls (39.5 Kb)


Ю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, чето ничего не понятно.
покажите в файле в каком виде должен быть результат


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 в день , голова пойдет кругом, и боюсь просто пропустить какие-нибудь значения (доверяю автоматизации).
К сообщению приложен файл: 2554993.xls (72.5 Kb)


Сообщение отредактировал 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
вариант с кучей дополнительных столбцов:
К сообщению приложен файл: 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 будет пересчитывать все значения?..


Сообщение отредактировал 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]


МОИ: Ник, 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))));));"")

обе формулы масивные
К сообщению приложен файл: 2554993.xlsx (11.7 Kb)


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'ить, а собирать коллекцию (можно с ключом собирать уникальные, или словарь). В финале выгрузить. На большом количестве данных должно быть быстрее, да и вдруг нужны уникальные?


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
все-таки сделал без доп. столбца B)
Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА()-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)))));"")

только
2000-30000 строк

будет весь день нересчитываться killed
К сообщению приложен файл: 25549931.xlsx (13.7 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Четверг, 18.12.2014, 18:19
 
Ответить
Сообщениевсе-таки сделал без доп. столбца B)
Код
=ЕСЛИОШИБКА(ПРОСМОТР(СТРОКА()-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)))));"")

только
2000-30000 строк

будет весь день нересчитываться killed

Автор - krosav4ig
Дата добавления - 18.12.2014 в 18:18
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Заполнение пропущенных значений в диапазоне чисел (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!