Excel макрос автоматическая сортировка

Отсортируем формулами таблицу, состоящую из 2-х столбцов. Сортировку будем производить по одному из столбцов таблицы (решим 2 задачи: сортировка таблицы по числовому и сортировка по текстовому столбцу). Формулы сортировки настроим так, чтобы при добавлении новых данных в исходную таблицу, сортированная таблица изменялась динамически. Это позволит всегда иметь отсортированную таблицу без вмешательства пользователя. Также сделаем двухуровневую сортировку: сначала по числовому, затем (для повторяющихся чисел) — по текстовому столбцу.

Пусть имеется таблица, состоящая из 2-х столбцов. Один столбец – текстовый:

Список фруктов

; а второй — числовой

Объем Продаж

(см.

файл примера

).

Задача1 (Сортировка таблицы по числовому столбцу)

Необходимо отсортировать строки таблицы по содержимому числового столбца (по Объему продаж). Предполагается, что пользователь постоянно заполняет строки таблицы, поэтому необходимо написать формулы с учетом добавляемых значений.

Для наглядности величины значений в столбце

Объем Продаж

выделены с помощью

Условного форматирования

(

). Также желтым выделены повторяющиеся значения.

Примечание

: Задача сортировки отдельного столбца (списка) решена в статьях

Сортированный список (ТЕКСТовые значения)

и

Сортированный список (ЧИСЛОвые значения)

.

Решение1

Если числовой столбец гарантировано не содержит

повторяющихся

значений, то задача решается легко:

• Числовой столбец отсортировать функцией
  
  НАИБОЛЬШИЙ()
  
  (см. статью

  Сортированный список (ЧИСЛОвые значения)

  );

• Функцией
  
  ВПР()
  
  или связкой функций
  
  ИНДЕКС()+ПОИСКПОЗ()
  
  выбрать значения из текстового столбца по соответствующему ему числовому значению.

Однако, в реальных задачах числовой столбец может содержать повторы, а так как функция

ВПР()

в случае наличия повторов всегда выбирает только первое значение сверху (см. статью

Функция ВПР() в MS EXCEL

), то этот подход не годится (названия Фруктов будут выведены неправильно).

Поэтому механизм сортировки придется реализовывать по другому.

Создадим для удобства 2

Динамических диапазона

Фрукты

и

Продажи

, которые будут ссылаться на диапазоны ячеек, содержащие значения в соответствующих столбцах исходной таблицы. При добавлении новых строк в таблицу, границы этих динамических диапазонов будут автоматически расширяться.

В столбцах

D

и

E

разместим таблицу, которая будет динамически сортироваться,

В ячейке

Е7

запишем зубодробительную

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

:

=ИНДЕКС(Продажи; ОКРУГЛ(ОСТАТ(НАИБОЛЬШИЙ( —(СЧЁТЕСЛИ(Продажи;»<«&Продажи)&»,»&ПОВТОР(«0»;3-ДЛСТР(СТРОКА(Продажи)-СТРОКА($E$6)))&СТРОКА(Продажи)-СТРОКА($E$6)); СТРОКА()-СТРОКА($E$6));1)*1000;0) )

Данная формула сортирует столбец

Объем продаж

(динамический диапазон

Продажи

) по убыванию. Пропуски в исходной таблице не допускаются. Количество строк в исходной таблице должно быть меньше 1000.

Разберем формулу подробнее:

• Формула
  
  СЧЁТЕСЛИ(Продажи;»<«&Продажи)
  
  возвращает массив {4:5:0:2:7:1:3:5}. Это означает, что число 64 (из ячейки
  
  B7
  
  исходной таблицы, т.е. первое число из диапазона
  
  Продажи
  
  ) больше 4-х значений из того же диапазона; число 74 (из ячейки
  
  B8
  
  исходной таблицы, т.е. второе число из диапазона
  
  Продажи
  
  ) больше 5-и значений из того же диапазона; следующее число 23 — самое маленькое (оно никого не больше) и т.д.
