Kaip "Excel" programoje rūšiuoti IP adresą (6 metodai)

  • Pasidalinti
Hugh West

"Excel" traktuoja IP adresas kaip tekstą. Todėl Rūšiuoti ir filtruoti įrankis "Excel" negali teisingai rūšiuoti IP adresų. Šiame straipsnyje pateikiami 6 skirtingi būdai, kaip "Excel" programoje rūšiuoti IP adresus. Toliau pateiktame paveikslėlyje parodyta, kaip veikia dauguma metodų.

Atsisiųsti praktikos sąsiuvinį

Praktikos sąsiuvinį galite atsisiųsti paspaudę toliau esantį atsisiuntimo mygtuką.

Rūšiuoti IP adresą.xlsm

6 būdai, kaip "Excel" programoje rūšiuoti IP adresą

Ketinu jums iliustruoti 6 paprastus IP adresų rūšiavimo "Excel" programoje būdus. Šiems metodams paryškinti naudosime toliau pateiktą duomenų rinkinį. Taigi, pradėkime!

1. Rūšiuoti IP adresą naudojant "Excel" formulę

Taikydami šį metodą, naudosime formulę IP adresams konvertuoti, kad juos būtų galima teisingai surūšiuoti "Excel" programoje. Norėdami tai padaryti, atlikite toliau nurodytus veiksmus.

1 žingsnis: Iš pradžių ląstelėje įveskite šią formulę C5 :

=TEXT(LEFT(B5,FIND(".",B5,1)-1),"000") & "." & TEXT(MID(B5,FIND( ".",B5,1)+1,FIND(".",B5,FIND(".",B5,1)+1)-FIND(".",B5,1)-1),"000") & "." & TEXT(MID(B5,FIND(".",B5,FIND(".",B5,1)+1)+1,FIND(".",B5, FIND(".",B5,FIND(".",B5,1)+1)+1)-FIND(".",B5,FIND(".",B5,1)+1)-1), "000") & "." & TEXT(RIGHT(B5,LEN(B5)-FIND(".",B5,FIND(".",B5,FIND( ".",B5,1)+1)+1)),"000" )

Ši formulė randa taškus(.) ląstelėje B5 ir užpildo kiekvieną okteto numerį nuliu arba nuliukais, jei kuriame nors iš jų yra mažiau nei trys skaitmenys.

Tada nukopijuokite šią formulę į žemiau esančias ląsteles naudodami Užpildymo rankena Įrankis. Taip visi IP adresai bus užpildyti nuliais kaip pirmieji.

2 žingsnis: Po to pasirinkite visus konvertuotus IP adresus.

3 veiksmas: Tada surūšiuokite juos naudodami Rūšiuoti ir filtruoti įrankis iš Pagrindinis taip pat galite dešiniuoju pelės klavišu spragtelėti pasirinktus langelius ir iš ten juos rūšiuoti.

4 veiksmas: Išplėskite pasirinkimą rūšiuodami taip.

Dabar tiek konvertuoti IP adresai, tiek pradiniai IP adresai surūšiuoti taip, kaip parodyta toliau.

Alternatyvi formulė:

5 veiksmas: Naudojant šią formulę taip pat gaunamas tas pats rezultatas.

=(VALUE(LEFT(B5,FIND(".",B5)-1))*10^9)+(VALUE(LEFT(RIGHT(B5,LEN(B5)-FIND(".",B5)),FIND(".",RIGHT(B5,LEN(B5)-FIND(".",B5)))-1))*10^6)+VALUE(LEFT(RIGHT(RIGHT(B5,LEN(B5)-FIND(".",B5)),LEN(RIGHT(B5,LEN(B5)-FIND(".",B5)))-FIND(".",RIGHT(B5,LEN(B5)-FIND(".",B5)))),FIND(".",RIGHT(RIGHT(B5,LEN(B5)-FIND(".",B5)),LEN(RIGHT(B5,LEN(B5)-FIND(".",B5)))-FIND(".",RIGHT(B5,LEN(B5)-FIND(".",B5)))))-1))*10^3+VALUE(RIGHT(RIGHT(RIGHT(B5,LEN(B5)-FIND(".",B5)),LEN(RIGHT(B5,LEN(B5)-FIND(".",B5)))-FIND(".",RIGHT(B5,LEN(B5)-FIND(".",B5)))),LEN(RIGHT(RIGHT(B5,LEN(B5)-FIND(".",B5)),LEN(RIGHT(B5,LEN(B5)-FIND(".",B5)))-FIND(".",RIGHT(B5,LEN(B5)-FIND(".",B5)))))-FIND(".",RIGHT(RIGHT(B5,LEN(B5)-FIND(".",B5)),LEN(RIGHT(B5,LEN(B5)-FIND(".",B5)))-FIND(".",RIGHT(B5,LEN(B5)-FIND(".",B5)))))))

