Bỏ qua nội dung chính

Làm thế nào để nhanh chóng sắp xếp địa chỉ IP từ thấp đến cao trong Excel?

Nói chung, chúng tôi sử dụng chức năng Sắp xếp để sắp xếp chuỗi trong Excel. Nhưng nếu có một số địa chỉ IP cần thiết để sắp xếp, thứ tự sắp xếp có thể bị sai khi sử dụng chức năng Sắp xếp trực tiếp như hình minh họa bên dưới. Bây giờ tôi có một số cách để sắp xếp địa chỉ IP một cách nhanh chóng và chính xác trong Excel.

Phân loại sai theo chức năng Sắp xếp Sắp xếp đúng
doc sắp xếp ip 1 doc sắp xếp ip 2

Sắp xếp địa chỉ IP theo công thức

Sắp xếp địa chỉ IP theo VBA

Sắp xếp địa chỉ IP theo Văn bản thành Cột


Sắp xếp địa chỉ IP theo công thức

Sử dụng công thức để điền địa chỉ IP rồi sắp xếp.

1. Chọn một ô bên cạnh địa chỉ IP và nhập công thức này

=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")

nhấn đăng ký hạng mục thi và kéo chốt điền trên các ô để áp dụng công thức này.
doc sắp xếp ip 3

2. Sao chép kết quả công thức và dán chúng dưới dạng giá trị trong cột tiếp theo. Xem ảnh chụp màn hình:

doc sắp xếp ip 4
doc sắp xếp ip 5

3. giữ giá trị đã dán được chọn và nhấp vào Ngày > Sắp xếp A đến Z.
doc sắp xếp ip 6

4. bên trong Sắp xếp Waring hộp thoại, giữ Mở rộng sự lựa chọn đã kiểm tra.
doc sắp xếp ip 7

5. nhấp chuột Sắp xếp. Bây giờ các địa chỉ IP đã được sắp xếp từ thấp đến cao.
doc sắp xếp ip 2

Bạn có thể xóa các cột trợ giúp.


Sắp xếp địa chỉ IP theo VBA

Đây là mã VBA cũng có thể giúp bạn.

1. nhấn Alt + F11 các phím để kích hoạt Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. nhấp chuột Chèn > Mô-đun, sao chép và dán mã vào tập lệnh trống.

VBA: Điền địa chỉ 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 sắp xếp ip 8

3. Sau đó nhấn vào CÔNG CỤ > Tài liệu tham khảo, và kiểm tra Microsoft VBScript Biểu thức chính quy 5.5 trong hộp thoại bật lên.

doc sắp xếp ip 9
doc sắp xếp ip 10

4. nhấp chuột OK và báo chí F5 , một hộp thoại bật ra để nhắc bạn chọn một phạm vi để làm việc.
doc sắp xếp ip 11

5. nhấp chuột OK. Sau đó, các địa chỉ IP đã được điền bằng không.

6. Chọn địa chỉ IP và nhấp vào Ngày > Sắp xếp A đến Z để sắp xếp chúng.


Sắp xếp địa chỉ IP theo Văn bản thành Cột

Trên thực tế, tính năng Văn bản thành Cột cũng có thể giúp ích cho bạn trong Excel.

1. Chọn các ô bạn sử dụng và nhấp vào Ngày > Văn bản thành Cột. Xem ảnh chụp màn hình:
doc sắp xếp ip 12

2. bên trong Trình hướng dẫn chuyển đổi văn bản thành cột , hãy làm như bên dưới:

kiểm tra Phân cách, Và nhấp vào Sau;

kiểm tra Nền tảng khác và loại . vào hộp văn bản và nhấp vào Sau;

Chọn một ô bên cạnh địa chỉ IP để đặt kết quả. Nhấp chuột Kết thúc.

doc sắp xếp ip 13
doc sắp xếp ip 14
doc sắp xếp ip 15

3. Chọn tất cả các ô chứa địa chỉ IP và các ô được chia nhỏ, rồi nhấp vào Ngày > Sắp xếp.
doc sắp xếp ip 16

4. bên trong Sắp xếp hộp thoại, nhấp chuột Thêm cấp độ để sắp xếp dữ liệu từ cột B đến E (các ô được chia nhỏ). Xem ảnh chụp màn hình:
doc sắp xếp ip 17

5. nhấp chuột OK. Bây giờ các cột đã được sắp xếp.
doc sắp xếp ip 18


Công cụ năng suất văn phòng tốt nhất

🤖 Trợ lý AI của Kutools: Cách mạng hóa việc phân tích dữ liệu dựa trên: Thực thi thông minh   |  Tạo mã  |  Tạo công thức tùy chỉnh  |  Phân tích dữ liệu và tạo biểu đồ  |  Gọi các hàm Kutools...
Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian.  Bấm vào đây để có được tính năng bạn cần nhất...

Mô tả


Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Traducido al español:
=TEXTO(IZQUIERDA(A1,ENCONTRAR(".",A1,1)-1),"000") & "." & TEXTO(EXTRAE(A1,ENCONTRAR( ".",A1,1)+1,ENCONTRAR(".",A1,ENCONTRAR(".",A1,1)+1)-ENCONTRAR(".",A1,1)-1),"000") & "." & TEXTO(EXTRAE(A1,ENCONTRAR(".",A1,ENCONTRAR(".",A1,1)+1)+1,ENCONTRAR(".",A1, ENCONTRAR(".",A1,ENCONTRAR(".",A1,1)+1)+1)-ENCONTRAR(".",A1,ENCONTRAR(".",A1,1)+1)-1), "000") & "." & TEXTO(DERECHA(A1,LARGO(A1)-ENCONTRAR(".",A1,ENCONTRAR(".",A1,ENCONTRAR( ".",A1,1)+1)+1)),"000")
This comment was minimized by the moderator on the site
Thanks for your help on translating the formula.
This comment was minimized by the moderator on the site
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.
This comment was minimized by the moderator on the site
thank you, very useful !
This comment was minimized by the moderator on the site
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")
This comment was minimized by the moderator on the site
Merci pour la traduction !
This comment was minimized by the moderator on the site
Why does the formula not work for the last octet? It adds zeros to the 3rd octet but not the last? So frustrating.
This comment was minimized by the moderator on the site
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?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations