Как в excel отсортировать по количеству слов

В этой статье я собираюсь рассказать о сортировке списка строк по количеству слов. Если вам это интересно, пожалуйста, спуститесь вниз, чтобы просмотреть подробности.

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

Сортировка по количеству слов с подсчетом слов в диапазоне

---

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

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

1. Выберите ячейку рядом со списком, введите эту формулу = LEN (A1) -LEN (ПОДСТАВИТЬ (A1; «»; «»)) + 1, нажмите Enter и перетащите дескриптор заполнения вниз к нужным формулам ячеек.

2. Не снимая выделения с ячеек формулы, нажмите Данные > Сортировка от А до Я, проверить Расширить выбор вариант в Предупреждение о сортировке Диалог.

3. Нажмите Сортировать. Список отсортирован по количеству слов.

Наконечник:

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

2. Если вы хотите отсортировать по количеству символов, используйте эту формулу = LEN (A1) для подсчета символов и последующей сортировки.

---

Сортировка по количеству слов с подсчетом слов в диапазоне

Чтобы подсчитать количество слов в ячейке или диапазоне, Подсчитать общее количество слов of Kutools for Excel может оказать прекрасную услугу.

После установки Kutools for Excel, пожалуйста, сделайте следующее:(Бесплатная загрузка Kutools for Excel Сейчас!)

1. Выберите ячейку рядом со списком строк и щелкните Кутулс > Помощник по формулам> Статистика > Подсчитать общее количество слов. Смотрите скриншот:

2. Затем в Формула Помощник диалоговом окне выберите ячейку, которую вы используете для подсчета Диапазонпо умолчанию ячейки будут выбраны как абсолютные ссылки, вы можете изменить их на относительные ссылки. Смотрите скриншот:

3. Нажмите Ok, и подсчитано количество слов в ячейке. Перетащите маркер заполнения вниз, чтобы применить формулу к ячейкам.

4. Не снимая выделения с ячеек формулы, щелкните Данные > Сортировка от А до Я, и проверьте Расширить выбор в всплывающем диалоговом окне.

5. Нажмите Сортировать, и список отсортирован по количеству слов.

---

Относительные статьи

• Как отсортировать список по определенным словам в Excel?

---

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

• Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
• Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
• Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
• Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
• Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
• Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
• Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
• Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
• Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

---

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

• Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
• Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
• Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

Комментарии (0)

Оценок пока нет. Оцените первым!

Сортировка списка в MS EXCEL по длине строки

​Смотрите также​ + 1, 1)​ строки содержащие более​ + 1) massive(sJ​

​ Integer Sheets(«Лист2»).Select Range(«A1:D12»).Clear​​ все равно картинку…Ждите​​ копировать, чтобы не​ «ручнике».​Мои данные содержат заголовки​автоматически расширить выделенный диапазон​ числа в нужном​Сортировка​

​ в поле​ хотя бы одну​ отсортировать эти группы​

​ минимальному​
​Для поиска наибольших и​
​Имеется список (диапазон) с​

• ​ sp(i).FirstName = Cells(i​ 35 символов.​ + 1) =​
• ​ Sheets(«Лист1»).Select While Cells(n​ того, кому не​ ошибиться.​EvgenStor​.​, в противном случае —​ порядке.​.​Затем по​ запись.​ с одинаковыми значениями​).​
• ​ наименьших значений в​ текстовыми значениями, нужно​ + 1, 2)​
• ​Как это можно​ buf End If​ + 1, 1)​ лень будет перерисовывать​Дмитрий​: Казанский, ber$erk​К началу страницы​сортировать в пределах указанного​Чтобы выполнить сортировку по​В диалоговом окне​выбран тот же​

​Чтобы изменить порядок сортировки​ по другому столбцу​Примечания:​ диапазоне ячеек или​ отсортировать его по​

​ sp(i).PapaName = Cells(i​
​ сделать? Работаю в​ End If Next​ <> «» n​​ с Вашей картинки​​: пиши на почту.​

excel2.ru

Сортировка данных в диапазоне или таблице

​Спасибо! Благодарю Вас​Видео. Сортировка данных в​ выделения​ значению, выберите один​Сортировка​ столбец и что​ столбцов, выделите запись​ или строке. Например,​ ​ таблице, например 10 самых​ убыванию длины строки.​ + 1, 3)​ 2007.​ sJ Next sI​ = n +​ данные в файл​ обсудим.. на чем​ за помощь!​ таблице​

​.​ из вариантов в​в группе​ сделан тот же​ нужного столбца и​ если есть столбцы​Возможные проблемы​ высоких оценок или​В столбце​ Next i sp​Спасибо.​ sortByPapaName = massive​ 1 Wend n​ Excel.​ писать и стоимость​Roser​Общие сведения о формулах​Если результат не соответствует​ раскрывающемся списке «Порядок».​Столбец​ выбор в поле​ щелкните стрелку​ «Отдел» и «Сотрудник»,​   ​ 5 самых низких сумм​

​А​​ = sortByLastName(sp, n,​

• ​Владимир​ End Function​ = n -​Хотя опять повторюсь​Павел грищук​: Как вариант применить​ в Excel​ желаемому, нажмите кнопку​Для текстовых значений выберите​

• ​в поле​Порядок​Вверх​ можно сначала выполнить​Убедитесь, что все числа​ продаж, можно использовать​

В этой статье

Сортировка текстовых значений

1. ​имеется список, в​ True) sp =​

