Записи участника (krosav4ig) - Мир MS Excel

Регистрация

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

= Мир MS Excel/Записи участника (krosav4ig) - Мир MS Excel

Страница 96 из 118
«
1
2
…
94
95
96
97
98
…
117
118
»

Результаты поиска

Дата: Четверг, 25.12.2014, 23:45 | Сообщение № 1901 | Тема: Если число символов среднего слова есть четное число, то...

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

и еще один вариант

Код

=СЖПРОБЕЛЫ(ПСТР(" "&ПОДСТАВИТЬ(A5;" ";ПОВТОР(" ";999));1+999*2*ЕЧЁТН(МУМНОЖ(ДЛСТР(A5)-ПОИСК("_";ПОДСТАВИТЬ(A5;" ";"_";{1;2}));{1:-1}));999))

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

Сообщение отредактировал krosav4ig - Пятница, 26.12.2014, 00:30

Ответить

Дата: Четверг, 25.12.2014, 20:45 | Сообщение № 1902 | Тема: Номер буквы в алфавите

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

Не-а, утром 1–го

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

Ответить

Дата: Четверг, 25.12.2014, 19:39 | Сообщение № 1903 | Тема: тарификация в сауне

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

еще вариант, если весь период нужно делить на тарифные зоны

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

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

Сообщение отредактировал krosav4ig - Четверг, 25.12.2014, 19:58

Ответить

Дата: Среда, 24.12.2014, 17:19 | Сообщение № 1904 | Тема: при изменении только месяца в ячейке, автоматически выставля

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

установил на G1 формат ММ/ГГ, ввел в G1 2-15 (можно 2/15)
далее формулы

последняя пятница месяца

Код

=ЦЕЛОЕ(РАЗНДАТ(6;КОНМЕСЯЦА(G1;0);"d")/7)*7+6

в формуле 6 - номер дня недели +1
т.е. последний вторник будет

Код

=ЦЕЛОЕ(РАЗНДАТ(3;КОНМЕСЯЦА(G1;0);"d")/7)*7+3

последний рабочий день месяца

Код

=КОНМЕСЯЦА(G1;0)-ПРОСМОТР(ДЕНЬНЕД(КОНМЕСЯЦА(G1;0);2);{1;6;7};{0;1;2})

первый рабочий день месяца

Код

=КОНМЕСЯЦА(G1;-1)+ПРОСМОТР(ДЕНЬНЕД(КОНМЕСЯЦА(G1;-1)+1;2);{1;6;7};{1;3;2})

последний рабочий день предыдущего месяца

Код

=КОНМЕСЯЦА(G1;-1)-ПРОСМОТР(ДЕНЬНЕД(КОНМЕСЯЦА(G1;-1);2);{1;6;7};{0;1;2})

Праздничные дни не учитываются. Формулы в файле выделил желтым
[p.s.]30 февраля улыбнуло )

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

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

Сообщение отредактировал krosav4ig - Среда, 24.12.2014, 17:26

Ответить

Дата: Среда, 24.12.2014, 00:18 | Сообщение № 1905 | Тема: Сравнить две таблицы

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

еще вариант без VBA и формул на листе
для работы должен быть установлен Power Query
таблица Результат обновляемая, при ее обновлении запрос берет данные из таблиц Таблица1 и Таблица2 и выводится результирующая таблица на основе этих данных
текст запроса Power Query:
[vba]

Код

let
       Источник = Excel.CurrentWorkbook(){[Name="Таблица2"]}[Content][[Наименование],[Цена]],
       Источник2 = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
       Слияние=Table.ExpandTableColumn(Table.NestedJoin(Источник,{"Наименование"},Источник2,{"Наименование"},"_"), "_", {"Себестоимость"}, {"Себестоимость"}),
       Результат = Table.SelectRows(Слияние, each ([Наименование] <> null))
in
       Результат

[/vba]
[p.s.]скачать Power Query для excel 2010/2013 можно тут

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

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

Сообщение отредактировал krosav4ig - Среда, 24.12.2014, 00:24

Ответить

Дата: Вторник, 23.12.2014, 23:00 | Сообщение № 1906 | Тема: Номер буквы в алфавите

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

тогда у мну формула с выводом пустой строки
1 вариант с ЕСЛИОШИБКА, номера выводятся числами - ~~158~~ 117 без "="
2 вариант без ЕСЛИОШИБКА, номера выводятся текстом - ~~142~~ ~~140~~ ~~119~~ ~~112~~ 110 без "="

с выводом 0 вместо пустой строки - ~~129~~ ~~105~~ ~~103~~ 102 без "="

97 без "=" c форматом 0;;

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

Сообщение отредактировал krosav4ig - Среда, 24.12.2014, 18:27

Ответить

Дата: Понедельник, 22.12.2014, 22:45 | Сообщение № 1907 | Тема: Номер буквы в алфавите

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

~~132~~ 128 без "=" с форматом 0;;
если бы не символы І и і , то было бы 121

сократил свои первые две формулы, с ЕСЛИОШИБКА 158 без "=", с выводом номера текстом 149 без "="

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

Сообщение отредактировал krosav4ig - Вторник, 23.12.2014, 15:49

Ответить

Дата: Понедельник, 22.12.2014, 18:49 | Сообщение № 1908 | Тема: Сортировка четных и нечетных чисел

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

как-то так
[vba]

Код

