Excel как сортировать числа в ячейке

Для нас легко и часто сортировать числа в списке столбцов, но пробовали ли вы когда-нибудь сортировать числа в одной ячейке? Возможно, для вас нет хорошего способа, кроме как расположить их по одному, здесь я расскажу о том, как сортировать числа в ячейках в Excel.

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

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

Сортировка чисел, разделенных запятыми, в ячейках с кодом VBA

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

Чтобы отсортировать числа в ячейках на листе, вы можете применить следующую длинную формулу, сделайте следующее:

1. Рядом со своими данными введите следующую формулу, в этом примере я введу ее в ячейку C1, см. Снимок экрана:

=TEXT(SUM(SMALL(—MID(A1,ROW(INDIRECT(«1:»&LEN(A1))),1),ROW(INDIRECT(«1:»&LEN(A1))))*10^(LEN(A1)-ROW(INDIRECT(«1:»&LEN(A1))))),REPT(«0»,LEN(A1)))

2. Затем нажмите Shift + Ctrl + Enter вместе, затем перетащите маркер заполнения в диапазон, в котором вы хотите применить эту формулу, и вы увидите, что числа отсортированы от меньшего к большему. Смотрите скриншот:

Ноты:

1. Если цифра числа в ячейке больше 15, эта формула не даст правильного результата.

2. Если вы хотите отсортировать числа в порядке убывания, вы можете использовать эту формулу: =TEXT(SUM(LARGE(—MID(A1,ROW(INDIRECT(«1:»&LEN(A1))),1),ROW(INDIRECT(«1:»&LEN(A1))))*10^(LEN(A1)-ROW(INDIRECT(«1:»&LEN(A1))))),REPT(«0»,LEN(A1))).

3. В приведенных выше формулах A1 указывает ячейку, содержащую числа, которые вы хотите отсортировать, вы можете изменить ее по своему усмотрению.

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

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

1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: сортировка чисел в ячейках

Function SortNumsInCell(pNum As String, Optional pOrder As Boolean) As String
'Update 20140717
Dim xOutput As String
For i = 0 To 9
  For j = 1 To UBound(VBA.Split(pNum, i))
    xOutput = IIf(pOrder, i & xOutput, xOutput & i)
  Next
Next
SortNumsInCell = xOutput
End Function

3. Затем сохраните и закройте этот код, вернитесь на свой рабочий лист и введите эту формулу = sortnumsincell (A1) в пустую ячейку рядом с вашими данными, см. снимок экрана:

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

Внимание: Если вы хотите отсортировать числа в порядке убывания, введите эту формулу = sortnumsincell (A1,1).

Сортировка чисел, разделенных запятыми, в ячейках с кодом VBA

Если ваши числа разделены определенными символами, такими как запятая, точка с запятой, точка и т. Д., Как показано на следующем снимке экрана, как вы можете отсортировать их по ячейкам? Теперь я представляю вам код VBA, чтобы вы могли их отсортировать.

1. Удерживайте ALT + F11 , чтобы открыть Окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: номера сортировки разделяются запятыми внутри ячеек

Sub SortNumsInRange()
'Update 20140717
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set objArrayList = CreateObject("System.Collections.ArrayList")
For Each Rng In WorkRng
    Arr = VBA.Split(Rng.Value, ",")
    For i = 0 To UBound(Arr)
        xMin = i
        For j = i + 1 To UBound(Arr)
            If Arr(xMin) > Arr(j) Then
                xMin = j
            End If
        Next j
        If xMin <> i Then
            temp = Arr(i)
            Arr(i) = Arr(xMin)
            Arr(xMin) = temp
        End If
    Next i
    Rng.Value = VBA.Join(Arr, ",")
Next
End Sub

3, Затем нажмите F5 ключ для запуска этого кода, а затем выберите ячейки, которые содержат числа в всплывающем окне подсказки, см. снимок экрана:

4, Затем нажмите OK, все числа в ячейках отсортированы по возрастанию в исходном диапазоне.