Tačiau šioje formulėje IP adresai konvertuojami į dešimtainius skaičius, o ne užpildomi nuliais, kaip ankstesnėje formulėje. IP adresus galite rūšiuoti taip pat, kaip juos rūšiavome anksčiau.

Skaityti daugiau: Kaip rūšiuoti ir filtruoti duomenis "Excel" programoje (išsamios gairės)

2. Rūšiuoti IP adresą pagal teksto į stulpelius vedlį

Alternatyvus būdas rūšiuoti IP adresus - naudoti Tekstas į stulpelius vedlį "Excel" programoje. Atlikite toliau nurodytus veiksmus, kad galėtumėte tai padaryti.

1 žingsnis: Pirmiausia pasirinkite visus IP taip: 4 gretimus langelius dešinėje palikite tuščius.

2 žingsnis: Tada spustelėkite Tekstas į stulpelius piktogramą iš Duomenys skirtuką, kaip parodyta toliau pateiktame paveikslėlyje.

3 veiksmas: Po to pažymėkite savo duomenų tipą kaip Su ribomis ir spustelėkite Kitas .

4 veiksmas: Dabar patikrinkite Kita skirtuką ir į teksto laukelį įrašykite tašką (.). Tada paspauskite Kitas mygtuką.

5 veiksmas: Po to išlaikykite bendrąjį duomenų formatą. Tada pasirinkite paskirties vietą taip, kad $C$5 . Tai galite padaryti spustelėję mažą rodyklę į viršų dešinėje paskirties lauko langelio pusėje. Tada pasirinkite langelį C5 . Ir pagaliau paspauskite Apdaila mygtuką.

Tačiau jei gretimos ląstelės nėra tuščios, turite jas pakeisti spustelėdami GERAI .

6 veiksmas: Dabar IP adresai suskirstyti į 4 oktetus. Laikykite pasirinktą visą duomenų diapazoną, kaip parodyta.

7 veiksmas: Dabar reikia atlikti pasirinktinį jų rūšiavimą naudojant Rūšiuoti ir filtruoti įrankis.

8 veiksmas: Pirmiausia surūšiuokite juos pagal stulpelį C. Tada pridėkite naujų lygių ir surūšiuokite juos atitinkamai pagal stulpelius D, E ir F. Dabar, jei paspausite GERAI IP adresai bus surūšiuoti.

Jei norite, oktetus galite paslėpti arba ištrinti.

Susijęs turinys: Kaip "Excel" programoje rūšiuoti duomenis pagal du stulpelius (5 paprasti būdai)

3. IP adresą išdėstykite "Excel" lentelėje

IP adresus "Excel" lentelėje galima surūšiuoti naudojant kitą formulę. Norėdami taikyti šį metodą, atlikite toliau nurodytus veiksmus.

1 žingsnis: Iš pradžių sukurkite "Excel" lentelė naudojant toliau pateiktą duomenų rinkinį.

2 žingsnis: Spustelėkite bet kur "Konvertuoti IP" langeliuose. Tada taikyti šią formulę šioje lentelėje :

=IF(0,"#####FIRSTOCTET#####","")&TEXT(LEFT([@IP],FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),1))-1),"000")&"."&IF(0,"#####SECONDOCTET#####","")&TEXT(MID([@IP],FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),1))+1,FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),2))-FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),1))),"000")&"."&IF(0,"#####THIRDOCTET#####","")&TEXT(MID([@IP],FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),2))+1,FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),3))-FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),2))),"000")&"."&IF(0,"#####FOURTHOCTET#####","")&TEXT(MID([@IP],FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),3))+1,IF(ISERROR(FIND("/",[@IP])),LEN([@IP]),FIND("/",[@IP])-1)-FIND(CHAR(134),SUBSTITUTE([@IP],".",CHAR(134),3))),"000")&IF(0,"#####CIDR#####","")&IF(ISERROR(FIND("/",[@IP])),"",RIGHT([@IP],LEN([@IP])-FIND("/",[@IP])+1))

Taip visi IP bus užpildyti nuliais, kaip ir anksčiau.