2. ​: =если(длстр(а1>35;»удалить»;»»)​​Pavel55​​ 1 ReDim sp(n)​​ — самое простое​​: Это разовая задача,​ формулу =ДЛСТР (текст)​

   • ​Рекомендации, позволяющие избежать появления​Отменить​ вариант​​Сортировать по​​.​или​​ сортировку по столбцу​

   • ​ сохранены в числовом​ функцию «Автофильтр» или​ соседнем столбце приведен​​ sortByFirstName(sp, n, True)​​Затем сортируем и​: Если с практической​​ For i =​

​ это вычисление длины​​ или часто приходится​​Например в ячейках​

• ​ неработающих формул​.​От А до Я​​или​Повторите эти операции для​Вниз​ «Отдел» (для группировки​ формате.​ условное форматирование.​ тот же список,​ sp = sortByPapaName(sp,​ удаляем.​ точки смотреть на​ 1 To n​ строки в отдельном​ делать? Если СОВСЕМ​ А1-А20 есть текст,​Поиск ошибок в формулах​Примечание:​или​Затем по​​ каждого дополнительного цвета​​рядом с кнопкой​ всех сотрудников по​​    Если результаты отличаются от​​Дополнительные сведения см. в​​ но отсортированный по​​ n, True) j​​Guest​​ задачу, то я​​ sp(i).LastName = Cells(i​​ столбце. Можно еще​​ не программист -​​ который нужно отсортировать.​​Сочетания клавиш и горячие​​ Отсортировать подобным образом значения​

• ​От Я до А​​укажите столбец для​ ячеек, шрифта или​Параметры​ отделам), а затем —​ ожидаемых, возможно, столбец​ статьях Фильтрация данных​ длине строки (см.​ = 2 For​: в соседний столбец​

Сортировка чисел

1. ​ бы её решил​ + 1, 1)​

2. ​ расширенным фильтром это​​ попробуй в екселе,​​ В соседней свободной​​ клавиши в Excel​​ в таблице нельзя.​.​

   • ​ сортировки по настраиваемому​ значка, которые необходимо​​.​​ по имени (для​ содержит числа, сохраненные​​ в таблице или​

   • ​ файл примера).​ i = 1​​ формулу:​​ бы так​ sp(i).FirstName = Cells(i​​ сделать.​

​ там довольно понятно​​ ячейке (напимер С1)​

• ​Функции Excel (по алфавиту)​​Если результаты сортировки данных​

• ​Для числовых значений выберите​ списку.​ включить в сортировку.​​Столбцы с более​ расположения имен сотрудников​ в текстовом формате.​ диапазоне Excel и​Для получения отсортированного списка​ To n Sheets(«Лист2»).Select​=ДЛСТР(A2)>35​Sub Laba6() Dim​ + 1, 2)​KuklP​​ это делается​​ пишем формулу =ДЛСТР​Функции Excel (по категориям)​ не соответствуют ожиданиям,​По возрастанию​В поле​Для сортировки в определенном​

Сортировка значений даты и времени

1. ​ высокой позицией в​ каждого отдела в​

2. ​ Например, отрицательные числа,​​ Применение условного форматирования​​ используется формула массива​​ Cells(j, 1) =​​фильтр по ИСТИНА​ i As Long,​

   • ​ sp(i).PapaName = Cells(i​: Так.​​kold4x​​ (А1), растягиваем ее​alexp2​​ сделайте следующее.​

   • ​или​Порядок​ пользователем порядке можно​ списке будут отсортированы​​ алфавитном порядке). Можно​​ импортируемые из некоторых​ в Excel.​​ и экстравагантный подход.​

​ sp(i).LastName Cells(j, 2)​​ и удаляем строчки​​ iLastRow As Long,​​ + 1, 3)​

• ​kold4x​: Всем привет.​ на весь диапазон​: Здравствуйте.​​Проверьте, не изменились ли​По убыванию​выберите пункт​ использовать настраиваемые списки.​ раньше, чем столбцы​ одновременно выполнять сортировку​ систем бухгалтерского учета,​Выделите ячейку в столбце,​Формула для сортировки:​ = sp(i).FirstName Cells(j,​KuklP​ Arr() As Variant​ Next i sp​: Я длину текста​Версия 2013 года.​ до С20. В​Интересует, возможно ли​ значения, возвращаемые формулами​.​Настраиваемый список​ Например, пусть столбец,​ с более низкой​

• ​ по 64 столбцам.​ или числа, содержащие​ который требуется отсортировать.​=ЕСЛИОШИБКА(ИНДЕКС(Список;​ 3) = sp(i).PapaName​: На все форумы​ Application.ScreenUpdating = False​ = sortByLastName(sp, n,​ вычислил сторонним способом​Вопрос по настройке​ итоге в Столбце​ в Excel сортировать​    Если сортируемые данные содержат​Для дат и времени​.​ по которому нужно​ позицией.​Примечание:​ начальный символ апострофа​

Сортировка по нескольким столбцам или строкам

​На вкладке​ПОИСКПОЗ(НАИБОЛЬШИЙ((ДЛСТР(Список)&»,»&СТРОКА(Список))*1; ЧСТРОК(B$1:$B1));(ДЛСТР(Список)&»,»&СТРОКА(Список))*1;0));»»)​ j = j​ напостил.​ Sheets(«Лист2»).Range(«A1:D12»).Clear With Sheets(«Лист1»)​ True) sp =​ для наглядности. В​ фильтра по количеству​ С получаем количество​ текстовый список по​ одну или несколько​ выберите​В диалоговом окне​ выполнить сортировку, содержит​Если диапазон ячеек или​ Для получения наилучших результатов​ (​Главная​Здесь Список – Именованный​ + 1 Next​menedzher​ .Select iLastRow =​ sortByFirstName(sp, n, True)​ оригинале нет. Есть​ символов в строке.​

​ знаков в фразах​​ кол-ву символов в​ формул, значения, возвращаемые​От старых к новым​Списки​

1. ​ значения «Высокий», «Средний»​ столбец таблицы был​

   

2. ​ в сортируемый диапазон​​’​​в группе​​ диапазон представляющий собой​​ i End Sub​​: На популярные- для​​ .Cells(.Rows.Count, 1).End(xlUp).Row Arr()​

   

3. ​ sp = sortByPapaName(sp,​​ только текстовые значения.​​Есть столбец с​​ из ячеек столбца​​ строке, например сначала​​ ими, при пересчете​​или​выберите нужный список.​ и «Низкий». Как​

   

4. ​ отформатирован вручную или​​ нужно включить заголовки​​), сохраняются в текстовом​Сортировка и фильтр​ исходный список;​

   • ​ Private Function sortByLastName(massive()​ ббыстроты решения вопроса.​ = .Range(«A1»).CurrentRegion.Value ReDim​ n, True) j​The_Prist​​ данными. Нужно показать​​ А. Проводим сортировку​

   • ​ выводить самую короткую​ листа могут измениться.​​От новых к старым​​ В нашем примере​​ выполнить сортировку таким​​ с помощью условного​​ столбцов.​​ виде. Дополнительные сведения​

5. ​выполните одно из​​Так как функция ДЛСТР()​​ As Spisok, massiveSize​menedzher​ Preserve Arr(1 To​

   • ​ = 2 For​​: Расширенный фильтр.​​ значения меньшие или​​ по столбцу С,​​ строку и затем​

   • ​ В этом случае​​.​​ нужно выбрать список​​ образом, чтобы сначала​​ форматирования с использованием​

   • ​Выделите любую ячейку в​ см. в разделе​​ указанных ниже действий.​​ всегда возвращает целое​​ As Integer, key​​: Спасибо.​

   • ​ UBound(Arr, 1), 1​ i = 1​В ячейку А2​​ равно, а потом​​ и, если не​

6. ​ по нарастающей…​ примените сортировку повторно,​Чтобы выполнить сортировку по​​Высокий, Средний, Низкий​​ шли строки со​ цвета ячеек или​ диапазоне данных.​

   

7. ​ Преобразование чисел из​Чтобы быстро отсортировать значения​ число, то конструкция​​ As Boolean) As​​Как правильно использовать​

8. ​ To UBound(Arr, 2)​ To n Sheets(«Лист2»).Select​ вносите формулу =​​ наоборот больше.​​ надо столбца С,​

   ​Если это невозможно,​​ чтобы получить актуальные​ цвету ячейки, цвету​.​

9. ​ значением «Высокий», затем​ цвета шрифта, можно​На вкладке​ текстового формата в​​ по возрастанию, нажмите​​ (ДЛСТР(A2)&»,»&СТРОКА(A2))*1 формирует число,​​ Spisok() ‘ key​​ вашу формулу. Пишет-​​ + 1) For​​ Cells(j, 1) =​
   ​ ДЛСТР(A3) Это будет​Что я делаю.​ удаляем его.​ посоветуйте программу которая​ результаты.​ шрифта или значку,​

Сортировка по цвету ячейки, цвету шрифта или значку

​Нажмите кнопку​ — строки со​ также выполнить сортировку​Данные​ числовой.​ кнопку​ где целая часть​ = true -​ слишком много аргументов.​ i = LBound(Arr,​ sp(i).LastName Cells(j, 2)​ условием отбора.​Беру столбец и​

1. ​Кавказец​ позволяет это делать.​

2. ​Перед сортировкой отобразите скрытые​​ сделайте следующее.​​ОК​​ значением «Средний», и,​​ по цветам. Кроме​​в группе​​Выделите ячейку в столбце,​

   

3. ​(​​ – длина строки​​ по возрастанию ‘​​menedzher​​ 2) To UBound(Arr,​​ = sp(i).FirstName Cells(j,​​Далее идете во​ вставляю вверху функцию​: Прочитав советы в​

   

4. ​Спасибо.​​ строки и столбцы​​В группе​​.​​ наконец, строки со​​ того, можно выполнить​​Сортировка и фильтр​​ который требуется отсортировать.​​Сортировка от А до​

   

5. ​ (текстового значения из​​ key = false​​: Что значит формулу​ 2) Arr(i, UBound(Arr,​ 3) = sp(i).PapaName​ вкладке Данные -Дополнительно.​ ДЛСТР, ввожу текст​ справке…​openid.mail.ru/mail/vlad3622340​

6. ​    При сортировке по столбцам​Сортировка​На вкладке​

   • ​ значением «Низкий»? Если​ сортировку по набору​нажмите кнопку​На вкладке​​ Я​​ исходного списка), а​ — по убыванию​​ в соседний столбец?​​ 2)) = Len(Arr(i,​ j = j​

   • ​Исходный диапазон: Лист1!$A$3:$A$12​ нужной длины и​Роман федькин​: Это возможно.​​ скрытые строки не​​, выберите вариант​Данные​​ сортировка выполняется в​​ значков, созданных с​Сортировка​

     ​Главная​​).​ дробная – номер​ Dim sI As​ Получается только для​ 1)) + Len(Arr(i,​ + 1 Next​

7. ​Диапазон условий: $A$1:$A$2​ получаю число.​: Нет в Exсel​Казанский​​ перемещаются, а при​​Цвет ячейки​в группе​

   ​ алфавитном порядке от​ помощью условного форматирования.​​.​​в группе​Чтобы быстро отсортировать значения​ строки. Это позволяет​ Integer, sJ As​​ первой ячейки.​​ 2)) + Len(Arr(i,​

   ​ i End Sub​Ок.​Ниже этого числа​ етого сделать нельзя!​: Получите в соседнем​

Сортировка по настраиваемым спискам

​ сортировке по строкам​,​Сортировка и фильтр​ А до Я,​Выделите ячейку в столбце,​В диалоговом окне​Сортировка и фильтр​ по убыванию, нажмите​ сформировать массив неповторяющихся​ Integer, buf As​menedzher​ 2)) Next i​ Private Function sortByLastName(massive()​Данные будут отфильтрованы.​ вставляю столбец с​Yum​ столбце длину строки​ не перемещаются скрытые​Цвет шрифта​нажмите кнопку​ сначала будут идти​ который требуется отсортировать.​Сортировка​выполните одно из​ кнопку​ значений;​ Spisok For sI​: Решено, спасибо всем.​ Arr() = CoolSort(Arr(),​ As Spisok, massiveSize​ Можно применять сразу​ данными. Жму сортировка​: «в лоб» не​ с помощью функции​ столбцы. Перед сортировкой​или​

1. ​Сортировка​ строки со значением​

   1. ​На вкладке​в группе​ указанных ниже действий.​(​Функция НАИБОЛЬШИЙ() сортирует список,​ = 1 To​

      

   2. ​Guest​ UBound(Arr, 2)) End​ As Integer, key​ для нескольких столбцов,​ по убыванию или​

   3. ​ получится. Но можно​​ ДЛСТР и отсортируйте​​ данных целесообразно отобразить​​Значок ячейки​​.​​ «Высокий», потом —​​Данные​​Столбец​​Чтобы отсортировать значения по​​Сортировка от Я до​​ естественно по длине​ massiveSize — 1​​: наверно лучше все​​ With With Sheets(«Лист2»)​​ As Boolean) As​​ если над каждым​ возрастанию, не помогает.​​ рядом поставить столбец​​ по этому столбцу.​

      ​ скрытые строки и​​.​

      • ​В диалоговом окне​ со значением «Низкий»,​в группе​в поле​ возрастанию, щелкните​ А​ строки;​ For sJ =​ таки так:​ .Select .Range(«A1»).Resize(UBound(Arr, 1),​

      • ​ Spisok() ‘ key​ сделать свою формулу.​Превращаю число в​ в котором вставить​alexp2​

2. ​ столбцы.​В списке​

3. ​Сортировка​​ и в конце​​Сортировка и фильтр​​Сортировать по​​(​​).​​И наконец стандартная связка​

   

4. ​ 1 To massiveSize​​=если(длстр(а1)>35;»удалить»;»»)​​ UBound(Arr, 2) -​​ = true -​​Чтобы очистить условия​​ фильтр. Выбираю настраиваемый​​ формулу, вычисляющую длину​​: Разобрался, спасибо огромное!))​​Проверьте текущий параметр языкового​Порядок​нажмите кнопку​

5. ​ — со значением​​нажмите кнопку​​выберите первый столбец,​​Сортировка от старых к​​Примечания:​

6. ​ функций ИНДЕКС()+ПОИСКПОЗ() формирует​​ — sI If​​а чем =ДЛСТР(A2)>35​ 1).Value = Arr()​ по возрастанию ‘​​ отбора необходимо на​​ фильтр для текста,​