Внимание: Вы можете заменить запятую «,» на любые другие символы в приведенном выше коде. И этот код может только сортировать данные по возрастанию.

Статьи по теме:

Как в Excel сортировать числа через дефис?

Как отсортировать данные в Excel по наиболее частому значению?

Как отсортировать адрес электронной почты по домену в Excel?

Как отсортировать строки, чтобы в Excel сверху были пустые ячейки?

Помогла ли Вам статья?

Сортировка данных в Excel – инструмент для представления информации в удобном для пользователя виде.

Числовые значения можно отсортировать по возрастанию и убыванию, текстовые – по алфавиту и в обратном порядке. Доступны варианты – по цвету и шрифту, в произвольном порядке, по нескольким условиям. Сортируются столбцы и строки.

Порядок сортировки в Excel

Существует два способа открыть меню сортировки:

1. Щелкнуть правой кнопкой мыши по таблице. Выбрать «Сортировку» и способ.



2. Открыть вкладку «Данные» — диалоговое окно «Сортировка».

Часто используемые методы сортировки представлены одной кнопкой на панели задач:

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

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



2. Далее действуем в зависимости от поставленной задачи. Если нужно выполнить простую сортировку по возрастанию/убыванию (алфавиту или обратно), то достаточно нажать соответствующую кнопку на панели задач. Когда диапазон содержит более одного столбца, то Excel открывает диалоговое окно вида:
   
   Чтобы сохранилось соответствие значений в строках, выбираем действие «автоматически расширить выделенный диапазон». В противном случае отсортируется только выделенный столбец – структура таблицы нарушится.

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



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

Программа Excel предоставляет пользователю богатые возможности форматирования. Следовательно, можно оперировать разными форматами.

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

1. Выделяем столбец – правая кнопка мыши – «Сортировка».
2. Из предложенного списка выбираем «Сначала ячейки с выделенным цветом».



3. Соглашаемся «автоматически расширить диапазон».

Программа отсортировала ячейки по акцентам. Пользователь может самостоятельно выбрать порядок сортировки цвета. Для этого в списке возможностей инструмента выбираем «Настраиваемую сортировку».

В открывшемся окне вводим необходимые параметры:

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

По такому же принципу сортируются данные по шрифту.

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

Как задать порядок вторичной сортировки в Excel? Для решения этой задачи нужно задать несколько условий сортировки.

1. Открываем меню «Настраиваемая сортировка». Назначаем первый критерий.



2. Нажимаем кнопку «Добавить уровень».



3. Появляются окошки для введения данных следующего условия сортировки. Заполняем их.

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

Сортировка строк в Excel

По умолчанию сортируются данные по столбцам. Как осуществить сортировку по строкам в Excel:

1. В диалоговом окне «Настраиваемой сортировки» нажать кнопку «Параметры».



2. В открывшемся меню выбрать «Столбцы диапазона».



3. Нажать ОК. В окне «Сортировки» появятся поля для заполнения условий по строкам.

Таким образом выполняется сортировка таблицы в Excel по нескольким параметрам.

Случайная сортировка в Excel

Встроенные параметры сортировки не позволяют расположить данные в столбце случайным образом. С этой задачей справится функция СЛЧИС.

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

Ставим курсор в соседнюю ячейку (слева-справа, не важно). В строку формул вводим СЛЧИС(). Жмем Enter. Копируем формулу на весь столбец – получаем набор случайных чисел.

Теперь отсортируем полученный столбец по возрастанию /убыванию – значения в исходном диапазоне автоматически расположатся в случайном порядке.

Динамическая сортировка таблицы в MS Excel

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

1. Есть набор простых чисел, которые нужно отсортировать по возрастанию.



2. Ставим курсор в соседнюю ячейку и вводим формулу: =НАИМЕНЬШИЙ(A:A;СТРОКА(A1)). Именно так. В качестве диапазона указываем весь столбец. А в качестве коэффициента – функцию СТРОКА со ссылкой на первую ячейку.



3. Изменим в исходном диапазоне цифру 7 на 25 – «сортировка» по возрастанию тоже изменится.