3 veiksmas: Dabar surūšiuokite konvertuotus IP adresus, kaip ir ankstesniais metodais.

Galiausiai IP adresai surūšiuojami.

Susijęs turinys: Kaip rūšiuoti "Excel" išskleidžiamąjį sąrašą (5 paprasti metodai)

Panašūs skaitiniai:

  • Atsitiktinis rūšiavimas programoje "Excel" (formulės + VBA)
  • Kaip "Excel" rūšiuoti pagal spalvą (4 kriterijai)
  • Dviejų "Excel" stulpelių rūšiavimas pagal atitikimą (tikslaus ir dalinio atitikimo)
  • Kaip pridėti rūšiavimo mygtuką "Excel" (7 metodai)
  • Rūšiuoti didėjančia tvarka "Excel" programoje (3 paprasti metodai)

4. Rūšiuoti IP adresą naudojant "Flash Fill" programoje "Excel

Jei jūsų duomenų rinkinio pirmieji trys oktetai yra vienodi, galite juos surūšiuoti naudodami "Excel" programą "Flash Fill". Tai bene greičiausias ir paprasčiausias IP adresų rūšiavimo "Excel" programa būdas. Toliau aptariami šio būdo žingsniai.

1 žingsnis: Įveskite pirmojo IP paskutinius okteto skaitmenis ląstelėje C5 . Dabar, jei tą patį padarysite su antruoju IP, pamatysite tokį pilkos spalvos sąrašą. Tai yra paskutiniai IP adresų oktetai.

2 žingsnis: Dabar paspauskite Įveskite ir sąrašas bus užpildytas. Pasirinkite visą sąrašą ir surūšiuokite juos.

Rūšiuodami nepamirškite išplėsti pasirinkimo.

Dabar IP adresai surūšiuoti taip.

Susijęs turinys: Kaip atšaukti rūšiavimą "Excel" programoje (3 metodai)

5. Rūšiuoti IP adresą naudojant naudotojo apibrėžtą funkciją (UDF)

Kitas nuostabus būdas rūšiuoti IP adresus - naudoti Vartotojo apibrėžtos funkcijos (UDF) Norėdami tai padaryti, atlikite toliau nurodytus veiksmus.

1 žingsnis: Iš pradžių atidarykite "Microsoft Visual Basic for Applications"(VBA) langas. Klaviatūros spartusis klavišas yra ALT+F11 "Windows" ir Opt+F11 "Mac" sistemoje. Tai taip pat galite padaryti iš Kūrėjas skirtukas. Jei jis nematomas, eikite į Failas >> Parinktys >> Pritaikyta juosta >> Pagrindiniai skirtukai ir pažymėkite žymimąjį langelį Kūrėjas ir paspauskite GERAI .

2 žingsnis: Įdėkite skirtuką, pasirinkite Modulis .

3 veiksmas: Dabar nukopijuokite šį kodą ir įklijuokite jį į tuščią lauką.

 Funkcija SortIP(IP As String) As String Dim FirstDot As Integer Dim SecondDot As Integer Dim ThirdDot As Integer Dim FirstOctet As String Dim SecondOctet As String Dim ThirdOctet As String Dim FourthOctet As String FirstDot = InStr(1, IP, ".", vbTextCompare) SecondDot = InStr(FirstDot + 1, IP, ".", vbTextCompare) ThirdDot = InStr(SecondDot + 1, IP, ".", vbTextCompare) FirstOctet = Left(IP,FirstDot - 1) SecondOctet = Mid(IP, FirstDot + 1, SecondDot - FirstDot - 1) ThirdOctet = Mid(IP, SecondDot + 1, ThirdDot - SecondDot - 1) FourthOctet = Mid(IP, ThirdDot + 1, Len(IP)) SortIP = Right("000" & FirstOctet, 3) & "." SortIP = SortIP & Right("000" & SecondOctet, 3) & "." SortIP = SortIP & Right("000" & ThirdOctet, 3) & "." SortIP = SortIP & Right("000" & ThirdOctet, 3) & "." SortIP = SortIP & Right("000" & ThirdOctet, 3) && FourthOctet, 3) End Function 

4 veiksmas: Tada uždarykite jį iš Failas skirtuką ir grįžkite į "Excel".

5 veiksmas: Dabar ląstelėje įveskite šią formulę C5 :

=SortIP(B5)

6 veiksmas: Matote, kad IP užpildytas nuliais. Po to nukopijuokite formulę į toliau esančius langelius. Išrūšiuokite šiuos konvertuotus IP pagal tas pačias procedūras, kaip ir ankstesniuose metoduose.

