Hoe snel een IP-adres van laag naar hoog sorteren in Excel?

Over het algemeen gebruiken we de functie Sorteren om de tekenreeks in Excel te sorteren. Maar als er enkele IP-adressen nodig zijn om te sorteren, kan de sorteervolgorde verkeerd zijn door de sorteerfunctie direct te gebruiken, zoals hieronder wordt getoond. Nu heb ik een aantal manieren om de IP-adressen snel en correct in Excel te sorteren.

Verkeerd sorteren op sorteerfunctie	Correct sorteren

Sorteer het IP-adres op formule

Sorteer het IP-adres op VBA

Sorteer het IP-adres op Tekst naar kolommen

Sorteer het IP-adres op formule

Gebruik een formule om het IP-adres in te vullen en sorteer.

1. Selecteer een cel naast het IP-adres en typ deze formule

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

pers Enter -toets en sleep de vulgreep over de cellen om deze formule toe te passen.

2. Kopieer de formuleresultaten en plak ze als waarde in de volgende kolom. Zie screenshot:

3. houd de geplakte waarde geselecteerd en klik Data > Sorteer A tot Z.

4. In de Sorteer Waring dialoog, bewaar Breid de selectie uit gecontroleerd.

5. klikken Sorteer. Nu zijn de IP-adressen gesorteerd van laag naar hoog.

U kunt de hulpkolommen verwijderen.

Sorteer het IP-adres op VBA

1. druk op Alt + F11 toetsen om het Microsoft Visual Basic voor toepassingen venster.

2. klikken Invoegen > Module, kopieer en plak de code in het lege script.

VBA: vul het IP-adres in

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

3. Then click Tools > Reference, and check Microsoft VBScript Regular Expressions 5.5 in the popping dialog.

4. Click OK and press F5 key, a dialog pops out to remind you to select a range to work.

5. Click OK. Then the IP addresses have been filled with zero.

6. Select the IP addresses and click Data > Sort A to Z to sort them.

---

Sort IP address by Text to Columns

Actually, the Text to Columns feature can do you a favor in Excel too.

1. Select the cells you use, and click Data > Text to Columns. See screenshot:

2. In the Convert Text to Columns Wizard dialog, do as below:

Check Delimited, and click Next;

Check Other and type . into the textbox, and click Next;

Select a cell next to the IP address to place the result. Click Finish.

3. The select all cells containing the IP addresses and the split cells, and click Data > Sort.

4. In the Sort dialog, clicking Add level to sort data from column B to E (the split cells). See screenshot:

5. Click OK. Now the columns have been sorted.

---

---

The Best Office Productivity Tools

Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%

• Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
• Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
• Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
• Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
• Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
• Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
• Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
• Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
• More than 300 powerful features. Supports Office / Excel 2007-2021 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.

Read More... Free Download... Purchase... 

---

Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

• Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
• Open and create multiple documents in new tabs of the same window, rather than in new windows.
• Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!

Read More... Free Download... Purchase...