Если необходимо сделать динамическую сортировку по убыванию, используем функцию НАИБОЛЬШИЙ.

Для динамической сортировки текстовых значений понадобятся формулы массива.

1. Исходные данные – перечень неких названий в произвольном порядке. В нашем примере – список фруктов.



2. Выделяем столбец и даем ему имя «Фрукты». Для этого в поле имен, что находится возле строки формул вводим нужное нам имя для присвоения его к выделенному диапазону ячеек.



3. В соседней ячейке (в примере – в В5) пишем формулу: Так как перед нами формула массива, нажимаем сочетание Ctrl + Shift + Enter. Размножаем формулу на весь столбец.



4. Если в исходный столбец будут добавляться строки, то вводим чуть модифицированную формулу: Добавим в диапазон «фрукты» еще одно значение «помело» и проверим:

Скачать формулы сортировки данных в Excel

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

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

Вариант 1: Быстрая сортировка в Excel

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

1. Выделите зажатой левой кнопкой мыши столбец с данными и вызовите меню «Редактирование».

2. Откройте список «Сортировка и фильтр» и выберите подходящий для вас вариант упорядочения. С числами это по возрастанию или убыванию, а для текста – по алфавиту и в обратную сторону.

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

4. Изменения вступают в силу сразу же. Нажмите Ctrl + Z для отмены действия, если что-то выполнено неправильно.

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

Вариант 2: Настраиваемая сортировка

Более продвинутый вариант, позволяющий задать сразу несколько условий упорядочения, – это настраиваемая сортировка, выполняющаяся через соответствующее окно. Давайте разберем сортировку по двум разным параметрам:

1. Вы можете не выделять заранее столбец, если для него задано название. Вызовите то же меню редактирования, но на этот раз нажмите по «Настраиваемая сортировка».

2. Выберите вариант с расширением или сохранением диапазона, если предварительно выделили столбец.

3. Вы увидите первый уровень сортировки, который и стоит настроить с самого начала.

4. Выберите столбец для сортировки из первого выпадающего списка.

5. Далее укажите вариант сортировки. Это может быть значение, цвет шрифта или ячейки, знаки условного форматирования.

6. В завершение укажите, в каком порядке необходимо отсортировать данные.

7. Если затем нужно применить еще один вариант сортировки, добавьте уровень и настройте его должным образом.

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

Вариант 3: Функция НАИБОЛЬШИЙ или НАИМЕНЬШИЙ

Последний вариант – единственный динамический, то есть после внесения изменений в клетках сортировка автоматически перестроится и ее последовательность будет правильной. Как вы уже поняли, для этого понадобится использовать функцию НАИБОЛЬШИЙ или НАИМЕНЬШИЙ.

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

2. Далее в скобках укажите (C:C;СТРОКА(C1)), поменяв буквы на номер столбца сортировки.

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

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

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

Сортировать одновременно числа и текст в таблице Excel.