7. ​ строки в нужном​​EvgenStor​​ стандарта​

Сортировка с учетом регистра

1. ​выберите цвет ячейки,​​Параметры​​ «Средний». Если же​​Сортировка​​ по которому необходимо​​ новым​​ ​

   

2. ​ сортированный список: определяет​​ (key) Then If​​ не нравится?​​ End With End​​ key = false​

   

3. ​ вкладке Данные нажать​​ там есть что​​ столбе. И сортировать​​: Здравствуйте ,​​    Порядок сортировки зависит от​

   

4. ​ цвет шрифта или​​.​​ выполнить сортировку от​

Сортировка слева направо

​.​ выполнить сортировку.​).​Возможные проблемы​

​ позицию значений из​​ (Len(massive(sJ).LastName) > Len(massive(sJ​»Что значит формулу​ Sub Function CoolSort(SourceArr​ — по убыванию​ Очистить. Или сочетание​ мне нужно. Показать​ по этому столбу.​​У меня почему​​ выбранного языка. Убедитесь​​ значок, а затем —​​В диалоговом окне​

1. ​ Я до А,​В диалоговом окне​

2. ​В поле​​Чтобы отсортировать значения от​​Убедитесь, что все данные​​ исходного списка в​​ + 1).LastName)) Then​​ в соседний столбец?​​ As Variant, ByVal​

   

3. ​ Dim sI As​​ клавиш Ctrl+Shift+L​​ меньше или равно​​ Сам вспомогательный столб​​ то Excel отказывается​

   

4. ​ в том, что​​ вариант​​Параметры сортировки​​ строки будут идти​​Сортировка​​Сортировка​​ поздних дат или​ сохранены в текстовом​​ отсортированном списке, точнее​​ buf = massive(sJ)​

   

5. ​ Получается только для​​ N As Integer)​​ Integer, sJ As​​KuklP​​ и меньше или​ можно спрятать​ протягивать формулу, вставляет​ на​Слева​

   

   ​установите флажок​​ в порядке «Средний»,​в группе​выберите тип сортировки.​ значений времени к​ виде.​ конструкции ДЛСТР(A2)&»,»&СТРОКА(A2))*1, а​ massive(sJ) = massive(sJ​ первой ячейки.»​ As Variant ‘​

6. ​ Integer, buf As​: В моем файле​ равно (ставлю одинаково)​Антон макаров​

   1. ​ значение протягиваемой ячейки.​панели управления​​или​​Учитывать регистр​​ «Низкий» и «Высокий».​​Столбец​

   2. ​ Выполните одно из​​ ранним, нажмите кнопку​​    Если столбец, который подлежит​​ затем из исходного​​ + 1) massive(sJ​

   3. ​Ну так скопируйте​ сортировка двумерного массива​​ Spisok For sI​​ длина вычисляется формулой​​ в поле значения​​: Пользуйтесь на здоровье))​

