Jak rychle třídit IP adresu z nízké na vysokou v aplikaci Excel?
Obecně používáme funkci řazení k řazení řetězce v aplikaci Excel. Pokud ale k třídění potřebujete nějaké IP adresy, může být pořadí řazení špatné, když použijete funkci řazení přímo, jak je ukázáno níže. Nyní mám několik způsobů, jak rychle a správně řadit adresy IP v aplikaci Excel.
| Chybné řazení podle funkce řazení | Správné řazení |
 |
 |
Řazení IP adresy podle textu na sloupce
Řadit IP adresu podle vzorce
Pomocí vzorce vyplňte adresu IP a poté seřaďte.
1. Vyberte buňku sousedící s IP adresou a zadejte tento vzorec
=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")
lis vstoupit klávesou a přetažením úchytky výplně přes buňky použijte tento vzorec.
2. Zkopírujte výsledky vzorce a vložte je jako hodnotu do dalšího sloupce. Viz screenshot:
 |
 |
3. ponechte vybranou vloženou hodnotu a klepněte na Data > Třídit od A do Z..
4. V Třídit Waring dialog, ponechat Rozbalte výběr kontrolovány.
5. klepněte na tlačítko Typ. Nyní byly adresy IP seřazeny od nejnižší po nejvyšší.
Sloupce pomocníka můžete odebrat.
Řadit IP adresu podle VBA
Zde je kód VBA, který vám také může pomoci.1. lis Alt + F11 klávesy pro povolení Microsoft Visual Basic pro aplikace okno.
2. cvaknutí Vložit > Modul, zkopírujte a vložte kód do prázdného skriptu.
VBA: Vyplňte IP adresu
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. Pak klikněte na tlačítko Tools > Odkaz, a zkontrolujte Pravidelné výrazy Microsoft VBScript 5.5 v rozbalovacím dialogovém okně.
 |
 |
4. cvaknutí OK a stiskněte F5 zobrazí se dialogové okno, které vám připomene vybrat rozsah, který chcete pracovat.
5. cvaknutí OK. Poté byly IP adresy vyplněny nulou.
6. Vyberte IP adresy a klikněte na Data > Třídit od A do Z. abych je seřadil.
Řazení IP adresy podle textu na sloupce
Ve skutečnosti vám funkce Text to Columns může udělat službu i v Excelu.
1. Vyberte buňky, které používáte, a klepněte na Data > Text do sloupců. Viz snímek obrazovky:
2. V Převést Průvodce textu na sloupce dialogové okno, postupujte takto:
Kontrola Oddělené, a klepněte na tlačítko další;
Kontrola Ostatní a typ . do textového pole a klikněte další;
Chcete-li umístit výsledek, vyberte buňku vedle adresy IP. Klikněte úprava.
 |
 |
 |
3. Vyberte všechny buňky obsahující IP adresy a rozdělené buňky a klikněte Data > Typ.
4. V Typ dialog, kliknutí Přidat úroveň seřadit data ze sloupce B do E (rozdělené buňky). Viz snímek obrazovky:
5. cvaknutí OK. Nyní jsou sloupce seřazeny.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