​Смотрите также​ — Текстовый —​​ становится. оказывается. макросы​ пределами используемых ячеек​s = Right$(a(r,​ прощения за предыдущий​ Sub​
​ 534, а с​ получить анализируя буквы).​ текст в любом​ получить список, где​ выбрать тип сортировки​ изображены буквы «А»​ отмечаем галочкой «Мои​ и целой таблицы:​ адресность в ссылках​ сортировка». В появившемся​Как настроить сортировку в​ Готово​​ могут работать десятые​​ (UsedRange), например, запишем​ 1), 1)​ пост, не обратил​Set Rng =​ буквами 14534A (но​
​Вероятно, лучше код​ случае​ после каждого крупного​Настраиваемый список (Custom List)​ и «Z» со​ данные содержат заголовки​Выделите диапазон значений столбца​ и тогда результаты​ окне нажимаем кнопку​ Excel​
​А затем обычная​ доли секунды и​ в ячейку что-нибудь,​
​a(r, 1) =​ внимания, что файл​ .Resize(rs)​ это, конечно, не​ на RegExp -​например, вставьте «​ агрегата будут идти​:​
​ стрелочкой​ столбцов» и указываем:​ который следует отсортировать,​ их вычислений будут​ «Параметры…» и ставим​по нашим правилам?​ сортировка по возрастанию​ делать при этом​ а затем очистим​ Val(a(r, 1))​ «распух» после экспериментов)​End With​ существенно…)​ это не ко​ » перед цифрами​ его детали:​
​После этого откроется следующее​
​Ma666oT​ «Столбец» – Чистая​ например «Расход» (в​ ошибочны. Во-вторых, после​ галочку у строки​ Обычная соритровка производится​Russel​ гораздо больше и​ ее содержимое, то​If s >=​ЗЫ. Формат ячеек​’ Создать в​Vlad​ мне :(​ и сортируйте​
​Чтобы это реализовать, нужно​ окно, в котором​: не, не, не​
​ прибыль; «Сортировка» –​ данном случаи это​ многократных сортировок можно​ «Учитывать регистр». Нажимаем​ по цифрам, словам.​: Еще вариант, с​ правильнее.​ по Ctrl-End мы​
​ «A» Then​
​ «# ;» замените​ массиве a() числовыне​
​: andre, а у​А может даже​andre532​ временно добавить еще​ можно выбрать нужную​так я уже​ Цвет ячейки; «Порядок»​ диапазон E1:E11).​
​ перетасовать данные таблицы​ «ОК».​ Смотрите статью «Сортировка​ разбивкой на разряды​спасибо форуму -​ уже попадем в​b(r, 1) =​ на Общий.​ значения сортируемого столбца​ Вас в конце​

excel-office.ru

Сортировка Числовых Значений в Excel. Бесплатные примеры и статьи.

​ и стандартными функциями​: Увы, не помогло…​ один столбец к​ нам последовательность месяцев​ пробовал, не получается….вы​ – красный, сверху.​Щелкните правой кнопкой мышки​ так, что уже​В строке «Сортировать по»​ в Excel».​ по 5 для​ раньше я думал,​ эту очищенную (новую​ Format(a(r, 1), «#​Guest​a() = Rng.Columns©.Value​ может быть только​ спецы выкрутятся? :)​ С апострофом впереди​ нашей таблице, в​ или дней недели:​ просто не видели​

excel2.ru

Как сделать сортировку в Excel по возрастанию и по убыванию

​ И нажмите ОК.​ по выделенному столбцу.​ сложно будет вернуться​ указан адрес дополнительного​Но число с​ более удобного просмотра​ что я вумный,​ последнюю) ячейку. Если​ ;») & s​: Вот мне счастье​

​For r =​ одна буква или​Затем по этому​ тоже…​ котором превратить все​Если нужного списка (например,​ мой документ)​Сверху у нас теперь​ В контекстном меню​ к изначальному ее​ столбца.​ точкой (600.1), Excel​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВСИМВ(A2;5)&» «&ПРАВСИМВ(A2;5)​ а теперь оказывается​ сохранить книгу, то​a(r, 1) =​ привалило-то!​ 1 To rs​ возможно несколько? С​

Сортировка данных в Excel

​ столбцу сортировать.​Guest​ коды в текст​ месяцев, но на​0nega​ наихудшие показатели по​

​ выберите опцию «Сортировка»-«от​ виду. В третьих,​«Сортировка» — выбираем​

1. ​ сортирует не в​Chase​
2. ​ — практически дурак​ последняя ячейка возвращается​ a(r, 1) +​Уважаемые ZVI и​If VarType(a(r, 1))​ одной можно будет​Hugo​: странно​ с помощью функции​

​ английском) нет, то​: вы меня заинтриговали​ чистой прибыли, которые​ минимального к максимальному»​ если таблица содержит​ «Значения». Нажимаем «ОК».​ том порядке, в​: Попробовал, но не​ :)​

​ на свое законное​ Asc(s) * 0.001​ Влад, еще раз​