• Теперь вышеуказанный массив целых чисел превратим в массив чисел с дробной частью, где в качестве дробной части будет содержаться номер позиции числа в массиве: {4,001:5,002:0,003:2,004:7,005:1,006:3,007:5,008}. Это реализовано выражением
  
  &»,»&ПОВТОР(«0»;3-ДЛСТР(СТРОКА(Продажи)-СТРОКА($E$6)))&СТРОКА(Продажи)-СТРОКА($E$6))
  
  Именно в этой части формулы заложено ограничение о не более 1000 строк в исходной таблице (см. выше). При желании его можно легко изменить, но это бессмысленно (см. ниже раздел о скорости вычислений).
• Функция
  
  НАИБОЛЬШИЙ()
  
  сортирует вышеуказанный массив.
• Функция
  
  ОСТАТ()
  
  возвращает дробную часть числа, представляющую собой номера позиций/1000, например 0,005.
• Функция
  
  ОКРУГЛ()
  
  , после умножения на 1000, округляет до целого и возвращает номер позиции. Теперь все номера позиций соответствуют числам столбца
  
  Объемы продаж,
  
  отсортированных по убыванию.
• Функция
  
  ИНДЕКС()
  
  по номеру позиции возвращает соответствующее ему число.

Аналогичную формулу можно написать для вывода значений в столбец

Фрукты

=ИНДЕКС(Фрукты;ОКРУГЛ(…))

В

файле примера

, из-за соображений скорости вычислений (см. ниже), однотипная часть формулы, т.е. все, что внутри функции

ОКРУГЛ()

, вынесена в отдельный столбец

J

. Поэтому итоговые формулы в сортированной таблице выглядят так:

=ИНДЕКС(Фрукты;J7)

и

=ИНДЕКС(Продажи;J7)

Также, изменив в формуле массива функцию

НАИБОЛЬШИЙ()

на

НАИМЕНЬШИЙ()

получим сортировку по возрастанию.

Для наглядности, величины значений в столбце

Объем Продаж

выделены с помощью

Условного форматирования

(

). Как видно, сортировка работает.

Тестируем

Теперь добавим новую строку в исходную таблицу. В динамически сортируемых таблицах мы должны получить соответствующую сортировку.

1. В ячейку

А15

исходной таблицы введите слово

Морковь

; 2. В ячейку

В15

введите

Объем продаж

Моркови = 25; 3. После ввода значений, в столбцах

D

и

Е

автоматически будет отображена отсортированная по убыванию таблица; 4. В сортированной таблице новая строка будет отображена предпоследней.

Скорость вычислений формул

На «среднем» по производительности компьютере пересчет пары таких

формул массива,

расположенных в 100 строках, практически не заметен. Для таблиц с 300 строками время пересчета занимает 2-3 секунды, что вызывает неудобства. Либо необходимо отключить автоматический пересчет листа (

) и периодически нажимать клавишу

F9

, либо отказаться от использования формул массива, заменив их столбцами с соответствующими формулами, либо вообще отказаться от динамической сортировки в пользу использования стандартных подходов (см. следующий раздел).

Альтернативные подходы к сортировке таблиц

Отсортируем строки исходной таблицы с помощью стандартного фильтра (выделите заголовки исходной таблицы и нажмите

CTRL+SHIFT+L

). В выпадающем списке выберите требуемую сортировку.

Получим идентичный нашему вариант таблицы, но при добавлении в таблицу новых значений придется применять фильтр заново.

Также можно воспользоваться инструментом Сортировка (

). Для этого нужно выделить все значения исходной таблицы не включая заголовок, вызвать инструмент Сортировка, выбрать столбец, по которому требуется сортировать и вариант сортировки.

Получим идентичный нашему вариант таблицы, но при добавлении новых значений также придется применять фильтр заново.

