Note: The other languages of the website are Google-translated. Back to English
Увійти  \/ 
x
or
x
Реєстрація  \/ 
x

or

Як швидко відсортувати IP-адресу від низької до високої в Excel?

Загалом, ми використовуємо функцію сортування для сортування рядка в Excel. Але якщо для сортування потрібні деякі IP-адреси, порядок сортування може бути неправильним за допомогою функції Сортування безпосередньо, як показано на знімку екрана нижче. Тепер у мене є кілька способів швидко та правильно сортувати IP-адреси в Excel.

Неправильно Сортувати за функцією сортування Правильне сортування
doc sort ip 1 doc sort ip 2

Сортувати IP-адресу за формулою

Сортувати IP-адресу за VBA

Сортувати IP-адресу за текстом у стовпці


Сортувати IP-адресу за формулою

Використовуйте формулу для заповнення IP-адреси, а потім сортуйте.

1. Виберіть комірку, сусідню з IP-адресою, і введіть цю формулу

=TEXT(LEFT(A1,FIND(".",A1,1)-1),"000") & "." & TEXT(MID(A1,FIND( ".",A1,1)+1,FIND(".",A1,FIND(".",A1,1)+1)-FIND(".",A1,1)-1),"000") & "." & TEXT(MID(A1,FIND(".",A1,FIND(".",A1,1)+1)+1,FIND(".",A1, FIND(".",A1,FIND(".",A1,1)+1)+1)-FIND(".",A1,FIND(".",A1,1)+1)-1), "000") & "." & TEXT(RIGHT(A1,LEN(A1)-FIND(".",A1,FIND(".",A1,FIND( ".",A1,1)+1)+1)),"000")

press вводити клавішу та перетягніть маркер заповнення по клітинках, щоб застосувати цю формулу.
doc sort ip 3

2. Скопіюйте результати формули та вставте їх як значення у наступний стовпець. Дивіться знімок екрана:

doc sort ip 4
doc sort ip 5

3. залиште вставлене значення вибраним і натисніть дані > Сортувати від А до Я.
doc sort ip 6

4 В Сортувати Уорінг діалогове вікно, зберегти Розгорніть вибір перевірено
doc sort ip 7

5. клацання сортувати. Тепер IP-адреси відсортовані від низької до високої.
doc sort ip 2

Ви можете видалити допоміжні стовпці.


Сортувати IP-адресу за VBA

Ось код VBA, який також може вам допомогти.

1. прес Alt + F11 клавіші, щоб увімкнути Microsoft Visual Basic для додатків вікна.

2. клацання Insert > Модулі, скопіюйте та вставте код у порожній сценарій.

VBA: Заповніть IP-адресу

Sub FormatIP()
'UpdatbyExtendoffice20171215
    Dim xReg As New RegExp
    Dim xMatches As MatchCollection
    Dim xMatch As Match
    Dim xRg As Range
    Dim xCell As Range
    Dim I As Long
    Dim xArr() As String
    On Error Resume Next
    Set xRg = Application.InputBox("Select cells:", "KuTools For Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    With xReg
        .Global = True
        .Pattern = "\d{1,3}\.+\d{1,3}\.+\d{1,3}\.+\d{1,3}"
        For Each xCell In xRg
            Set xMatches = .Execute(xCell.Value)
            If xMatches.Count = 0 Then GoTo xBreak
            For Each xMatch In xMatches
                xArr = Split(xMatch, ".")
                For I = 0 To UBound(xArr)
                    xArr(I) = Right("000" & xArr(I), 3)
                    If I <> UBound(xArr) Then
                        xArr(I) = xArr(I) & "."
                    End If
                Next
            Next
            xCell.Value = Join(xArr, "")
xBreak:
        Next
    End With
End Sub

doc sort ip 8

3 Потім натисніть інструменти > Посилання, і перевірити Регулярні вирази Microsoft VBScript 5.5 у діалоговому вікні.

doc sort ip 9
doc sort ip 10

4. клацання OK і натисніть F5 клавіша, вискакує діалогове вікно, щоб нагадати вам вибрати діапазон для роботи.
doc sort ip 11

5. клацання OK. Тоді IP-адреси були заповнені нулем.

6. Виберіть IP-адреси та натисніть дані > Сортувати від А до Я щоб їх сортувати.


Сортувати IP-адресу за текстом у стовпці

Насправді функція «Текст у стовпці» може зробити вам користь і в Excel.

1. Виділіть клітинки, якими ви користуєтеся, та клацніть дані > Текст у стовпці. Дивіться знімок екрана:
doc sort ip 12

2 В Перетворення макета тексту в колонки діалогове вікно, виконайте вказані нижче дії

перевірити Розмежовано, і клацніть наступного;

перевірити Other і тип . у текстове поле та натисніть наступного;

Виберіть комірку поруч з IP-адресою, щоб розмістити результат. Клацніть обробка.

doc sort ip 13
doc sort ip 14
doc sort ip 15

3. Виділіть усі комірки, що містять IP-адреси та розділені комірки, та натисніть дані > сортувати.
doc sort ip 16

4 В сортувати діалогове вікно, клацнувши Додати рівень для сортування даних зі стовпця B до E (розділені комірки). Дивіться знімок екрана:
doc sort ip 17

5. клацання OK. Тепер стовпці відсортовані.
doc sort ip 18



Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2019 та 365. Підтримує всі мови. Простота розгортання на вашому підприємстві чи в організації. Повна функція 30-денної безкоштовної пробної версії. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Jim H · 2 months ago
    This is great!  Very much appreciated.  It would be nice to add to the VB code to reverse (put back) the IP's in the original format (without the extra leading 0's) after having sorted them. :)  I would be very interested in that where you can run this script, sort results, then revert back to original format.
  • To post as a guest, your comment is unpublished.
    Stephen · 1 years ago
    thank you, very useful !
  • To post as a guest, your comment is unpublished.
    bobulus · 2 years ago
    la formule traduite en Francais :
    =TEXTE(GAUCHE(I6;TROUVE(".";I6;1)-1);"000") & "." & TEXTE(STXT(I6;TROUVE( ".";I6;1)+1;TROUVE(".";I6;TROUVE(".";I6;1)+1)-TROUVE(".";I6;1)-1);"000") & "." & TEXTE(STXT(I6;TROUVE(".";I6;TROUVE(".";I6;1)+1)+1;TROUVE(".";I6; TROUVE(".";I6;TROUVE(".";I6;1)+1)+1)-TROUVE(".";I6;TROUVE(".";I6;1)+1)-1); "000") & "." & TEXTE(DROITE(I6;NBCAR(I6)-TROUVE(".";I6;TROUVE(".";I6;TROUVE( ".";I6;1)+1)+1));"000")
    • To post as a guest, your comment is unpublished.
      Alex · 1 years ago
      Merci pour la traduction !
  • To post as a guest, your comment is unpublished.
    Chris · 3 years ago
    Why does the formula not work for the last octet? It adds zeros to the 3rd octet but not the last? So frustrating.
    • To post as a guest, your comment is unpublished.
      Sunny · 3 years ago
      I have tested the formula before I post it, it can work for the last octer. Have you checked the formula you pasted is correct?