Результаты поиска
krosav4ig
Дата: Воскресенье, 28.08.2016, 20:52 |
Сообщение № 1181 | Тема: Номер комбинации перестановки
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
нашел я фсе-таки время и силы (ибо в комбинаторике я не силен) для этой задачки получил формулу номера перестановки 5 из 5 для лексиграфического порядка 97 символов с константами для антилексиграфического порядка 162 символа с константами универсальне монстроформулы генерации перестановки m из n по номеру в лексиграфическогм и антилексиграфическом порядке 334 каждая [p.s.]формулы генерации не мои, пару лет назад бесцеремонно спер формулу у FrankensTeam, сейчас ее немного адаптировал
нашел я фсе-таки время и силы (ибо в комбинаторике я не силен) для этой задачки получил формулу номера перестановки 5 из 5 для лексиграфического порядка 97 символов с константами для антилексиграфического порядка 162 символа с константами универсальне монстроформулы генерации перестановки m из n по номеру в лексиграфическогм и антилексиграфическом порядке 334 каждая [p.s.]формулы генерации не мои, пару лет назад бесцеремонно спер формулу у FrankensTeam, сейчас ее немного адаптировал krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Воскресенье, 28.08.2016, 21:29
Ответить
Сообщение нашел я фсе-таки время и силы (ибо в комбинаторике я не силен) для этой задачки получил формулу номера перестановки 5 из 5 для лексиграфического порядка 97 символов с константами для антилексиграфического порядка 162 символа с константами универсальне монстроформулы генерации перестановки m из n по номеру в лексиграфическогм и антилексиграфическом порядке 334 каждая [p.s.]формулы генерации не мои, пару лет назад бесцеремонно спер формулу у FrankensTeam, сейчас ее немного адаптировал Автор - krosav4ig Дата добавления - 28.08.2016 в 20:52
krosav4ig
Дата: Воскресенье, 28.08.2016, 22:20 |
Сообщение № 1182 | Тема: Вычислить max и min значение с учетом данных в другой ячейке
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
вариант с небольшой махинациейКод
=МИН(ЕСЛИ(ПРОСМОТР($D$2:$D$99;{0;50;500})=M2;ЕСЛИ($K$2:$K$99<"";$K$2:$K$99)))
Код
=МАКС(ЕСЛИ(ПРОСМОТР($D$2:$D$99;{0;50;500})=M2;ЕСЛИ($K$2:$K$99<"";$K$2:$K$99)))
вариант с небольшой махинациейКод
=МИН(ЕСЛИ(ПРОСМОТР($D$2:$D$99;{0;50;500})=M2;ЕСЛИ($K$2:$K$99<"";$K$2:$K$99)))
Код
=МАКС(ЕСЛИ(ПРОСМОТР($D$2:$D$99;{0;50;500})=M2;ЕСЛИ($K$2:$K$99<"";$K$2:$K$99)))
krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение вариант с небольшой махинациейКод
=МИН(ЕСЛИ(ПРОСМОТР($D$2:$D$99;{0;50;500})=M2;ЕСЛИ($K$2:$K$99<"";$K$2:$K$99)))
Код
=МАКС(ЕСЛИ(ПРОСМОТР($D$2:$D$99;{0;50;500})=M2;ЕСЛИ($K$2:$K$99<"";$K$2:$K$99)))
Автор - krosav4ig Дата добавления - 28.08.2016 в 22:20
krosav4ig
Дата: Понедельник, 29.08.2016, 02:52 |
Сообщение № 1183 | Тема: найти мин и макс знач. из диапазона
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
Здравствуйте можно сводной
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Понедельник, 29.08.2016, 02:53
Ответить
Сообщение Здравствуйте можно сводной Автор - krosav4ig Дата добавления - 29.08.2016 в 02:52
krosav4ig
Дата: Понедельник, 29.08.2016, 22:14 |
Сообщение № 1184 | Тема: Вычислить max и min значение с учетом данных в другой ячейке
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
еще одна небольшая махинация и можно обойтись почти без формул
еще одна небольшая махинация и можно обойтись почти без формул krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение еще одна небольшая махинация и можно обойтись почти без формул Автор - krosav4ig Дата добавления - 29.08.2016 в 22:14
krosav4ig
Дата: Вторник, 30.08.2016, 02:12 |
Сообщение № 1185 | Тема: Вычислить max и min значение с учетом данных в другой ячейке
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
и сводная, построенная по ней
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение и сводная, построенная по ней Автор - krosav4ig Дата добавления - 30.08.2016 в 02:12
krosav4ig
Дата: Вторник, 30.08.2016, 15:09 |
Сообщение № 1186 | Тема: гиперссылка на файл в имени которого имеется (#)
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
Код
=ГИПЕРССЫЛКА("фаил%23123.pdf";"фаил#123.pdf")
Код
=ГИПЕРССЫЛКА("фаил%23123.pdf";"фаил#123.pdf")
krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Вторник, 30.08.2016, 15:11
Ответить
Сообщение Код
=ГИПЕРССЫЛКА("фаил%23123.pdf";"фаил#123.pdf")
Автор - krosav4ig Дата добавления - 30.08.2016 в 15:09
krosav4ig
Дата: Вторник, 30.08.2016, 16:14 |
Сообщение № 1187 | Тема: Если текст содержит, то строка заливается
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
на диапазон A1:F9 условное форматирование по формуле
на диапазон A1:F9 условное форматирование по формуле krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение на диапазон A1:F9 условное форматирование по формуле Автор - krosav4ig Дата добавления - 30.08.2016 в 16:14
krosav4ig
Дата: Вторник, 30.08.2016, 17:04 |
Сообщение № 1188 | Тема: Скопировать строки по значению (по столбцу)
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
можно так [vba]Код
Sub test() With Application: .ScreenUpdating = 0: .EnableEvents = 0 With Me.UsedRange .AutoFilter Field:=5, Criteria1:="1" .Copy: Me.Next.[A1].PasteSpecial 8, xlNone, False, False .Copy Me.Next.[A1] .AutoFilter End With .ScreenUpdating = 1: .EnableEvents = 1: End With End Sub
[/vba]
можно так [vba]Код
Sub test() With Application: .ScreenUpdating = 0: .EnableEvents = 0 With Me.UsedRange .AutoFilter Field:=5, Criteria1:="1" .Copy: Me.Next.[A1].PasteSpecial 8, xlNone, False, False .Copy Me.Next.[A1] .AutoFilter End With .ScreenUpdating = 1: .EnableEvents = 1: End With End Sub
[/vba] krosav4ig
К сообщению приложен файл:
ntcn.xlsm
(23.6 Kb)
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение можно так [vba]Код
Sub test() With Application: .ScreenUpdating = 0: .EnableEvents = 0 With Me.UsedRange .AutoFilter Field:=5, Criteria1:="1" .Copy: Me.Next.[A1].PasteSpecial 8, xlNone, False, False .Copy Me.Next.[A1] .AutoFilter End With .ScreenUpdating = 1: .EnableEvents = 1: End With End Sub
[/vba] Автор - krosav4ig Дата добавления - 30.08.2016 в 17:04
krosav4ig
Дата: Среда, 31.08.2016, 14:00 |
Сообщение № 1189 | Тема: Номер комбинации перестановки
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
:'( это ж 36!/31!=45239040 комбинаций лучше тада ужо 7 из 49 (49!/42!=432938943360 комбинаций)
:'( это ж 36!/31!=45239040 комбинаций лучше тада ужо 7 из 49 (49!/42!=432938943360 комбинаций) krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Среда, 31.08.2016, 14:26
Ответить
Сообщение :'( это ж 36!/31!=45239040 комбинаций лучше тада ужо 7 из 49 (49!/42!=432938943360 комбинаций) Автор - krosav4ig Дата добавления - 31.08.2016 в 14:00
krosav4ig
Дата: Среда, 31.08.2016, 18:04 |
Сообщение № 1190 | Тема: Создать список на 1млрд
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
зачем? в столбец A:A целиком пишем формулу Код
=(СТОЛБЕЦ()-1)*4^10+строка()
и тянем вправо до ARJ:ARJ
зачем? в столбец A:A целиком пишем формулу Код
=(СТОЛБЕЦ()-1)*4^10+строка()
и тянем вправо до ARJ:ARJ krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение зачем? в столбец A:A целиком пишем формулу Код
=(СТОЛБЕЦ()-1)*4^10+строка()
и тянем вправо до ARJ:ARJ Автор - krosav4ig Дата добавления - 31.08.2016 в 18:04
krosav4ig
Дата: Четверг, 01.09.2016, 13:08 |
Сообщение № 1191 | Тема: Формат ячеек: Д" д." чч" ч."
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
здравствуйте как вариант формула Код
=ОТБР(K4)/1%+ОТБР(ОСТАТ(K4*24;24))
и числовой формат 00" д." 00" ч." формула Код
=ОТБР(K4)+ОКРУГЛВНИЗ(ОСТАТ(K4;1)*24%;2)
и числовой формат 00" д.",00" ч."
здравствуйте как вариант формула Код
=ОТБР(K4)/1%+ОТБР(ОСТАТ(K4*24;24))
и числовой формат 00" д." 00" ч." формула Код
=ОТБР(K4)+ОКРУГЛВНИЗ(ОСТАТ(K4;1)*24%;2)
и числовой формат 00" д.",00" ч." krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение здравствуйте как вариант формула Код
=ОТБР(K4)/1%+ОТБР(ОСТАТ(K4*24;24))
и числовой формат 00" д." 00" ч." формула Код
=ОТБР(K4)+ОКРУГЛВНИЗ(ОСТАТ(K4;1)*24%;2)
и числовой формат 00" д.",00" ч." Автор - krosav4ig Дата добавления - 01.09.2016 в 13:08
krosav4ig
Дата: Четверг, 01.09.2016, 15:17 |
Сообщение № 1192 | Тема: Формат ячеек: Д" д." чч" ч."
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
[offtop] че-то я подтупливаю [/offtop]
[offtop] че-то я подтупливаю [/offtop] krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение [offtop] че-то я подтупливаю [/offtop] Автор - krosav4ig Дата добавления - 01.09.2016 в 15:17
krosav4ig
Дата: Четверг, 01.09.2016, 15:22 |
Сообщение № 1193 | Тема: Функция суммеслимн по нескольким условиям
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
вот так должно работать (массивная формула)Код
=СУММ(СУММЕСЛИ(Регионы!$D$16:$D$10000;ЕСЛИ(C4:F4<>"";"*")&C4:F4;Регионы!E$16:E$10000))
вот так должно работать (массивная формула)Код
=СУММ(СУММЕСЛИ(Регионы!$D$16:$D$10000;ЕСЛИ(C4:F4<>"";"*")&C4:F4;Регионы!E$16:E$10000))
krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Четверг, 01.09.2016, 15:23
Ответить
Сообщение вот так должно работать (массивная формула)Код
=СУММ(СУММЕСЛИ(Регионы!$D$16:$D$10000;ЕСЛИ(C4:F4<>"";"*")&C4:F4;Регионы!E$16:E$10000))
Автор - krosav4ig Дата добавления - 01.09.2016 в 15:22
krosav4ig
Дата: Четверг, 01.09.2016, 15:47 |
Сообщение № 1194 | Тема: Ошибка в сравнении большего с меньшим временем
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
а все из-за того, что в F10 текст формулы должны быть такими Код
=ЕСЛИ(E10>--F10;E10-F10;"")
Код
=ЕСЛИ(E10<--F10;F10-E10;"")
а все из-за того, что в F10 текст формулы должны быть такими Код
=ЕСЛИ(E10>--F10;E10-F10;"")
Код
=ЕСЛИ(E10<--F10;F10-E10;"")
krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение а все из-за того, что в F10 текст формулы должны быть такими Код
=ЕСЛИ(E10>--F10;E10-F10;"")
Код
=ЕСЛИ(E10<--F10;F10-E10;"")
Автор - krosav4ig Дата добавления - 01.09.2016 в 15:47
krosav4ig
Дата: Четверг, 01.09.2016, 16:03 |
Сообщение № 1195 | Тема: Ошибка в сравнении большего с меньшим временем
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
krosav4ig
Дата: Четверг, 01.09.2016, 16:07 |
Сообщение № 1196 | Тема: Формат ячеек: Д" д." чч" ч."
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
[offtop]antycapral , это я знаю , подтупливаю я потому, что сам не использовал эту функцию[/offtop]
[offtop]antycapral , это я знаю , подтупливаю я потому, что сам не использовал эту функцию[/offtop] krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение [offtop]antycapral , это я знаю , подтупливаю я потому, что сам не использовал эту функцию[/offtop] Автор - krosav4ig Дата добавления - 01.09.2016 в 16:07
krosav4ig
Дата: Пятница, 02.09.2016, 14:55 |
Сообщение № 1197 | Тема: экспорт XML в XLS
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
есть по картинке не лечимтык
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение есть по картинке не лечимтык Автор - krosav4ig Дата добавления - 02.09.2016 в 14:55
krosav4ig
Дата: Пятница, 02.09.2016, 14:58 |
Сообщение № 1198 | Тема: Автозаполнение по 3 ячейки с шагом - 1
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
пробуйте формулу Код
=ОТБР((СТРОКА()-1)/3)+1
пробуйте формулу Код
=ОТБР((СТРОКА()-1)/3)+1
krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение пробуйте формулу Код
=ОТБР((СТРОКА()-1)/3)+1
Автор - krosav4ig Дата добавления - 02.09.2016 в 14:58
krosav4ig
Дата: Суббота, 03.09.2016, 22:24 |
Сообщение № 1199 | Тема: Окно ввода данных
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
Здравствуйте. как-то так, наверное [vba]Код
Private Sub CommandButton1_Click() [Титул!E10].Formula = TextBox1 [Титул!E16].Formula = TextBox2 [Титул!C18].Formula = TextBox3 ['таб расчетов'!P1].Formula = ComboBox2 [Прочность!BA5,Прочность!BA8,Прочность!BA11].Formula = TextBox2 End Sub
[/vba]
Здравствуйте. как-то так, наверное [vba]Код
Private Sub CommandButton1_Click() [Титул!E10].Formula = TextBox1 [Титул!E16].Formula = TextBox2 [Титул!C18].Formula = TextBox3 ['таб расчетов'!P1].Formula = ComboBox2 [Прочность!BA5,Прочность!BA8,Прочность!BA11].Formula = TextBox2 End Sub
[/vba] krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Ответить
Сообщение Здравствуйте. как-то так, наверное [vba]Код
Private Sub CommandButton1_Click() [Титул!E10].Formula = TextBox1 [Титул!E16].Formula = TextBox2 [Титул!C18].Formula = TextBox3 ['таб расчетов'!P1].Formula = ComboBox2 [Прочность!BA5,Прочность!BA8,Прочность!BA11].Formula = TextBox2 End Sub
[/vba] Автор - krosav4ig Дата добавления - 03.09.2016 в 22:24
krosav4ig
Дата: Понедельник, 05.09.2016, 00:40 |
Сообщение № 1200 | Тема: Составление списка групп и количества пользователей в них
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация:
997
±
Замечаний:
0% ±
Excel 2007,2010,2013
еще вариант, без формул, с использованием надстройки Power Query
[vba]
Код
let группы=Table.SelectColumns(Table.AddIndexColumn(Table.SelectRows(Table.UnpivotOtherColumns(Excel.CurrentWorkbook(){[Name="группы"]}[Content], {" "}, " ", "Группа"), each ([Группа] <> "")), "№п/п", 1, 1),{"№п/п","Группа"}), пользователи = Excel.CurrentWorkbook(){[Name="пользователи"]}[Content], пользователи_по_группам = Table.ExpandTableColumn(Table.NestedJoin(группы,{"Группа"},пользователи,{"Группа"}," ",JoinKind.LeftOuter), " ", {"Пользователь"}) in пользователи_по_группам
[/vba]
еще вариант, без формул, с использованием надстройки Power Query
[vba]
Код
let группы=Table.SelectColumns(Table.AddIndexColumn(Table.SelectRows(Table.UnpivotOtherColumns(Excel.CurrentWorkbook(){[Name="группы"]}[Content], {" "}, " ", "Группа"), each ([Группа] <> "")), "№п/п", 1, 1),{"№п/п","Группа"}), пользователи = Excel.CurrentWorkbook(){[Name="пользователи"]}[Content], пользователи_по_группам = Table.ExpandTableColumn(Table.NestedJoin(группы,{"Группа"},пользователи,{"Группа"}," ",JoinKind.LeftOuter), " ", {"Пользователь"}) in пользователи_по_группам
[/vba]
krosav4ig
email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
Сообщение отредактировал krosav4ig - Понедельник, 05.09.2016, 00:43
Ответить
Сообщение еще вариант, без формул, с использованием надстройки Power Query
[vba]
Код
let группы=Table.SelectColumns(Table.AddIndexColumn(Table.SelectRows(Table.UnpivotOtherColumns(Excel.CurrentWorkbook(){[Name="группы"]}[Content], {" "}, " ", "Группа"), each ([Группа] <> "")), "№п/п", 1, 1),{"№п/п","Группа"}), пользователи = Excel.CurrentWorkbook(){[Name="пользователи"]}[Content], пользователи_по_группам = Table.ExpandTableColumn(Table.NestedJoin(группы,{"Группа"},пользователи,{"Группа"}," ",JoinKind.LeftOuter), " ", {"Пользователь"}) in пользователи_по_группам
[/vba]
Автор - krosav4ig Дата добавления - 05.09.2016 в 00:40