1. ​ = vbString Then​ просто сделать и​
2. ​: MCH буквы по​Hugo​
3. ​ ТЕКСТ:​ его можно ввести​ … а нельзя​ имеют наихудшие показатели.​Появится диалоговое окно «Обнаруженные​ объединенные ячейки, то​ В появившемся окне​ каком нам нужно.​ выходит, в итоге​Казанский​ место, то же​End If​

​ спасибо!​a(r, 1) =​ точно быстрее 40​

​ алфавиту не сортирует!​

Как в Excel сделать сортировку в столбце

​: С апострофом нормально​Если затем произвести сортировку​ в правое поле,​ ли представить на​

1. ​Примечание. Дальше можно выделить​ данные вне указанного​ следует их аккуратно​ ставим галочку у​ Сначала размещает в​
2. ​ сперва идут только​: Владимир,​ самое обычно происходит​End If​Оба кода очень​
3. ​ Val(a(r, 1))​ сек, а с​ :(​ сортирует, только не​ по этому столбцу,​ выбрав опцию​ суд местных Гуру​ в этой таблице​ диапазона». По умолчанию​ разъединить, так как​ строки «числа и​ столбце все целые​ цифровые значения, а​в данном контексте​

​ при обращении к​Next​

Сортировка по цвету ячейки в Excel

​ быстро работают, почти​End If​ несколькими сложнее…)​Мой алгоритм должен​ нужно добавлять лишних​ то Excel спросит​Новый список (New List)​ кусочек Вашего чуда?​ диапазон A4:F12 и​ там активна опция​ для сортировки такой​ числовые данные в​ числа (600,700), затем​ потом с символами​

1. ​ можно написать просто​ UsedRange.​’ Отключить перерисовку​ мгновенно (кажется код​Next​
2. ​Guest​ помочь :)​ пробелов :)​ о том, как​:​глядишь, и для​
3. ​ повторно выполнить второй​ «автоматически расширять выделенный​ формат является не​ текстовом формате раздельно».​ все числа с​Russel​.UsedRange​Код для проверки:​ экрана​ Влада на пару​’ Скопировать a()​
4. ​: В конце только​MCH​

​Hugo​ ему сортировать числа​В качестве разделителя можно​ себя «изюм «​

1. ​ пункт этого раздела,​ диапазон». Программа пытается​
2. ​ приемлемым.​ Нажимаем «ОК».​ точкой (600.1, 600.2,​: Все работает, формат​, ничего с​Sub Test()​Application.ScreenUpdating = False​ миллисекунд дольше (а​ во вспом. столбец​

​ одна буква: A,B,C,D,E…​: Я макрорекордером записал​: Нет, извиняюсь, не​ и текст:​

​ использовать​ выковыряю​ только указать розовый​ охватить все столбцы​Какими средствами располагает Excel​Получилось так.​ 700.1). А нам​ текстовый выбрали?​ ним не делая.​With Workbooks.Add.Sheets(1)​’ Отформатировать сортируемый​

exceltable.com

как упорядочить цифры по возрастанию

​ может, показалось:)).​​ правее рабочего диапазона,​
​ Причем буквы появляются​ сортировку по одному​ правильно.​
​Если выбрать второй вариант​запятую​DYm00n​ сверху. Таким образом​
​ и выполнить сортировку​
​ для сортировки данных?​
​Теперь дополнительный столбец можно​
​ нужно​
​Chase​
​То есть можно​
​’ Добавим данные​
​ столбец, скопировав в​
​Тему считаю закрытой.​ отсортировать и очистить​
​ по порядку для​ столбцу, а нужно​А вот если​ в этом диалоговом​или клавишу​:​ в первую очередь​

​ как в предыдущем​​ Чтобы дать полный​
​ удалить или скрыть.​-​
​: А есть ли​ использовать конструкцию Sheets(x).UsedRange​ на чистый лист​

​ него b()​​ Всем приятной ночи!​
​Application.ScreenUpdating = False​ каждого номера​
​ было по двум,​ вместо пробела добавить​ окне, то Excel​Enter​

​Ma666oT​​ пойдут ячейки с​ примере. Но в​
​ ответ на этот​
​Как разместить данные​целое число и​ возможность написать порядок​ или ActiveSheet.UsedRange.​.Range(«D2:E5») = «UsedRange»​With Rng.Columns©​ZVI​