7. ​Я нашел вот​в разделе​Справа​.​

   1. ​ Чтобы значение «Средний»​​в поле​​ следующих действий:​​(​​ сортировке, содержит числа,​​ списка выводит значение​​ + 1) =​​ ее вниз сколько​​ по столбцу N​

   2. ​ = 1 To​​ в допстолбце. Вот​​ ввожу текст нужной​=ЕСЛИ (ДЛСТР (СЖПРОБЕЛЫ​ интересный макрос, который​Региональные параметры​​.​​Дважды нажмите кнопку​​ было в середине​​Сортировать по​

​Чтобы выполнить сортировку по​​Сортировка от новых к​ сохраненные в числовом​ уже с учетом​ buf End If​ нужно​ ‘ автор: [url]http://excelvba.ru/code/SortArray[/url]​ massiveSize — 1​ по этому столбцу​ длины. Не работает.​ (A1))=0;0;ДЛСТР (СЖПРОБЕЛЫ (A1))-ДЛСТР​

Сортировка по части значения в столбце

​ сортирует ячейки по​или​Примечание:​ОК​​ независимо от порядка​​выберите столбец, по​ текстовым значениям, числам​ старым​ формате, и числа,​ сортировки.​ End If Next​Morint​ If N >​ For sJ =​ и фильтруете, чем​В параметрах авто​ (ПОДСТАВИТЬ (A1;» «;»»))+1)​ символам. Но он​Язык и региональные стандарты​  При сортировке строк,​.​ сортировки, придется создать​ которому необходимо выполнить​ или значениям даты​).​ сохраненные в текстовом​В файле примера также​

Сортировка меньшего диапазона в пределах большего

​ sJ Next sI​​: всем привет! помогите​ UBound(SourceArr, 2) Or​ 1 To massiveSize​ не устраивает?The_Prist предложил​ вычисление стоит.​Есть файл блокнота. В​ мне не подходит​задан правильный языковой​ являющихся частью структуры​Как правило, сортировка выполняется​ настраиваемый список.​ сортировку.​ и времени, выберите​Примечания:​

​ формате, необходимо отформатировать​ приведен другой вариант​ sortByLastName = massive​

​ пожалуйста доделать задание​ N < LBound(SourceArr,​ — sI If​​ еще вариант, ИМХО​​Sanja​​ нем записаны слова.​ т.к. сортирует от​​ стандарт. Сведения о​

​ листа, в Excel​ сверху вниз, однако​​При необходимости создайте настраиваемый​ ​В группе​

​ пункт​​ ​ все ячейки либо​

Дополнительные сведения об основных проблемах с сортировкой

​ – с двумя​ End Function Private​В первых 10​

​ 2) Then _​ (key) Then If​​ немного сложней чем​: Нужно показать все​ Пример:​ меньшего к большему​ том, как изменить​ сортируются группы наивысшего​ значения можно отсортировать​ список.​Сортировка​

​Значения​Возможные проблемы​​ как числа, либо​ служебными столбцами и​ Function sortByFirstName(massive() As​ столбцах рабочего листа​ MsgBox «Нет такого​ (Len(massive(sJ).LastName) > Len(massive(sJ​ допстолбец с формулой,​ это в небольшом​ааа​

​ а мне надо​ параметр языкового стандарта,​​ уровня (уровень 1) таким​ слева направо.​В диапазоне ячеек введите​, выберите вариант​​.​​   ​​ как текст. В​​ формулой массива.​​ Spisok, massiveSize As​​ находятся сведения о​ столбца в массиве!»,​ + 1).LastName)) Then​ но результат тоже​ файле-примере​аааа​

​ наоборот, и сортирует​ см. в справке​​ образом, что порядок​Примечание:​ значения, по которым​Цвет ячейки​

​Чтобы выполнить сортировку по​Убедитесь, что все значения​​ противном случае числа,​СОВЕТ:​ Integer, key As​ сотрудниках фирмы. Причем​ vbCritical: Exit Function​ buf = massive(sJ)​ гарантирует.​gling​ааа​ только ячейки одного​ Microsoft Windows.​ расположения строк или​ Таблицы не поддерживают возможность​ необходимо выполнить сортировку,​,​ формату, выберите вариант​

• ​ даты и времени​ сохраненные в числовом​При разборе формул​ Boolean) As Spisok()​​ в первых трех​​ Dim Check As​​ massive(sJ) = massive(sJ​​kold4x​​: Рядом с нужным​​аааа​​ столбца а мне​​Вводите заголовки столбцов только​​ столбцов детализации не​​ сортировки слева направо.​

• ​ в нужном порядке,​Цвет шрифта​Цвет ячейки​ сохранены в формате​ формате, после сортировки​​ не забывайте пользоваться​​ Dim sI As​​ столбцах рабочего листа​​ Boolean, iCount As​​ + 1) massive(sJ​​: Не сразу понял​​ столбцом или в​​ааааа​​ нужно строки целиком!​​ в одну строку​

​ изменится, даже если​

См. также

​ Сначала преобразуйте таблицу​ например в порядке​

​или​,​

​ даты и времени.​ окажутся выше чисел,​

​ клавишей​

​ Integer, sJ As​ записаны: фамилия, имя​

​ Integer, jCount As​

​ + 1) =​

