Cum se sortează rapid adresa IP de la scăzută la scăzută în Excel?
În general, folosim funcția Sortare pentru a sorta șirul în Excel. Dar dacă sunt necesare câteva adrese IP pentru sortare, ordinea de sortare poate fi greșită folosind funcția Sortare direct așa cum este prezentat mai jos. Acum am câteva modalități de a sorta rapid și corect adresele IP în Excel.
| Funcția Sortare greșită după Sortare | Sortare corectă |
 |
 |
Sortați adresa IP după formulă
Sortați adresa IP după text în coloane
Sortați adresa IP după formulă
Folosiți o formulă pentru a completa adresa IP, apoi sortați.
1. Selectați o celulă adiacentă adresei IP și tastați această formulă
=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")
presa Intrați tasta și trageți mânerul de umplere peste celule pentru a aplica această formulă.
2. Copiați rezultatele formulei și lipiți-le ca valoare în coloana următoare. Vedeți captura de ecran:
 |
 |
3. mențineți valoarea lipită selectată și faceți clic pe Date > Sortați de la A la Z.
4. În Sortare Waring dialog, păstrează Extindeți selecția verificate.
5. clic Sortează. Acum, adresele IP au fost sortate de la scăzut la mare.
Puteți elimina coloanele de ajutor.
Sortați adresa IP după VBA
Iată un cod VBA care vă poate ajuta, de asemenea.1. presa Alt + F11 tastele pentru a activa Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Module, copiați și lipiți codul în scriptul gol.
VBA: Completați adresa 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. Apoi apasa Instrumente > Referinţăși verificați Expresii regulate Microsoft VBScript 5.5 în dialogul popping.
 |
 |
4. clic OK și apăsați F5 tasta, apare un dialog pentru a vă reaminti să selectați o gamă pentru a lucra.
5. clic OK. Apoi, adresele IP au fost completate cu zero.
6. Selectați adresele IP și faceți clic Date > Sortați de la A la Z pentru a le sorta.
Sortați adresa IP după text în coloane
De fapt, caracteristica Text în coloane vă poate face o favoare și în Excel.
1. Selectați celulele pe care le utilizați și faceți clic Date > Text către coloane. Vedeți captura de ecran:
2. În Expertul Conversia textului în coloane dialog, procedați după cum urmează:
Verifica delimitat, și faceți clic pe Pagina Următoare →;
Verifica Altele și tip . în caseta de text și faceți clic pe Pagina Următoare →;
Selectați o celulă de lângă adresa IP pentru a plasa rezultatul. Clic finalizarea.
 |
 |
 |
3. Selectați toate celulele care conțin adresele IP și celulele împărțite și faceți clic pe Date > Sortează.
4. În Sortează dialog, făcând clic pe Adăugați un nivel pentru a sorta datele din coloana B în E (celulele divizate). Vedeți captura de ecran:
5. clic OK. Acum coloanele au fost sortate.
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