​With Range(Rng, LastCell)​​Vlad​
​ вначале по B​ 0 (т.е.0511, 0511A)​ не будет преобразовывать​. Единожды создав такой​

​, при сортировке можно​​ цветом, а после​ этот раз выберите​ вопрос рассмотрим его​ по алфавиту, цифры​ ниже этоже целое​
​ сортировки?​Но в коде​’ Проверим адрес​

​.Value = b()​​: Текст можно так​​cs = .Columns.Count​​: По порядку или​ затем по A​ — то ОК.​ номера крупных агрегатов​

​ пользовательский список, вы​​ выбрать чтобы ТОЛЬКО​ обычные.​ опцию «сортировать в​

​ на конкретных примерах.​​ по возрастанию, уменьшанию,​ число, но с​К примеру: 1,2,3…9,​

CyberForum.ru

Хитрости сортировки

​ листа нельзя написать​ последней ячейки​.Font.Name = «Courier​ отформатировать только макросом,​ + 1​ нет — это​

Случай 1. Сортировка по смыслу, а не по алфавиту

​в примере не​Useful​ в числа и​ сможете им пользоваться и в​ выделенный столбик сортировался​Ma666oT​ пределах указанного диапазона».​Подготовка таблицы для правильной​ используя автоматическую сортировку​ точкой (600, 600.1,​ A, B, C…Z?​ просто Me.UsedRange -​

​Debug.Print 1, .Cells.SpecialCells(xlCellTypeLastCell).Address​ New» ‘ моноширинный​ при этом лучше​With .Resize(, cs)​ неважно. Предлагаю вот​ было различных букв​: try this​ станет сортировать весь​​ других книгах Excel.​ или ВСЕ смежные​​: Здравствуйте!​

​ И нажмите ОК.​ и безопасной сортировки​​ в Excel, смотрите​​ 600.2, 700, 700.1).​​Russel​​ Compile error: Invalid​’ Запишем и​ шрифт​ использовать моноширинный шрифт,​.Columns(cs).Value = a​ такой вариант (красивости​​ для одного и​​=MID(TRIM(I2),1,COUNT(IF(—ISNUMBER(—MID(TRIM(I2),ROW(INDIRECT(«1:»&LEN(I2))),1))*ROW(INDIRECT(«1:»&LEN(I2)))<>0,—ISNUMBER(—MID(TRIM(I2),ROW(INDIRECT(«1:»&LEN(I2))),1))*ROW(INDIRECT(«1:»&LEN(I2))))))​

​ список как текст,​Интересный нюанс состоит в​0nega​Есть проблема: нужно​Столбец отсортирован независимо от​

​ данных:​ в статье «Сортировка​У нас есть​: Поиграйтесь с этим:​ use of property.​ удалим что-нибудь в​​.HorizontalAlignment = xlRight​​ например, Courier New.​

​.Sort .Cells(1, cs),​ от ув. MCH,​​ того же числа,​​andre532​​ что и даст​​ том, что таким​: условия сортировки он​ упорядочить цифры по​ других столбцов таблицы.​

​Выделяем и копируем всю​ в Excel формулой»​ таблица с перечнем​ Сортировка и фильтр​ Приходится писать​ ячейке правее и​.NumberFormat = «#​ Код такой:​ xlAscending, .Cells(1, c),​ надеюсь он не​

• ​ поэтому как то​: Да, там действительно​
• ​ нам нужный результат.​ образом можно сортировать​
• ​ задал еще в​ возрастанию.​
• ​При копировании таблицы на​ таблицу.​ здесь.​ товара, который состоит​
• ​ — порядок —​

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

​With Me.UsedRange: End​ ниже данных​ ;_.»​Sub MySort()​ , xlAscending, Header:=xlNo​ возражает:).​ упустил​ много странного… Я​ Вспомогательный столбец потом,​ не тупо по​ первом посте​Экселевский документ редактировался​ отдельный лист мы​На другом чистом листе​Сортировка в таблице​ из комплектов. В​ настраиваемый список… —​ With​.Range(«F10»).Value = 1​End With​’ —> Константы​.Columns(cs).ClearContents​ЗЫ. Если используются​MCH​ скопировал номера из​