support.office.com

Сортировка по количеству символов

​ Ваш файл.​​ стороне где не​
​Нужно что-либо, что​Может кто-нибудь поможет​    Если необходимо использовать заголовки​ они скрыты.​ в диапазон: выделите​ убывания.​Значок ячейки​Цвет шрифта​
​    Если результаты отличаются от​ сохраненных в текстовом​F9​
​ Integer, buf As​

​ и отчество. Необходимо​​ Integer ReDim tmpArr(UBound(SourceArr,​

​ buf End If​​Все устраивает.​ будет мешать пропишите​ сможет отсортировать их​ переделать?​ из нескольких строк,​

​Чтобы выполнить сортировку по​​ в ней любую​

​ количество строк для​​Включите или отключите строку​ кода (789-​

​Работа с таблицами​​ выше примере выделите​щелкните стрелку рядом​В разделе​ в текстовом формате.​

​ нажмите​​ Может потребоваться расположить​ For sJ =​ возрастанию количества букв,​

​ For iCount =​​ End Function Private​В первых 10​

​ результатам фильтруйте. Или​​аааа​ сортировки, то это​ заголовков​WDG​ >​

​ ячейки A1:A3.​​ с кнопкой, а​
​Порядок​ Чтобы значения даты​

planetaexcel.ru

Можно ли отсортировать в Excel столбец со словами не по алфавиту, а по количеству букв по возрастанию? Если да, то как?

​CTRL+1​​ в алфавитном порядке​ 1 To massiveSize​
​ содержащихся в первых​ LBound(SourceArr, 1) To​ Function sortByFirstName(massive() As​ столбцах рабочего листа​ пример выложите, как​аааа​ будет вообще чудо!​    Обычно рекомендуется отображать строку​-34), фамилии (Регина Покровская)​Преобразовать в диапазон​Выберите пункты​ затем в зависимости​выберите порядок сортировки.​ и времени сортировались​, чтобы открыть диалоговое​ фамилии в списке,​ — sI If​ трех столбцах​

​ UBound(SourceArr, 1) -​​ Spisok, massiveSize As​ находятся сведения о​

​ нужно.​​ааааа​С уважением Евгений​

​ заголовков при сортировке​​ или имени (Покровская​.​Файл​ от типа формата​ Выполните одно из​ в Excel правильно,​ окно​ составить перечень объемов​ (key) Then If​. Имена полей и​

​ 1 If Val(SourceArr(iCount,​​ Integer, key As​
​ сотрудниках фирмы. Причем​kold4x​то есть таким​

Чем можно отсортировать строки по длине? (текстовый файл)

​EvgenStor​ по столбцам, так​ Регина), сначала необходимо​
​Выделите любую ячейку в​
​ >​
​ выберите цвет шрифта,​
​ следующих действий.​
​ они должны быть​
​Формат ячеек​ запасов товаров от​ (Len(massive(sJ).FirstName) > Len(massive(sJ​
​ их содержимое придумать​
​ N)) > Val(SourceArr(iCount​
​ Boolean) As Spisok()​
​ в первых трех​
​: Пример в виде​
​ образом, чтобы короткие​: Код забыл вставить!​ как она облегчает​ разбить столбец на​ сортируемом диапазоне.​Параметры​
​ цвет заливки ячейки​Для текстовых значений выберите​

​ сохранены как порядковые​​, откройте вкладку​ максимального до минимального​ + 1).FirstName)) Then​
​ самостоятельно. Результаты работы​ + 1, N))​ Dim sI As​ столбцах рабочего листа​ фото подойдет ?​ слова шли в​Sub Сортировка()​ восприятие данных. По​ две или несколько​На вкладке​ >​ или значок ячейки.​От А до Я​ числа с информацией​

​Число​ или задать порядок​ buf = massive(sJ)​ программы вывести на​ Then For jCount​
​ Integer, sJ As​ записаны: фамилия, имя​
​ Как добавить ?​ начале, а длинные​For i =​
​ умолчанию значение в​ частей таким образом,​Данные​Дополнительно​Затем выберите последовательность сортировки.​или​ о дате или​

​и в разделе​​ строк в зависимости​ massive(sJ) = massive(sJ​ другой рабочий лист.​

​ = LBound(SourceArr, 2)​​ Integer, buf As​ и отчество. Необходимо​The_Prist​ в конце, сортировать​ 1 To 44​ заголовке не включается​ чтобы значение, по​

Фильтр по количеству символов в строке

​в группе​​ >​
​ Выполните одно из​
​От Я до А​ времени. Если Excel​Категория​
​ от цвета или​ + 1) massive(sJ​у меня получилась​ To UBound(SourceArr, 2)​ Spisok For sI​
​ написать программу, считывающую​
​: Точно нет. Вряд​ по количеству символов.​For j =​ в сортировку. Но​ которому нужно выполнить​
​Сортировка и фильтр​Общие​ указанных ниже действий.​.​ не может распознать​
​выберите вариант​ значка. Сортировка данных​ + 1) =​ сортировка только по​ tmpArr(jCount) = SourceArr(iCount,​ = 1 To​ эти данные и​ ли кто-то захочет​НЕ ПРОГРАММИСТ, нужно​ i + 1​ в некоторых случаях​
​ сортировку, оказалось в​нажмите кнопку​

​ >​​Чтобы переместить цвет ячейки,​Для числовых значений выберите​ значение как дату​

​Общий​​ помогает быстро визуализировать​ buf End If​ кол-ву букв в​ jCount) SourceArr(iCount, jCount)​ massiveSize — 1​сортирующую этот список по​ перерисовывать Ваши данные​ готовое решение.​ To 45​ может потребоваться включить​

​ собственном столбце. Чтобы​​Сортировка​Изменить списки​ цвет шрифта или​

​По возрастанию​​ или время, оно​,​ данные и лучше​ End If Next​ отчестве, т.к. оно​ = SourceArr(iCount +​ For sJ =​ возрастанию количества букв,​
​ в файл Excel.​Алексей матевосов (alexm)​If Len(Cells(i, 1).Text)​ или отключить заголовок,​ разбить значения в​.​, затем в диалоговом​

​ значок наверх или​​или​ сохраняется как текст.​

​Число​​ понимать их, упорядочивать​
​ sJ Next sI​ идет последним (строка​
​ 1, jCount) SourceArr(iCount​

​ 1 To massiveSize​​ содержащихся в первых​
​ Приложите пример в​: Использовать Excel для​

​ > Len(Cells(j, 1).Text)​​ чтобы значение в​ ячейке на части,​В диалоговом окне​
​ окне​ влево, выберите вариант​По убыванию​ Дополнительные сведения см.​или​ и находить необходимую​ sortByFirstName = massive​ 27). можно ли​ + 1, jCount)​ — sI If​ трех столбцах​
​ формате xls -​ сортировки будет проще​ Then​ заголовке включалось или​ можно воспользоваться текстовыми​Сортировка​Списки​

​Сверху​​.​

​ в статье Преобразование​​Текст​ информацию и в​ End Function Private​ в этом коде​ = tmpArr(jCount) Check​

​ (key) Then If​​. Имена полей и​
​ тогда помощь придет​ всего.​a = Cells(i,​ не включалось в​
​ функциями или мастером​нажмите кнопку​
​нажмите кнопку​
​для сортировки по​
​Для дат и времени​
​ дат из текстового​.​ итоге принимать более​ Function sortByPapaName(massive() As​ как-то сделать, чтобы​
​ = False Next​ (Len(massive(sJ).FirstName) > Len(massive(sJ​ их содержимое придумать​ быстрее.​Копируете колонку слов​

​ 1).Text​​ сортировку. Выполните одно​ текстов. Дополнительные сведения​Параметры​Импорт​ столбцу и​ выберите​ формата в формат​Удалите все начальные пробелы.​ правильные решения.​ Spisok, massiveSize As​ одновременно по фамилии,​

​ End If Next​​ + 1).FirstName)) Then​ самостоятельно. Результаты работы​
​Хотя полагаю, что​

planetaexcel.ru

Сортировка по количеству символов в столбцах

​ в блокноте и​​Cells(i, 1).Value =​ из следующих действий.​
​ и примеры см.​.​и дважды нажмите​Влево​От старых к новым​ даты.​    Иногда импортируемые из других​Сортировать данные можно по​ Integer, key As​ имени и отчеству​​ Loop CoolSort =​ buf = massive(sJ)​ программы вывести на​ ДЛСТР в отдельном​​ вставляете в ячейку​ Cells(j, 1).Text​Чтобы исключить из сортировки​ в статьях Разбивка​В диалоговом окне​
​ кнопку​для сортировки по​или​Для сортировки по дням​ приложений данные могут​ тексту (от А​ Boolean) As Spisok()​ сортировало? извините, что​ SourceArr End Function​ massive(sJ) = massive(sJ​ другой рабочий лист.​ столбце самое простое​ Экселя. Данные сами​Cells(j, 1).Value =​ первую строку данных​ текста по разным​
​Параметры сортировки​ОК​ строке.​От новых к старым​ недели измените формат​ дополняться начальными пробелами.​ к Я или​ Dim sI As​ уже 3-я подобная​Testingtest​ + 1) massive(sJ​у меня получилась​ решение. Иначе только​ разобьются по ячейкам.​ a​ (заголовок столбца), на​ ячейкам и Разбивка​в группе​.​Чтобы переместить цвет ячейки,​.​ ячеек таким образом,​ Прежде чем выполнять​ от Я к​ Integer, sJ As​ тема за сегодня,​:​ + 1) =​ сортировка только по​ кодами, стандартный фильтр​ Правда в каждой​End If​ вкладке​ текста по разным​Сортировать​Примечания:​ цвет шрифта или​Чтобы выполнить сортировку по​ чтобы в них​ сортировку, удалите их​ А), числам (от​ Integer, buf As​ у нас просто​Сортировка или фильтрация​ buf End If​ кол-ву букв в​ не может фильтровать​ ячейке будет лишний​Next​Главная​ столбцам с помощью​выберите пункт​ ​ значок вниз или​ настраиваемому списку, выберите​ выводились дни недели.​ из данных. Это​ наименьших к наибольшим​ Spisok For sI​ всю группу озадачили​Возможно ли в​ End If Next​ отчестве, т.к. оно​ по длине строки.​ пробел, который можно​Next​в группе​ функций.​столбцы диапазона​Пользовательские списки можно создавать​ вправо, выберите вариант​ пункт​ Для сортировки по​ можно сделать вручную​ или от наибольших​ = 1 To​ с этой сортировкой…​ Excel 2003 отобразить​ sJ Next sI​ идет последним (строка​kold4x​ не удалять. Все​End Sub​Редактирование​Предупреждение:​, а затем нажмите​ только на основе​Снизу​Настраиваемый список​ дням недели независимо​ или с помощью​ к наименьшим), а​ massiveSize — 1​Type Spisok LastName​ в строке только​ sortByFirstName = massive​ 27). можно ли​: Все понял. сейчас​ слова будут на​Z​нажмите кнопку​ Вы можете отсортировать значения​ кнопку​ значений (текстовых, числовых​для сортировки по​.​ от даты преобразуйте​ функции СЖПРОБЕЛЫ.​ также датам и​ For sJ =​ As String FirstName​ значения, в которых​ End Function Private​ в этом коде​ загружу пример.​ один символ больше,​: Вот бы посмотреть!..​Сортировка и фильтр​ в диапазоне, который​ОК​ или значений даты​

​ столбцу и​​Для добавления к сортировке​ их в текст​Выделите ячейку в столбце,​ времени (от старых​ 1 To massiveSize​
​ As String PapaName​ количество символов больше,​ Function sortByPapaName(massive() As​ как-то сделать, чтобы​kold4x​ что не повлияет​ -43045-​, выберите команду​ является частью другого​.​ и времени). Создать​Справа​ следующего столбца нажмите​ с помощью функции​ который требуется отсортировать.​ к новым или​ — sI If​ As String End​ к примеру, шести?​ Spisok, massiveSize As​ одновременно по фамилии,​: Вот пример.​ на сортировку. Вот​EvgenStor​Настраиваемая сортировка​ диапазона, однако делать​В группе​ пользовательский список на​для сортировки по​ кнопку​ ТЕКСТ. Однако функция​На вкладке​ от новых к​ (key) Then If​ Type Sub Laba6()​ Не размер значения​ Integer, key As​ имени и отчеству​Вверху с кавычками​ как получается.​: Вот что получается​и установите флажок​ это не рекомендуется,​Строка​ основе данных форматирования​ строке.​Добавить уровень​ ТЕКСТ возвращает текстовое​Главная​ старым) в одном​ (Len(massive(sJ).PapaName) > Len(massive(sJ​ Dim sp() As​ больше шести, а​ Boolean) As Spisok()​ сортировало? извините, что​ до и после.​Сортировка делается в​ посмотри скриншот Прикрепленные​Мои данные содержат заголовки​ так как в​в поле​ (цвета ячеек, цвета​Примечание:​, а затем повторите​ значение, поэтому сортировка​в группе​ или нескольких столбцах.​

CyberForum.ru

Сортировка по количеству символов в стобце

​ + 1).PapaName)) Then​​ Spisok, i As​​ количество его символов.​
​ Dim sI As​ уже 3-я подобная​Внизу про фильтрацию.​ два этапа. Первый​ файлы post_351877.png (3.5​.​ результате будет разорвана​Сортировка по​ шрифта или значков)​ Порядка цветов ячеек, цветов​ шаги с третьего​ будет выполнена по​
​Сортировка и фильтр​
​ Можно также выполнять​ buf = massive(sJ)​ Integer, j As​

CyberForum.ru

Как отфильтровать по количеству знаков?

​ Не нашёл, как​​ Integer, sJ As​
​ тема за сегодня,​kold4x​ подсчет символов в​ КБ)​Чтобы включить в сортировку​ связь между отсортированным​
​выберите строку для​ нельзя.​ шрифта или значков​
​ по пятый.​

​ Integer, n As​​ такое сделать, к​ Integer, buf As​
​ у нас просто​
​: Вот пример.​ слове, второй собственно​

​Z​​ первую строку данных​ диапазоном и исходными​

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

​Чтобы скопировать сортируемый столбец,​​ сведения см. в​
​ указанных ниже действий.​ спискам, которые создаете​ + 1) massive(sJ​

​ Integer Sheets(«Лист2»).Select Range(«A1:D12»).Clear​​ сожалению.​ Spisok For sI​ всю группу озадачили​Пример для форумв.xlsx​

​ сортировка.​​: Да-а, посмотрел… ;(​

planetaexcel.ru

Сортировка по количеству символов в столбцах

​ с этой сортировкой…​​ (9.22 КБ)​Формула для ячейки​
​ Это вам помогло,​ не является заголовком​ данные, как показано​ выполнить сортировку по​ и первое значение​ самостоятельно определить порядок​ нажмите кнопку​ в виде дней​ возрастанию нажмите кнопку​ списку, состоящему из​​ buf End If​ + 1, 1)​Сортировка по количеству​ massiveSize — 1​​Type Spisok LastName​The_Prist​ В1 =ДЛСТР (A1)​ надеюсь… -70301-​ столбца), на вкладке​
​ ниже, выбранные сотрудники​ строке заголовка).​ не может начинаться​ для каждой сортировки.​Копировать уровень​ недели.​(​ элементов «Большой», «Средний»​ End If Next​ <> «» n​ символов в стобце​ For sJ =​ As String FirstName​: ЦитатаThe_Prist написал: Точно​Формула для ячейки​Казанский​
​Главная​ окажутся связаны с​Совет:​ с цифры.​Чтобы задать следующий цвет​.​Возможно, вы захотите выполнить​Сортировка от минимального к​ и «Маленький»), или​ sJ Next sI​ = n +​ Следующий ответ​ 1 To massiveSize​ As String PapaName​ нетЦитатаkold4x написал: Вот​ С1 =ИНДЕКС (A:A;ПОИСКПОЗ​: Включите автопересчет в​в группе​ другими отделами.​ Если строка заголовка содержит​Выделите ячейку в столбце,​ ячейки, цвет шрифта​Чтобы удалить столбец для​ сортировку по двум​ максимальному​ по формату, включая​ sortByPapaName = massive​ 1 Wend n​menedzher​ — sI If​ As String End​ пример.​ (НАИМЕНЬШИЙ (B:B;СТРОКА ());B:B;0))​ Параметрах.​Редактирование​К счастью, Excel выдает​ текст, а вам​ который требуется отсортировать.​ или значок для​ сортировки, выделите соответствующую​ или нескольким столбцам​).​ цвет ячеек и​ End Function​ = n -​: Здравствуйте.​ (key) Then If​ Type Sub Laba6()​В общем не​После завершения ввода​ber$erk​нажмите кнопку​ предупреждение, если обнаруживает​ нужно отсортировать столбцы​На вкладке​ сортировки, нажмите кнопку​ запись и нажмите​ или строкам, чтобы​Для сортировки чисел по​ цвет шрифта, а​Вернуться к обсуждению:​ 1 ReDim sp(n)​Есть один простой​ (Len(massive(sJ).PapaName) > Len(massive(sJ​ Dim sp() As​ вижу смысла дальше​ формул их копируют​: В параметрах Excel-я​Сортировка и фильтр​ подобную попытку:​ по числам, добавьте​Данные​Добавить уровень​Удалить уровень​ сгруппировать данные с​ убыванию нажмите кнопку​ также по значкам.​Сортировка по количеству​ For i =​ столбик в нем​ + 1).PapaName)) Then​ Spisok, i As​ что-то пытаться сделать.​ по колонке столько,​ включите автоматическое вычисление.​, выберите команду​Если вы не собирались​ новую строку над​в группе​и повторите шаги​.​ одинаковыми значениями в​(​Примечания:​ символов в столбцах​ 1 To n​ много строк текстовой​ buf = massive(sJ)​ Integer, j As​ Если с фразой​ сколько ячеек со​ Оно у Вас​Настраиваемая сортировка​ сортировать данные таким​ диапазоном данных и​Сортировка и фильтр​ 3–5.​Примечание:​ одном столбце или​Сортировка от максимального к​ ​Следующий ответ​ sp(i).LastName = Cells(i​ информации, хочу удалить​ massive(sJ) = massive(sJ​ Integer, n As​ «все ясно» выкладывают​ словами. Формулы лучше​ сейчас стоит на​и снимите флажок​ образом, выберите вариант​
​ укажите в ней​
​нажмите кнопку​Убедитесь в том, что​​ В списке необходимо оставить​

CyberForum.ru

​ строке, а затем​

Сортировка и удаление по количеству слов.

Wanderer Дата: Пятница, 29.01.2016, 19:53 | Сообщение № 1 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 Доброго времени суток. Как человек, не разбирающийся в экселе, поставлен в тупик следующей задачей: В таблице, в столбце G нужно отсортировать фразы по количеству слов, чтобы увидеть, где количество слов больше семи, и потом удалить эти фразы вместе со всей строкой. Приложенный файл, конечно же, в сотни раз меньше, иначе я бы просто отсортировал руками. Большое спасибо. К сообщению приложен файл: 9891855.xlsx (13.7 Kb)   Ответить

buchlotnik Дата: Пятница, 29.01.2016, 20:09 | Сообщение № 2 Группа: Заблокированные Ранг: Участник клуба Сообщений: 3442 Репутация: 929 ± Замечаний: 20% ± 2010, 2013, 2016 RUS / ENG допстолбец Код =ДЛСТР(G7)-ДЛСТР(ПОДСТАВИТЬ(G7;» «;»»)) сортируйте и удаляйте все >6 К сообщению приложен файл: 5419283.xlsx (14.3 Kb)   Ответить

Udik Дата: Пятница, 29.01.2016, 21:04 | Сообщение № 3 Группа: Друзья Ранг: Старожил Сообщений: 1588 Репутация: 192 ± Замечаний: 0% ± Excel 2016 х 64 buchlotnik, +1 зажилили Ну и для подстраховки СЖПРОБЕЛЫ Код =ДЛСТР(СЖПРОБЕЛЫ(G5))-ДЛСТР(ПОДСТАВИТЬ(СЖПРОБЕЛЫ(G5);» «;»»))+1 К сообщению приложен файл: 0t.xlsx (9.7 Kb) вот вам барабан яд 41001231307558 wm R419131876897 udik1968@gmail.com Сообщение отредактировал Udik — Пятница, 29.01.2016, 21:09   Ответить

buchlotnik Дата: Пятница, 29.01.2016, 21:13 | Сообщение № 4 Группа: Заблокированные Ранг: Участник клуба Сообщений: 3442 Репутация: 929 ± Замечаний: 20% ± 2010, 2013, 2016 RUS / ENG не понял?!!! У ТС чётко сказано семь слов=шесть пробелов, больше семи слов = больше шести пробелов. И в чём не прав? [p.s.]про СЖПРОБЕЛЫ() согласен — не помешает Сообщение отредактировал buchlotnik — Суббота, 30.01.2016, 08:02   Ответить

Udik Дата: Суббота, 30.01.2016, 14:15 | Сообщение № 5 Группа: Друзья Ранг: Старожил Сообщений: 1588 Репутация: 192 ± Замечаний: 0% ± Excel 2016 х 64 Да помнить всё время надо, что результат меньше на 1 слово, хотя для конкретного случая со связкой >6 работает. вот вам барабан яд 41001231307558 wm R419131876897 udik1968@gmail.com   Ответить

Wanderer Дата: Суббота, 30.01.2016, 20:45 | Сообщение № 6 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 Большое спасибо за решение. Но куда нужно эту формулу вставлять? Если вставляю в чистый столбик рядом, пишет #NAME?. Дело в том, что я ими никогда не пользовался. Спасибо. Сообщение отредактировал Wanderer — Суббота, 30.01.2016, 21:37   Ответить

Wanderer Дата: Воскресенье, 31.01.2016, 22:08 | Сообщение № 7 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 Всё таки, не понимаю, почему формула не работает. Может, кто то подскажет? Большое спасибо.   Ответить

Pelena Дата: Воскресенье, 31.01.2016, 22:14 | Сообщение № 8 Группа: Админы Ранг: Местный житель Сообщений: 18797 Репутация: 4284 ± Замечаний: ± Excel 2016 & Mac Excel Покажите файл с ошибкой «Черт возьми, Холмс! Но как??!!» Ю-money 41001765434816   Ответить

Wanderer Дата: Воскресенье, 31.01.2016, 22:49 | Сообщение № 9 Группа: Пользователи Ранг: Прохожий Сообщений: 5 Репутация: 0 ± Замечаний: 0% ± Excel 2010 Разобрался. Всё отлично, еще раз огромное спасибо.   Ответить

_Boroda_ Дата: Понедельник, 01.02.2016, 07:56 | Сообщение № 10 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Еще вариант Код =—(ПОДСТАВИТЬ(G7;» «;;6)<>G7) Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

На чтение 2 мин. Просмотров 63 Опубликовано 24.05.2021

В этой статье я собираюсь рассказать о сортировке списка строк по количеству слов. Если вас это интересует, спуститесь вниз, чтобы просмотреть подробности.

Сортировка по количеству слов с помощью формулы

Сортировка по количеству слов с подсчетом слов в диапазоне

---

Содержание

1. Сортировка по количеству слов с помощью формулы
2. Сортировка по количеству слов с подсчетом слов в диапазоне
3. Относительные статьи

Сортировка по количеству слов с помощью формулы

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

1. Выберите ячейку рядом со списком, введите эту формулу = LEN (A1) -LEN (SUBSTITUTE (A1, “”, “”)) + 1 , нажмите Enter и перетащите дескриптор заполнения вниз к нужным формулам ячеек.

2. Не снимая выделения с ячеек формулы, нажмите Данные > Сортировать от А до Я , установите флажок Развернуть выделение в разделе Предупреждение о сортировке .

3. Нажмите Сортировать . Список отсортирован по количеству слов.

Совет :

1. Вышеупомянутая формула не подсчитывает слова напрямую, но подсчитывает пробелы между словами и добавляет 1, чтобы получить количество слов. Если в строке есть лишние пробелы, такие как начальный пробел, результат будет неверным. # img src = “/images/excel/1822/foto-4.png”>

2. Если вы хотите отсортировать по количеству символов, используйте эту формулу = LEN (A1) для подсчета символов и последующей сортировки.

---

Сортировка по количеству слов с подсчетом слов в диапазоне

Чтобы подсчитать количество слов в ячейке или диапазоне, Подсчитайте общее количество слов в Kutools for Excel .

Kutools for Excel , с более чем 300 удобными функциями, облегчит вашу работу.

Бесплатная загрузка Бесплатная полнофункциональная версия через 30 дней

После установки Kutools for Excel, сделайте следующее: （Загрузите Kutools for Excel сейчас бесплатно!)

1. Выберите ячейку рядом со списком строк и нажмите Kutools > Помощник по формулам> Статистические данные > Подсчитать общее количество слов . См. Снимок экрана:

2. Затем в диалоговом окне Помощник по формулам выберите ячейку, которую вы используете для подсчета в Range , по умолчанию ячейки будут выбраны как абсолютные ссылки, вы можете изменить это относительное благоустройство. См. Снимок экрана:

3. Нажмите ОК , и в ячейке будет подсчитано количество слов.. Перетащите маркер заполнения вниз, чтобы применить формулу к ячейкам.

4. Не снимая выделения с ячеек формулы, нажмите Данные > Сортировать от А до Я и установите флажок Развернуть выделение во всплывающем диалоговом окне. .

5. Нажмите Сортировать , и список будет отсортирован по количеству слов.

---

Относительные статьи

• Как сортировать список по определенным словам в Excel?

---