Sub CommandButton1_Click()
       Dim K() As Integer
       Dim L() As Integer
       Dim M() As Integer
       Dim i
       Dim o
       Dim e
       Dim r As Integer
       Title = "Заполнение одномерного массива"
       N = InputBox("Количество элементов в одномерном массиве", Title)
       Randomize
       ReDim K(N)
       i = 0
       For i = 0 To N - 1
           K(i) = Rnd * 10
           If K(i) Mod 2 = 0 Then
               ReDim Preserve L(e): L(e) = K(i): e = e + 1
           Else
               ReDim Preserve M(o): M(o) = K(i): o = o + 1
           End If
       Next i
       Cells(1, 1).Resize(N).Value = Application.Transpose(K)
       Cells(1, 2).Resize(UBound(L) + 1).Value = Application.Transpose(L)
       Cells(1, 3).Resize(UBound(M) + 1).Value = Application.Transpose(M)
End Sub

[/vba]

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

Сообщение отредактировал krosav4ig - Понедельник, 22.12.2014, 18:56

Ответить

Дата: Понедельник, 22.12.2014, 18:13 | Сообщение № 1909 | Тема: Подставить значения, соответствующие датам

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

AlexMTRD, тут смотрели?

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

Ответить

Дата: Понедельник, 22.12.2014, 15:24 | Сообщение № 1910 | Тема: Номер буквы в алфавите

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

у мну есть две немассивные формулы, обе не совсем правильные
одна с ЕСЛИОШИБКА (167 без "="), другая без, но выводит числа текстом (158 без "=")
думаю дальше...

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

Сообщение отредактировал krosav4ig - Понедельник, 22.12.2014, 15:37

Ответить

Дата: Понедельник, 22.12.2014, 12:09 | Сообщение № 1911 | Тема: Cannot insert object

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

тык еще тык

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

Сообщение отредактировал krosav4ig - Понедельник, 22.12.2014, 12:16

Ответить

Дата: Понедельник, 22.12.2014, 01:01 | Сообщение № 1912 | Тема: Выборочное копирование данных из одной вкладки в другую

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

еще вариант

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

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

Ответить

Дата: Воскресенье, 21.12.2014, 00:53 | Сообщение № 1913 | Тема: выбрать 10 часто встречающихся цифр из таблицы

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

У меня так получилось, выводит в порядке первого появления числа

Код

=МОДА(ЕСЛИ(ЕНД(ПОИСКПОЗ($A$1:$J$22;$L$1:L1;));$A$1:$J$22))

формула массивная

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

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

Ответить

Дата: Суббота, 20.12.2014, 00:02 | Сообщение № 1914 | Тема: при изменении только месяца в ячейке, автоматически выставля

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

Shss, у меня уже две формулы готовы, а вашего файла все нет rules

rules

Непорядок, однако.

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

Ответить

Дата: Пятница, 19.12.2014, 02:33 | Сообщение № 1915 | Тема: Создание большой базы телефонных номеров

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

столбцы с ВПР обязательно нужны? так не подойдет?

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

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

Ответить

Дата: Четверг, 18.12.2014, 19:22 | Сообщение № 1916 | Тема: Формула для расчета страховых взносов с разной пред.базой

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

[offtop]

Цитата irinka77, 18.12.2014 в 16:11, в сообщении № 1

[size=8]

Цитата irinka77, 18.12.2014 в 16:11, в сообщении № 1

[l]

Цитата irinka77, 18.12.2014 в 16:11, в сообщении № 1

[b]

irinka77, вот вы понаоткрывали кучу тегов, а кто их за вас закрывать будет?[/offtop]

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

Сообщение отредактировал krosav4ig - Четверг, 18.12.2014, 19:25

Ответить

Дата: Четверг, 18.12.2014, 18:18 | Сообщение № 1917 | Тема: Заполнение пропущенных значений в диапазоне чисел

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

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

Сообщений: 2348

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

Замечаний: 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)))));"")

только

Цитата poluninnn, 07.12.2014 в 09:23, в сообщении № 5

2000-30000 строк

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

killed

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

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

Сообщение отредактировал krosav4ig - Четверг, 18.12.2014, 18:19

Ответить

Дата: Четверг, 18.12.2014, 13:35 | Сообщение № 1918 | Тема: Список из всех столбцов в одну колонку без пробелов

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

Vinkelman, в моем файле данные включены в автотаблицу и при добавлении строк новые элементы автоматически добавляются в сводную. Автобновление сводной можно сделать например таким кодом в модуле листа [vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
      With Application: .ScreenUpdating = 0: .EnableEvents = 0
          If Not Intersect([Таблица1], Target) Is Nothing Then:
             ActiveSheet.PivotTables(1).PivotCache.Refresh
      .ScreenUpdating = 1: .EnableEvents = 1: End With
End Sub

[/vba]

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

Сообщение отредактировал krosav4ig - Четверг, 18.12.2014, 13:36

Ответить

Дата: Среда, 17.12.2014, 23:38 | Сообщение № 1919 | Тема: Список из всех столбцов в одну колонку без пробелов

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

можно еще сводной

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

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

Ответить

Дата: Среда, 17.12.2014, 19:24 | Сообщение № 1920 | Тема: Функция ПРОСМОТР - возврат значений из шапки

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

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

Сообщений: 2348

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

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

Excel 2007,2010,2013

Цитата Pelena, 17.12.2014 в 19:21, в сообщении № 5

Беру свои слова обратно

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

Ответить

Страница 96 из 118
«
1
2
…
94
95
96
97
98
…
117
118
»

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