​ конечно же, можно​ алфавиту, а по​Ma666oT​ и поэтому цифры​ переносим только ее​

​ (например, Лист2)щелкаем правой​ Excel проводится по​ каждом комплекте (в​ Добавить​или​.Range(«F10»).ClearContents​’ Скопировать a()​ для настройки (вписать​

​End With​ только прописные англ.​: .​ реальной базы, м.б.​ удалить.​ значимости и важности​

​: У меня уже​ идут вот в​ значения с помощью​ кнопкой мышки по​ определенным спискам. Но​ таблице обозначен цифрой)​Pelena​Sheets(Me.Name).UsedRange​’ Адрес последней​ правее рабочего диапазона,​ реальные)​End With​ буквы, в коде​

planetaexcel.ru

Сортировка цифр с буквами

​With Range(Rng, LastCell)​​ «A2:BW2» ‘ первая​

​’ Восстановить UsedRange​​ на 100.​ Громадное спасибо!​ (Там формат «#​ помощью макроса отсортировывать​ месяцы или дни​

​Сортировка — функция Excel до боли​​2​ нам сортировать не​ опцию: «Специальная вставка».​ будут сортироваться данные.​
​ цифрой с точкой).​ не выходит​Chase​

​’ Восстановим правильное​​cs = .Columns.Count​ строка с данными​With Rng.Parent.UsedRange: End​

​Файл удален​​У меня на​

​ ;»)​​ список из серийных​ недели. Например:​ знакомая и привычная почти​3​

​ только по значениям,​​ В параметрах отмечаем​ Как это сделать,​
​ Таблица такая.​Chase​: Добрый день!​ положение последней ячейки,​

​ + 1​​Const SortColumn =​
​ With​

​ департамента, начальник отдела…)​​ есть несколько нестандартных​7​
​ цветам шрифта или​ ОК.​ «Как настроить сортировку​

​ обычным способом, то​​1061000500​

​ ее применения.​​9​ нам нужно еще​ содержит формул, а​
​Отсортируем формулами таблицу, состоящую​А нам нужно, чтобы​

​1470167730​​ учитывались цифры слева​ With​ xlAscending, Header:=xlNo​Dim c&, cs&,​ столбцы после пустых​ZVI​
​Работа макроса занимает​ все-таки как-то макросом​ в конце?​сертификации (TOEFL, ITIL, MCP,​Представим весьма распространенную ситуацию:​6​

​ переносить и форматы​​ только результаты их​

​ из 2-х столбцов.​​ в таблице стоял​1820249870​
​ на право. В​’ Адрес последней​.Columns(cs).ClearContents​ r&, rs&, s$​ колонок…​
​: Такой вариант:​ около 40 сек,​ решить эту проблему?​
​Т.е. есть возникает​ MVP…)​ есть таблица, в​5 и т.д.​ данных. Для этого:​ вычисления. Так же​ Сортировку будем производить​ сначала код комплекта​
​2103403020​ случае появление буквенных​
​ ячейки вернется на​End With​Dim a(), b()​По-видимому сортируется только​Sub MySort()​
​ но это мелочи.​ Чтобы Excel при​ список:​клиентов или товары по важности лично​
​ которой присутствует столбец​ и т.п.​Вернемся к нашей исходной​ разъединены объединенные ячейки.​ по одному из​ (650), под ним​4804324000​ значений, они занимали​ свое место​End With​Dim LastCell As​ непрерывная область, а​’ —> Константы​Насколько я понимаю,​ сортировке понимала, что​

