Πώς να ταξινομήσετε γρήγορα τη διεύθυνση IP από χαμηλή σε υψηλή στο Excel;
Γενικά, χρησιμοποιούμε τη συνάρτηση Ταξινόμηση για να ταξινομήσουμε τη συμβολοσειρά στο Excel. Αλλά εάν υπάρχουν ορισμένες διευθύνσεις IP που απαιτούνται για ταξινόμηση, η σειρά ταξινόμησης μπορεί να είναι λανθασμένη χρησιμοποιώντας τη λειτουργία Ταξινόμηση απευθείας όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης. Τώρα έχω κάποιους τρόπους να ταξινομήσω τις διευθύνσεις IP γρήγορα και σωστά στο Excel.
Λειτουργία Λάθος Ταξινόμηση κατά Ταξινόμηση | Σωστή ταξινόμηση |
Ταξινόμηση διεύθυνσης IP ανά τύπο
Ταξινόμηση διεύθυνσης IP κατά VBA
Ταξινόμηση διεύθυνσης IP ανά κείμενο σε στήλες
Ταξινόμηση διεύθυνσης IP ανά τύπο
Χρησιμοποιήστε έναν τύπο για να συμπληρώσετε τη διεύθυνση IP και στη συνέχεια ταξινομήστε.
1. Επιλέξτε ένα κελί δίπλα στη διεύθυνση IP και πληκτρολογήστε αυτόν τον τύπο
=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")
τύπος εισάγετε κλειδί και σύρετε τη λαβή πλήρωσης πάνω από τα κελιά για να εφαρμόσετε αυτόν τον τύπο.
2. Αντιγράψτε τα αποτελέσματα του τύπου και επικολλήστε τα ως τιμή στην επόμενη στήλη. Δείτε το στιγμιότυπο οθόνης:
3. κρατήστε επιλεγμένη την επικολλημένη τιμή και κάντε κλικ στο ημερομηνία > Ταξινόμηση Α έως Ω.
4. Στο Ταξινόμηση Waring διαλόγου, κρατήστε Αναπτύξτε την επιλογή τετραγωνισμένος.
5. κλικ Είδος. Τώρα οι διευθύνσεις IP έχουν ταξινομηθεί από χαμηλή σε υψηλή.
Μπορείτε να καταργήσετε τις βοηθητικές στήλες.
Ταξινόμηση διεύθυνσης IP κατά VBA
Εδώ είναι ένας κωδικός VBA που μπορεί επίσης να σας βοηθήσει.1. Τύπος Alt + F11 πλήκτρα για να ενεργοποιήσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. κλικ Κύριο θέμα > Μονάδα μέτρησης, αντιγράψτε και επικολλήστε τον κώδικα στο κενό σενάριο.
VBA: Συμπληρώστε τη διεύθυνση 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. Στη συνέχεια κάντε κλικ στο κουμπί Εργαλεία > Αναφορά, και ελέγξτε Κανονικές εκφράσεις Microsoft VBScript 5.5 στο αναδυόμενο παράθυρο διαλόγου.
4. κλικ OK και πατήστε το πλήκτρο F5 Πλήκτρο, εμφανίζεται ένα παράθυρο διαλόγου για να σας υπενθυμίσει να επιλέξετε μια περιοχή για εργασία.
5. κλικ OK. Στη συνέχεια, οι διευθύνσεις IP έχουν συμπληρωθεί με μηδέν.
6. Επιλέξτε τις διευθύνσεις IP και κάντε κλικ στο ημερομηνία > Ταξινόμηση Α έως Ω για να τα ταξινομήσετε.
Ταξινόμηση διεύθυνσης IP ανά κείμενο σε στήλες
Στην πραγματικότητα, η λειτουργία Κείμενο σε στήλες μπορεί να σας κάνει τη χάρη και στο Excel.
1. Επιλέξτε τα κελιά που χρησιμοποιείτε και κάντε κλικ στο ημερομηνία > Κείμενο σε στήλες. Δείτε το στιγμιότυπο οθόνης:
2. Στο Μετατροπή του οδηγού "Κείμενο σε στήλες" διαλόγου, κάντε τα παρακάτω:
Έλεγχος Οριοθετημένη, και κάντε κλικ στο κουμπί Επόμενο;
Έλεγχος ΑΛΛΑ και τον τύπο . στο πλαίσιο κειμένου και κάντε κλικ Επόμενο;
Επιλέξτε ένα κελί δίπλα στη διεύθυνση IP για να τοποθετήσετε το αποτέλεσμα. Κάντε κλικ φινίρισμα.
3. Επιλέξτε όλα τα κελιά που περιέχουν τις διευθύνσεις IP και τα διαχωρισμένα κελιά και κάντε κλικ ημερομηνία > Είδος.
4. Στο Είδος διαλόγου, κάνοντας κλικ Προσθήκη επιπέδου για να ταξινομήσετε δεδομένα από τη στήλη B έως E (τα διαχωρισμένα κελιά). Δείτε στιγμιότυπο οθόνης:
5. κλικ OK. Τώρα οι στήλες έχουν ταξινομηθεί.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!