При использовании

Таблиц в формате EXCEL2007

мы также не получим динамической сортировки. Новое значение (Картофель) останется последним в исходной таблице (до принудительной сортировки таблицы через фильтр), не смотря на его значение продаж (200).

Какой вариант предпочтительней — как всегда — выбирать разработчику.

Еще одна формула массива (+дополнительный столбец). Задача1.1

Сортировку таблицы можно сделать с помощью другой, более простой

формулы массива

, но нам понадобится дополнительный (служебный) столбец D (см.

файл примера лист Пример2

):

=

НАИБОЛЬШИЙ(ЕСЛИ(F7=$B$7:$B$14;СТРОКА($B$7:$B$14)-СТРОКА($B$6);0);СЧЁТЕСЛИ($F$7:$F$14;F7)-СЧЁТЕСЛИ($F$6:F6;F7))

В столбце F содержится отсортированный столбец В (объем продаж). Формула возвращает позицию значения объема продаж. Например, число 86 находится в 5-й строке таблицы.

Для повторов выражение

ЕСЛИ(F8=$B$7:$B$14;СТРОКА($B$7:$B$14)-СТРОКА($B$6);0)

будет возвращать несколько значений: {0:2:0:0:0:0:0:8}, т.е. число 74 находится в строках 2 и 8.

С помощью функции

НАИБОЛЬШИЙ()

сначала выводится 2, затем 8 (в разных строках).

Эта формула более наглядна, чем рассмотренная выше в начале статьи, но требует наличия дополнительного столбца.

Задача2 (Сортировка таблицы по текстовому столбцу)

Отсортируем строки таблицы по содержимому Текстового столбца (по Фруктам).

Примечание

: Про сортировку списка текстовых значений можно прочитать в статье

Сортированный список в MS EXCEL (ТЕКСТовые значения)

Как и в предыдущей задаче предположим, что в столбце, по которому ведется сортировка имеются повторы (названия Фруктов повторяются).

Для сортировки таблицы придется создать 2 служебных столбца (D и E).

В столбце D введем

формулу массива, возвращающую несколько значений

=

СЧЁТЕСЛИ($B$7:$B$14;»<«&$B$7:$B$14)+1

Эта формула является аналогом

ранга

для текстовых значений (позиция значения относительно других значений списка). Текстовому значению, расположенному ниже по алфавиту, соответствует больший «ранг». Например, значению Яблоки соответствует максимальный «ранг» 7 (с учетом повторов).

В столбце E введем обычную формулу:

=

СЧЁТЕСЛИ($D$6:D6;D7)+D7

Эта формула учитывает повторы текстовых значений и корректирует «ранг». Теперь разным значениям Яблоки соответствуют разные «ранги» — 7 и 8. Это позволяет вывести список сортированных значений. Для этого используйте формулу (столбец G):

=

ИНДЕКС($B$7:$B$14;ПОИСКПОЗ(СТРОКА()-СТРОКА($G$6);$E$7:$E$14;0))

Аналогичная формула выведет соответствующий объем продаж (столбец Н).

Задача 2.1 (Двухуровневая сортировка)

Теперь снова отсортируем исходную таблицу по Объему продаж. Но теперь для повторяющихся значений (в столбце А три значения 74), соответствующие значения выведем в алфавитном порядке.

Для этого воспользуемся результатами Задачи 1.1 и Задачи 2.

Подробности в

файле примера

на листе Задача2.

Сортировка в Excel формулой.