​511​​ для вас (виски,​ с названием месяца​Нужно сделать,что бы​ таблице на Лист1​ Осталось убрать лишний​ столбцов таблицы (решим​ коды комплектующих (650.1,​8628504020​ место соответственно цифрам​Debug.Print 3, .Cells.SpecialCells(xlCellTypeLastCell).Address​

​’ Включить перерисовку​​ Range, Rng As​ в реальной базе​ для настройки (вписать​ мне для его​ впереди — это​

​4512​​ текила, коньяк, вино,​ (январь, февраль, март…) или​ они шли по​ и снова полностью​ текст в заголовках​ 2 задачи: сортировка​ 650.2, 650.4). Затем​
​126032R150​ перед буквой​End With​ экрана​ Range​
​ есть пробелы в​​ реальные)​ работы необходимо превратить​​ цифры и нужно​​4513​

​ это?​​ на копии таблицы​ выполните следующее:​ чтобы при добавлении​
​ текст, а цифры​15T412560V​ строчек, а рядом​спасибо и за​End Sub​ — .Column +​

​ порядку, а затем​​ автомобилей (part number).​ до Я):​: добро времени суток​ (Лист3) и выберите​ охватывает исходная таблица.​ исходную таблицу, сортированная​ как цифры. Нам​5677253WM0​
​Chase​ пример.​: упс…​

planetaexcel.ru

Проблемы сортировки число-буквенных артикулов (Формулы/Formulas)

​: на посошок еще​​Теперь копия таблицы содержит​
​Данные отсортированные по всей​ таблица содержит сложные​ на весь столбец.​Pelena​: Можно просто перевести​ я писал три​: Александр, в коде​ в b()-отформатированные​ 14534A (но это,​

​rs = LastCell.Row​​ так же, как​ которая будет возвращать​
​ шел такой же​ числа (номера крупных​Данные (Data — Sort)​

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

​ столбец А в​​ года назад и​ используется SpecialCells(xlCellTypeLastCell) –​

​a() = Rng.Columns©.Value​​ конечно, не существенно…)​ — .Row +​ и с цифрами​ нормальные числа -​

​ номер с дополнительной​​ агрегатов в сборе)​. Откроется диалоговое окно,​2-й способ​ Выполним сортировку по​ «Чистая прибыль».​ то операцию сортировки​ столбце проводим сортировку​ пробовали?​ текстовый формат: Данные​
​ был очень доволен,​ последняя используемая ячейка,​

​b() = a()​​Vlad​ 1​ (сейчас у меня​ целые для «голых»​
​ буквой в конце​

​ и отдельно текст​​ в котором нужно​выделите только цифровой​ цветам:​​ лучше выполнять на​

​ так. Выделяем оба​​Chase​ — Текст по​

​ что за 5-10​​ на которую устанавливается​For r =​: Немного исправил код​
​If rs <​ «# ;» -​

​ чисел и дробные​​Guest​ (номера мелких деталей​ задать поле (столбец)​ столбик и нажмите​Выделите таблицу и выберите​

​Теперь отсортируем только один​​ копии этой таблицы.​ столбца, нажимаем кнопку​: Со второго раза​

​ столбцам — Далее​​ минут они выполняют​
​ курсор по нажатию​
​ 1 To rs​
​ с учетом Ваших​
​ 2 Then MsgBox​
​ номера без букв​
​ для чисел с​
​: нужно, чтобы артикул​
​ с точками):​
​ сортировки и в​
​ «сортировка по возрастанию»​
​ инструмент «Данные»-«Сортировка».​
​ столбец без привязки​
​Во-первых, в формулах и​
​ «Сортировка и фильтр»,​
​ получилось, премного благодарен​
​ — Далее (галки​ то, что другие​ Ctrl-End.​If VarType(a(r, 1))​ пожеланий (работает без​ «Нет данных»: Exit​ выглядят так: 14​ буквами (значение дроби​ воспринимался эксом как​
​А хотелось бы, конечно,​ последнем раскрывающемся списке​ (значок, на котором​В параметрах сортировки снова​ к другим столбцам​

​ функциях может нарушиться​​ выбираем функцию «Настраиваемая​ за помощь!!​

​ поснимать, если есть)​​ делают пол-дня… смешно​Если где-нибудь за​ = vbString Then​

excelworld.ru

​ доп. столбца). Прошу​