Jak szybko posortować adres IP od niskiego do wysokiego w programie Excel?
Ogólnie rzecz biorąc, używamy funkcji Sortuj do sortowania ciągów w programie Excel. Ale jeśli do sortowania są potrzebne adresy IP, kolejność sortowania może być nieprawidłowa, używając funkcji Sortuj bezpośrednio, jak pokazano na zrzucie ekranu. Teraz mam kilka sposobów na szybkie i poprawne sortowanie adresów IP w programie Excel.
| Nieprawidłowa funkcja sortowania według sortowania | Prawidłowe sortowanie |
 |
 |
Sortuj adres IP według tekstu do kolumn
Sortuj adres IP według wzoru
Użyj wzoru, aby wypełnić adres IP, a następnie posortuj.
1. Wybierz komórkę sąsiadującą z adresem IP i wpisz tę formułę
=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")
naciśnij Wchodzę i przeciągnij uchwyt wypełniania po komórkach, aby zastosować tę formułę.
2. Skopiuj wyniki formuły i wklej je jako wartość w następnej kolumnie. Zobacz zrzut ekranu:
 |
 |
3. pozostaw wybraną wklejoną wartość i kliknij Dane > Sortuj od A do Z.
4. w Sortuj Waring okno dialogowe, zachowaj Rozwiń wybór sprawdzone.
5. kliknij Sortuj. Teraz adresy IP zostały posortowane od niskiego do wysokiego.
Możesz usunąć kolumny pomocnika.
Sortuj adres IP według VBA
Oto kod VBA, który również może Ci pomóc.1. naciśnij Alt + F11 klawisze, aby włączyć Microsoft Visual Basic for Applications okno.
2. kliknij wstawka > Moduł, skopiuj i wklej kod do pustego skryptu.
VBA: Wypełnij adres 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
3. Następnie kliknij Tools > Numer Referencyjny, i zaznacz Wyrażenia regularne Microsoft VBScript 5.5 w wyskakującym oknie dialogowym.
 |
 |
4. kliknij OK i naciśnij F5 klawisz, pojawi się okno dialogowe przypominające o wybraniu zakresu do pracy.
5. kliknij OK. Następnie adresy IP zostały wypełnione zerem.
6. Wybierz adresy IP i kliknij Dane > Sortuj od A do Z aby je posortować.
Sortuj adres IP według tekstu do kolumn
W rzeczywistości funkcja Tekst na kolumny może wyświadczyć Ci przysługę również w programie Excel.
1. Wybierz używane komórki i kliknij Dane > Tekst do kolumn. Zobacz zrzut ekranu:
2. w Konwertuj Kreator tekstu na kolumnę okno dialogowe, wykonaj poniższe czynności:
Kontrola Rozgraniczonei kliknij Następna;
Kontrola Inne i typ . w polu tekstowym i kliknij Następna;
Wybierz komórkę obok adresu IP, aby umieścić wynik. Kliknij koniec.
 |
 |
 |
3. Zaznacz wszystkie komórki zawierające adresy IP i komórki podzielone, a następnie kliknij Dane > Sortuj.
4. w Sortuj okno dialogowe, kliknięcie Dodaj poziom do sortowania danych z kolumny B do E (podzielone komórki). Zobacz zrzut ekranu:
5. kliknij OK. Teraz kolumny zostały posortowane.
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