​Смотрите также​​: данные обновлять не​Файл не получилось​ ​ лист, туда формулу​​ срабатывал на странице?​​ (к примеру, в​ ​ я новичок, поэтому​​ что столбец «G»​ одном из форумов,​ ЧТО (A3:C11)​ между буквами и​ но я его​ помощь.​ сразу по нескольким​ Или в определенной​=ЕСЛИОШИБКА(ИНДЕКС(Фамилии;ПОИСКПОЗ(НАИМЕНЬШИЙ(СЧЁТЕСЛИ(Фамилии;» И формулу​ «НАИБОЛЬШИЙ». =НАИБОЛЬШИЙ(A:A;СТРОКА(A1))​Есть несколько способов​ формулой, а макросом.​ приложить, ну и​
​ например​ Поскольку идет импорт​ 3 и 40​ просьба не быть​
​ у меня формируется​
​ если найду, выложу,​ ​и сортируем сначала​
​ проч.​ не смог адаптировать​На всякий случай​
​ столбцам и строкам,​ последовательности — звание,​
​ протянуть вниз по​
​Второй способ​, как сделать сортировку​ и добавить сортировку.​ ладно… (Только нужно​=COUNTA(Лист1!A:S)​ данных извне и​ строках) — остальная​ слишком строгими ко​
​ на основании сложения​ но формулы там​ по Диапазону Название​
​Serge​​ к своему файлу​
​ опишу механику фильтрации​ ​ по нескольким условиям.​
​ чин, должность, название​ столбцу чуть ниже​.​ в​ и можно запускать​ первую таблицу сделать​В модуль этого​​ обновляются с периодичностью​ информация не должна​ мне. Вопрос следующий.​ и умножения других​ гигантские скажу сразу!​ (А3:А11)​: А почему не​ :(​
​ по значению, может​ Как настроить такую​
​ месяцев по порядку,​ последней строки таблицы.​Сортировка по алфавиту в​Excel​ кнопкой или сочетанием​ массивом «Таблица1»)​ листа код​ 5 минут. То​
​ попадать на новый​ У меня есть​ ячеек, и данный​ )​потом по Диапазону​ использовать сводную?​Возможно это както​ кто сделает проще.​ сортировку, смотрите в​ а не по​Если данные в​Excel.​. Для этого есть​
​ клавиш. Успехов!​upd​Private Sub Worksheet_Calculate()​ есть, чтобы макрос​
​ лист. Импорт данных​ некая информация преобразованная​ макрос автоматически произведёт​Excel-ok​ Столбец1 (В3:В11)​Григорий​ формулами сделать?​1)В таблицу с​ статье «Сортировка в​ алфавиту.​

excel-office.ru

Как настроить сортировку в Excel.

​ таблице не сортируются​​Если в столбце​функция в​Lelush​Получилось.​ Лист1.www End Sub​ для «Статистики» срабатывал​ из внешних источников​ в excel-файл. Необходимо​ сортировку только если​: Читать так:​Проверьте имена диапазонов​: Serge Для сводной​vikttur​
​ данными добавил столбец​
​ Excel по нескольким​Можно сделать любой​ по дате, значит​ стоят не числа,​Excel «Сортировка и фильтр».​: У меня есть​Как сделать автоматическую сортировку​Это в файл​ автоматически.​ (строк может быть​
​ отобрать нужные строки​ я зайду в​ЕСТЬ решение этой​ что были присвоены​ данные неудобные.​: Сортировка по тексту​ с нумерацией строк​ столбцам и строкам»​ список. У нас​ не правильно написаны​
​ а текст, например,​Как сортировать с​ столбец​

​ списка значений от​ Карена​Hugo​ любое количество -​​ и автоматически скопировать​​ любую ячейку G​ задачи и с​ и все должно​​Микки В макросе​ — по алфавиту​ (хотя можно было​ тут.​ есть такая таблица.​ все или некоторые​ фамилии, наименование товара,​ помощью этой функции,​​A​ минимального до максимального,​Можно аналогично и​​: А мне вариант​ главное, чтобы они​ их на отдельный​ и затем нажму​
​ помощью формул. Его​ работать​ выдает ошибку на​ или есть числовые​ и через «строку»​Таблицу Excel можно​Выделяем столбец. Заходим​ даты. Как правильно​ т.д., то используем​​ читайте в статье​
​с данными, который​ в котором эти​ мой код вызывать​ Карена нравится больше​ удовлетворяли требованиям по​ лист. Еще момент​ энтер. А хотелось​ KL приводил как-то​Private Sub Worksheet_Change(ByVal​ Range(«Что»).Select . Можно​
​ «вкрапления», как в​ пойти).​ защитить от других​ на закладке «Главная»​ сортировать по датам,​ формулу массива. Таблица​

excel-office.ru

Автоматическая сортировка списка

​3)К данным находящимся​​ Защита Excel».​». В появившемся окне​Сортировка в Excel​ это сделать, читайте​ формул. Эта сортировка​копировались записи из​

​ автоматической.​​ пожалуйста, возможен ли​ — зависит как​ 2.​ можно Excel 2007​ по возрастанию а​
​ сразу!​ Range(«A3:C11»)) Is Nothing​

​ при переносе надо​​В моем случае​ в столбце по​Григорий​ в разделе «Порядок»​проводится разными способами​

​ будут числовые вкропления,​​ которому необходима фильтрация​: Всем здравствуйте.​ выбираем «Настраиваемый список».​ — функцией «Сортировка»,​

​ имя в Excel​​ при изменении данных​A​ по занятому месту​
​ автоматом подставлял из​Можно на третьем​: Фильтр в T​: roadtomoney, Вам, как​_Boroda_​Guest​
​’если выделили больше​ и диапазонов). Меняю​ при этом колличество​ прибавил данные из​Описание:​В разделе окна «Списки»​ формулами, т.д. Но​

​ ячейке, диапазону, формуле»​​ в столбце, произойдет​и тут же​

​ знаков может различаться.​​ на 1 000​ которой могут появляться​ список», выделяем его.​

​ случае появлении в​​ таблица :)).​ и пишем наш​ «Сортировка в Excel».​=ИНДЕКС(Фамилии;ПОИСКПОЗ(НАИМЕНЬШИЙ(СЧЁТЕСЛИ(Фамилии;» Для ввода​ таблице Excel с​A​Имя3 — 1​: maxx13, вы там​ понятно — куда​

​ помощью формул.​​и в столбце​

​ место​​ что-то забыли приложить.​ копировать? Всегда в​ выглядеть макрос?​ на​r1_ = .UsedRange.Rows.Count​ динамические диапазоны и​’ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Clear​ д​

planetaexcel.ru

Автоматическая сортировка в Excel (Формулы/Formulas)

​Микки​​ (а у меня​

​Так вот необходимо​ Получилось так.​
​ сортировку в помощью​ клавиш «Ctrl» +​
​Первый способ.​R​Имя4 - 3​
​maxx13​
​ A1?​
​Hugo​
​такое​
​If Not Intersect(Target,​
​ не парьтесь или​

​ActiveWorkbook.Worksheets(«Лист1»).Sort.SortFields.Add Key:=Range(«Название»), _​Serge​: Интересно почему не​ они целые) формула​ настроить автоматическую сортировку​Нажимаем кнопку «Добавить» наш​ формул, смотрите в​ «Shift» + «Enter»,​Сортировка в​уже обновлённый отсортированный​ место.​: сори​roadtomoney​: Sub tt() With​количество строк. Да​ Range(«D1:F» & r1_))​ засадите макрос на​SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal​

​: {quote}{login=Григорий}{date=03.09.2009 03:13}{thema=}{post}Serge Для​​ смогли ? Что​
​ все равно получало​ по тексту а​
​ список появился в​ статье "Сортировка в​
​ п.ч. это формула​
​Excel по возрастанию.​
​ список.​Полосатый жираф алик​buchlotnik​
​: Копирование на соседний​
​ Sheets(1) If .AutoFilterMode​
​ и какие строки​ Is Nothing Then​
​ кнопочку​
​ActiveWorkbook.Worksheets("Лист1").Sort.SortFields.Add Key:=Range("Столбец1"), _​
​ сводной данные неудобные.​ Вам так сильно​
​ сове наибольшее с​
​ после по значению.​
​ левой стороне окна.​
​ Excel формулой" здесь.​
​ массива. Копируем формулу​

excelworld.ru

Автоматическая сортировка и копирование строк в excel

​Сортируем с помощью​​Ещё есть такой​: На том же​: так нужно?​ лист, всегда в​ Then .AutoFilter.Range.AutoFilter End​ считать «нужными» -​With .Sort.SortFields​stalber​SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal​Прикольно, я ещё​ мешает?​ небольшой погрешностью которая​ С настройкой отдельно​Нажимаем «ОК». Здесь же​Сортировка списка в Excel.​ вниз по столбцу.​ функций «НАИМЕНЬШИЙ» или​ нюанс: в этих​

​ месте — формулой​​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЕСЛИОШИБКА(ИНДЕКС(D$90:D$108;ПОИСКПОЗ($C17;$C$90:$C$108;0));»»)​ A1 Вопрос в​ With With Sheets(1).UsedRange.Columns(20)​ пока только Вы​.Clear​: Использую данный код:​With ActiveWorkbook.Worksheets(«Лист1»).Sort​ не встречал неудобных​​vikttur​​ потом округлялась и​ по значению проблем​ можно удалить ненужный​Таблица Excel сортирует​ Получилось так.​ «НАИБОЛЬШИЙ».​ столбцах строка 1​ не получится. А​

​_Boroda_​​ том, что на​

​ .AutoFilter Field:=1, Criteria1:=»Статистика»​​ знаете. Как должен​.Add Key:=Range(«G1:G» &​Private Sub Worksheet_Change(ByVal​.SetRange Range(«Что»)​ данных ;)​: Вопрос был в​ как следствие исчезала.​ нет — использую​ список, предварительно выделив​ данные по определенным​Если предполагается добавлять​В ячейке В5 пишем​ обычная, а начиная​ в другом столбце​: Еще вариант​ первом листе данные​ .SpecialCells(xlCellTypeVisible).EntireRow.Copy Sheets(2).[a1] End​ выглядеть желаемый результат​ r1_), Order:=xlDescending​ Target As Range)​.Header = xlYes​прохожий​ следующем — как​

​4)Ну а дальше​​ функцию «наибольший» а​ его.​ спискам. Мы можем​ строки в таблицу,​

​ такую формулу. =НАИМЕНЬШИЙ(A:A;СТРОКА(A1))​​ со второй и​ — запросто. Заодно,​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СУММПРОИЗВ(($C17=$C$90:$C$108)*D$90:D$108)​

​ динамические и меняются​​ With Sheets(1).AutoFilter.Range.AutoFilter End​ — тоже никто​End With​On Error Resume​.MatchCase = False​: А почему именно​ сортировать?​ комбинацией Индекс(Поискпоз вытаскивал​

​ вот с текстом…..​​Теперь сортируем так:​

​ сами создать свои​​ то можно сделать​Обратите внимание!​ далее идёт группировка​ а по какой​​И формат ячеек​ автоматически каждые 5​ Sub​ не знает…​With .Sort​ Next​.Orientation = xlTopToBottom​ автоматическая? А нажатием​По алфавиту можно,​ в новую таблицу​Т.е. при обновлении​

​ «Сортировка и фильтр»​​ списки, по которым,​ динамический диапазон столбца​
​Хотя первая ячейка​ по 2 ячейки.​
​ формуле считаются места?​# ##0,00;;​ минут, а макрос​k61​
​roadtomoney​.SetRange Range(«D1:G» &​If Not Intersect(Target,​.SortMethod = xlPinYin​ кнопки сложно?​
​ но формулами по​ необходимые мне данные​ данных, в итоговой​ -> «Настраиваемая сортировка»​

​ затем, будем сортировать​​ А. Смотрите статью​ для сортировки находится​kalbasiatka​Alex​maxx13​ для обновления статистики​: …​: Спасибо. Сейчас исправлюсь)​ r1_)​ Range(«G:G»)) Is Nothing​.Apply​Микки​ первым одной-двум буквам,​Микки​

​ таблице данные должны​​ -> выбираем в​ данные. Эти списки​ «Чтобы размер таблицы​ в пятой строке​
​: Добавить и отсортировать.​
​: Копай в сторону​: да, спасибо огромное.​
​ приходится запускать вручную.​roadtomoney​
​roadtomoney​.Apply​
​ Then​End With​: Объясняю​ далее усложнение. А​

planetaexcel.ru

Автоматическая сортировка (Формулы/Formulas)

​: Добавил Вам автосортировку​​ выстроиться в алфавитном​ разделе «Порядок» диалогового​ будут работать и​ Excel менялся автоматически».​ таблицы (А5), в​ А лучше к​ условного форматирования. Сортировку​ уже проще от​

​ Можно сделать так,​​: Спасибо большое. Все​: Прикладываю новый файл.​

​End With​​Range(«G1»).Sort Key1:=Range(«G1»), _​

​End If​​Используются 3 именованных​​ если имеется текст​

​ изменитн любое значение​​ порядке с дополнительной​
​ окна «Настраиваемый список».​
​ в других книгах​
​ Тогда формулу массива​

​ формуле пишем ячейку​​ своим темам файл​ не сделает, но​ 200 органов такое​ чтобы макрос запускался​ работает!!! Столько по​

​ Проблема описана в​​End If​​Order1:=xlAscending, Header:=xlYes, _​
​End Sub​ диапазона на Листе​ с тремя-пятью одинаковыми?​ в 1 или​ сортировкой (в случае​
​ Выделяем его, нажимаем​​ Excel.​

excelworld.ru

Автоматическая сортировка в excel 2010 ?

​ пометить можно при​​ файла​ обновлением первого листа?​ ты лучший​ проблемы в том,​End Sub​Orientation:=xlTopToBottom​: Если решение этой​

​Если изменилось что​​ тоже можно, но​ имена лучше динамические​ по данным в​ «ОК».​ рассортировать данные магазина​ дополнить функцией. Формулу​ Получилось так.​

​ гадали люди в​​ тех или иных​BobroEJ​Hugo​Можно еще один​ что необходимо, чтобы​roadtomoney​

Автоматическая сортировка

​End If​​ задачи с помощью​ либо в диапазоне​​ нужно знать некоторые​​ но писать лень​ таблице.​Получилось так.​ по отделам (фамилии​​ в ячейке В1​​В столбце С установили​ какой плоскости у​​ условиях.​​:​: Так ведь уже​ вопрос… Как сделать,​ копировались именно строки​: Здравствуйте, уважаемые форумчане.​​End Sub​​ формул. Его KL​​ A3:C11​​ подробности — размещение,​Гигорий​
​Буду благодарен за​В Excel можно сортировать​ сотрудников, товар, др.).​ напишем такую.​ формулу с функцией​ вас группировка ячеек.​Шведов сергей​

​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЕСЛИ(ЕОШИБКА(ИНДЕКС(Таблица1;ПОИСКПОЗ($C17;ИНДЕКС(Таблица1;;1);0);D$16-3));»»;ИНДЕКС(Таблица1;ПОИСКПОЗ($C17;ИНДЕКС(Таблица1;;1);0);D$16-3))​​ написал — добавляете​ чтобы макрос автоматически​ с информацией, как​ В последующем вопросе​Неудобство в том,​ приводил как-то на​то выделяем диапазон​ наличие цифровых знаков​

CyberForum.ru

​: Спасибо за макрос,​