Galiausiai visi IP surūšiuojami taip, kaip parodyta toliau.

Skaityti daugiau: Kaip naudoti rūšiavimo funkciją "Excel VBA" (8 tinkami pavyzdžiai)

6. IP adreso išdėstymas "Excel" programoje naudojant VBA

Yra dar vienas būdas rūšiuoti IP adresus naudojant VBA Šį metodą sudaro šie etapai.

1 žingsnis: Pažymėkite langelius su IP adresais.

2 žingsnis: Tada atidarykite VBA langą ir įterpkite modulį kaip ankstesniame metode. Tada nukopijuokite toliau pateiktą kodą ir įklijuokite jį į tuščią langą.

 Sub ConvertIP() Dim xReg As New RegExp Dim xMatchs As MatchCollection Dim xMatch As Match Dim xRng As Range Dim xCellRange As Range Dim I As Long Dim xConv() As String On Error Resume Next Set xRng = Application.InputBox("Select cell/Range:", "Convert IP Address", Selection.Address, , , , , , 8) If xRng Is Nothing Then Exit Sub With xReg .Global = True .Pattern = "\d{1,3}.+\d{1,3}.+\d{1,3}.+\d{1,3}.+\d{1,3}.+\d{1,3}"For Each xCellRange In xRng Set xMatchs = .Execute(xCellRange.Value) If xMatchs.Count = 0 Then GoTo xPause For Each xMatch In xMatchs xConv = Split(xMatch, ".") For I = 0 To UBound(xConv) xConv(I) = Right("000" & xConv(I), 3) If I UBound(xConv) Then xConv(I) = xConv(I) & "." End If Next Next Next xCellRange.Value = Join(xConv, "") xPause: Next End With End Sub End Sub 

3 veiksmas: Dabar iš Įrankiai skirtuką, pasirinkite Nuorodos . Bus atidarytas naujas dialogo langas.

4 veiksmas: Slinkite žemyn ir patikrinkite Microsoft VBScript reguliariosios išraiškos 5.5 iš sąrašo Turimos nuorodos . Tada paspauskite GERAI .

5 veiksmas: Dabar paspauskite F5 . Bus paprašyta nurodyti ląstelių intervalą. Galite įvesti ląstelių intervalą arba persijungti atgal į Excel ir pasirinkti visą ląstelių intervalą. Kadangi mes pasirinkome visą diapazoną 1 žingsnis , "Excel" automatiškai tai priima kaip įvestį. Galiausiai paspauskite GERAI mygtuką.

Pastaba: Nesumažinkite VBA langą, kai spaudžiate F5 .

Matote, kad IP adresai yra užpildyti nuliais. Dabar juos galite lengvai rūšiuoti kaip ir anksčiau.

Susijęs turinys: Kaip rūšiuoti "ListBox" su "Excel" VBA (išsamus vadovas)

Dalykai, kuriuos reikia prisiminti

  • 4 metodas veikia tik tada, jei 3 iš 4 IP adreso oktetų turi tuos pačius skaitmenis.
  • Tiesioginis naudojimas Rūšiuoti ir filtruoti įrankis gali duoti teisingą šio duomenų rinkinio rezultatą. Tik todėl, kad trys IP adresų oktetai yra vienodi.

Išvada

Dabar žinote 6 skirtingus IP adresų rūšiavimo "Excel" programoje būdus. Kuriam iš jų teikiate pirmenybę? Ar žinote kitų paprastų IP adresų rūšiavimo "Excel" programoje būdų? Praneškite mums apie tai komentarų skiltyje. Ten pat galite užduoti papildomų klausimų.

Hugh Westas yra labai patyręs Excel treneris ir analitikas, turintis daugiau nei 10 metų patirtį šioje srityje. Jis yra įgijęs apskaitos ir finansų bakalauro bei verslo administravimo magistro laipsnius. Hugh turi aistrą mokymui ir sukūrė unikalų mokymo metodą, kurį lengva sekti ir suprasti. Jo ekspertinės žinios apie „Excel“ padėjo tūkstančiams studentų ir specialistų visame pasaulyje tobulinti savo įgūdžius ir tobulėti savo karjeroje. Savo tinklaraštyje Hugh dalijasi savo žiniomis su pasauliu, siūlydamas nemokamus „Excel“ vadovėlius ir internetinius mokymus, kad padėtų asmenims ir įmonėms išnaudoti visą savo potencialą.