Maz Дед Мазай Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Просьба к посетителям топика дополнять шапку наиболее часто задаваемыми вопросами со ссылками на ответы в обязательном порядке   Смена представления имен столбцов с буквенного на цифровое и обратно Сумма прописью Надстройка "PROP" (сумма прописью) надстройка Excellerator (c) Michael Zemlanukha & Maxim Shemanarev макрос Num2String Список соответствия имен функций в английской и русской версиях Excel или здесь Описание Microsoft Excel File Format (eng.) Горячие клавиши в Excel (табличка) краткая, но емкая инструкция для чайников по добавлению готовых макросов (на примере макросов по увеличению размера шрифта на X пунктов от мемебера ferias   Предыдущие ветки топика: Часть 1 | Часть 2 | Часть 3 | Часть 4| Часть 5   Все вопросы по программированию (макросы, скрипты, пользовательские функции и т.п.) обсуждаются в теме Excel VBA в разделе Прикладное программирование.   При необходимости выложить скриншот, пользуйтесь сервисом ImageShack® (ограничение на размер файла <1.5 Mb)   Книга Джон Уокенбах "Подробное руководство по созданию формул в Microsoft Office Excel 2002" PDF 34МБ Файлы к книге Смежные темы: Программы » Microsoft Office 2019 & 365 | 2016 | 2013 | 2010 | 2007 | 2003 Программы » OneNote | Outlook 2013 & 2016 & 2019 | Outlook 2010 | Microsoft Mathematics & Math Solver Программы » Word FAQ | Access FAQ Прикладное программирование » Word VBA | Excel VBA | Access VBA   Андеграунд » Microsoft Office 2019 | 2016 | 2013 | 2010 | 2007 | 2003 Андеграунд » OneNote | Visio | SharePoint Server | Project Server | Exchange Server Андеграунд » Надстройки (add-ins) и коммерческие макросы Excel Андеграунд » Самостоятельная сборка дистрибутивов Оffice 2007/2010/2013/2016 | MUI для Office 2007 Всего записей: 38816 | Зарегистр. 26-02-2002 | Отправлено: 08:02 27-03-2018 | Исправлено: Komandor, 00:39 01-01-2023

I95 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Возможно ли сделать автоматическую сортировку по убыванию в колонке L, чтобы, в зависимости от изменения данных, без макросов менялись позиции учеников в списке? Получилась такая таблица. Решение честно стырено отсюда (откуда и ваша талица с рейтингом кстати).   Автоматическая сортировка происходит на 3-м листе ""Final Ranking":     Если у вас русская локализация, то в колонке "B" в формуле нужно заменить точку (".") на запятую (",")     Там формула массива, на всякий случай напомню - вводить нужно через "CTRL"+"SHIFT"+"ENTER".   Визуально пришлось таблицу немного поменять тоже. В некоторых местах где раньше стояли "-" теперь "0", иначе сортировка работала некорректно. Всего записей: 1063 | Зарегистр. 20-03-2009 | Отправлено: 18:34 27-02-2021 | Исправлено: I95, 18:35 27-02-2021

Pazan Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору I95 Цитата: Получилась такая таблица. Решение честно стырено отсюда   я искал на многих ресурсах, но не мог понять как двигать целыми строками при динамической сортировке. а на этом сайте было что-то похожее Всего записей: 924 | Зарегистр. 17-11-2002 | Отправлено: 21:25 27-02-2021 | Исправлено: Pazan, 21:26 27-02-2021

Barboros Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Боюсь ошибиться. Напомните пожалуйста.   С каким периодом точно повторяются календари любых годов.   Какие то чаще или нет, если да, какие и у них какой период?   С инета - Периодичность повтора календаря действительно 6, 5, 6 и 11 лет. Гарантированно точно, раз в 28 лет дают.   Тогда еще уточнение. Минимум сколько и какие года (например, может зависит от того, на какой день недели должен попасть 29 февраль или еще от чего то) нужно иметь чтобы были картинки всех годов (без указания года)?    Или все 28 нужны?   --------------------  Вроде не так ужи сложно, однако. Тут поточнее уже. И конкретно для оставшихся лет 21 века: ----------------------------------------------------------------------- Календарь високосного года повторится через 28 лет. Календарь года, следующего за високосным - через 6 лет. Или для него можно взять старый календарь 11-летней давности. Календарь следующего за ним года - повторяется раз в 11 лет. Календарь года перед следующим високосным - повторится через 11 лет. Ему также соответствует календарь 6-летней давности. Вот примерная раскладка календарей, которые надо иметь, чтобы закрыть оставшиеся года 21-го века. ---------------------------------------------------------- 2007 => 2018 (1-я января - понедельник) 2013 => 2019 (вторник) 1992 => 2020 (среда, високосный) 2010 => 2021 (пятница) 2011 => 2022 (суббота) 2017 => 2023 (воскресенье) 1996 => 2024 (понедельник, високосный) 2014 => 2025 (среда) 2015 => 2026 (четверг) 2010 - 2021 - 2027 (пятница, уже закрыта. И всю неделю простых годов уже собрали) 2000 => 2028 (суббота, високосный) 2004 => 2032 (четверг, високосный) 2008 => 2036 (вторник, високосный) 2012 => 2040 (воскресенье, високосный) 2016 => 2044 (пятница, високосный). ---------------------------------------------- Таким образом 14-ью календарями можно закрыть. Следует отметить, что 14 подряд не подойдут. Как говорят коллекционеры, високосные календари более редкие (раз в 28 лет). --------------------------------------------- Сам проверить даже затрудняюсь. Глаза заболели пока глазел ще небольшую часть только... Всего записей: 770 | Зарегистр. 11-01-2007 | Отправлено: 06:45 03-03-2021 | Исправлено: Barboros, 07:54 03-03-2021

Pazan Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору В книге есть лист K1_C1 с диапазоном данных E4:E16. В VBA добавил код: Код: Private Sub Worksheet_Change(ByVal Target As Range)     If Not Intersect(Target, Range("E4:E16")) Is Nothing Then        If Target >= 10 Then           [МОЙ МАКРОС]        End If     End If   End Sub     который запускает макрос при изменении значений в диапазоне.     Но проблема в том, что работает код только тогда, когда я вручную вношу изменения в ячейки дипазона. А значения для E4:E16, по факту, берутся с другого листа и вычисляются формулами. Это решаемо? ---------- Почему глупый, потому что бедный... Почему бедный, потому что глупый... Всего записей: 924 | Зарегистр. 17-11-2002 | Отправлено: 21:46 07-03-2021

Pazan Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Приветствую,   В файле на листе есть 12 таблиц. для сортировки по алфавиту записано 12 макросов, которые вызываются нажатием кнопки, но это неудобно. Пробовал сделать макрос, чтобы сортировка запускалась при изменении любой ячейки из диапазона. Он работает только для одного диапазона B6:B21. Проблема в том, что я не знаю, как использовать этот же макрос для  других диапазонов.   Диапазоны следующие:   B27:B40 B46:B59 B65:B77 B83:B96 B102:B116 B122:B139 B145:B162 B168:B185 B191:B204 B210:B224 B230:B244   Макрос:   Код: Private Sub Worksheet_Change(ByVal Target As Range)     Dim KeyCells As Range       Set KeyCells = Range("b27:b40")   If Not Application.Intersect(KeyCells, Range(Target.Address)) _            Is Nothing Then    ' nachalo sortirovki    Range("B27:B40").Select     ActiveSheet.Unprotect     Range("B27:AE40").Select     ActiveWorkbook.Worksheets("2021-2022").Sort.SortFields.Clear     ActiveWorkbook.Worksheets("2021-2022").Sort.SortFields.Add2 Key:=Range( _         "B27:B40"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _         xlSortNormal     With ActiveWorkbook.Worksheets("2021-2022").Sort         .SetRange Range("B27:AE40")         .Header = xlGuess         .MatchCase = False         .Orientation = xlTopToBottom         .SortMethod = xlPinYin         .Apply     End With     ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _         False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _         AllowFormattingRows:=True     Range("B27").Select       ' konets sortirovki   End If End Sub ---------- Почему глупый, потому что бедный... Почему бедный, потому что глупый... Всего записей: 924 | Зарегистр. 17-11-2002 | Отправлено: 16:17 18-04-2021

bredonosec Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору А есть ли в экселе функция сортировки нечисловых значений?   Значения формата   А1 А4 В23 КН2-12 КН2-14 и т.д.   то есть, не просто строки белиберды, а цифробуквенные.     для числовых есть RANK.EQ А нечисловым - мне даже гугл ничего не дает. Всего записей: 16257 | Зарегистр. 13-02-2003 | Отправлено: 15:39 21-04-2021

ALeXkRU Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору bredonosec Цитата: функция сортировки нечисловых значений?   немного тут: про сортировку формулой (и там в конце ссылочки есть на варианты - массивы и проч.) тут ещё Всего записей: 11788 | Зарегистр. 03-12-2003 | Отправлено: 15:51 21-04-2021

bredonosec Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору ALeXkRU о, спасибо, оно самое Всего записей: 16257 | Зарегистр. 13-02-2003 | Отправлено: 13:29 22-04-2021

AlexALSP Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Подскажите знатоки, можно ли как то указать в ячейке отображать пользователя изменившего другую ячейку в расшаренном документе, если он авторизирован типа Вася Пупкин число время и если не авторизирован, в зависимости от прав доступа типа Гость дата время ?   Е:сли да, то чего там в ячейке надо прописать     Спасибо.   ---------- Развлекалово | World of Warships Всего записей: 1227 | Зарегистр. 22-04-2007 | Отправлено: 10:54 30-04-2021

harrykkk BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Gh0sTG0 Образцы файлов (2-3 шт) скиньте на обменник Всего записей: 9020 | Зарегистр. 24-02-2013 | Отправлено: 02:53 12-05-2021

harrykkk BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Gh0sTG0 Да, если столбец со ссылками первый, то Excel глючит. Как костыль добавил в файлы перед ссылками пустой столбец. Тогда объединение прошло нормально, ссылки на месте. Конечно добавлять руками в 40+ файлов пустые столбцы - это геморрой. Вам, наверное, лучше обратиться к VBA-шникам Всего записей: 9020 | Зарегистр. 24-02-2013 | Отправлено: 13:10 12-05-2021 | Исправлено: harrykkk, 13:58 12-05-2021

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36

Компьютерный форум Ru.Board » Компьютеры » Программы » Microsoft Excel FAQ (часть 6)

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование