Excel'de IP adreslerini hızlıca düşükten yükseğe nasıl sıralayabiliriz?

Genel olarak, Excel'de metin sıralamak için Sırala işlevini kullanırız. Ancak, sıralanması gereken bazı IP adresleri varsa, aşağıdaki ekran görüntüsünde gösterildiği gibi Sırala işlevini doğrudan kullanmak yanlış sıralama düzenine neden olabilir. Şimdi, Excel'de IP adreslerini hızlı ve doğru bir şekilde sıralamak için bazı yöntemlerim var.

---

IP adresini formülle sırala

IP adresini doldurmak için bir formül kullanın ve ardından sıralayın.

1. IP adresinin yanındaki bir hücreyi seçin ve şu formülü yazın

=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")

tuşuna basın Enter ve bu formülü uygulamak için dolgu tutamacını hücrelerin üzerine sürükleyin.

2. Formül sonuçlarını kopyalayın ve bir sonraki sütunda değeri yapıştırın. Ekran görüntüsüne bakın:

3. Yapıştırılan değeri seçili tutun ve tıklayın Veri > A'dan Z'ye Sırala.

4. Sıralama Uyarısı iletişim kutusunda Seçimi Genişlet seçeneğini işaretli tutun.

5. tıklayın Sırala. Şimdi IP adresleri düşükten yükseğe sıralanmıştır.

Yardımcı sütunları kaldırabilirsiniz.

---

IP adresini VBA ile sırala

İşte size yardımcı olabilecek bir VBA kodu.

1. Microsoft Visual Basic for Applications penceresini etkinleştirmek için Alt + F11 tuşlarına basın.

2. Ekle > Modül'e tıklayın, kodu boş betiğe kopyalayıp yapıştırın.

VBA: IP adresini doldur

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. Ardından Araçlar > Referans'a tıklayın ve açılan iletişim kutusunda Microsoft VBScript Normal İfadeler 5.5'i işaretleyin.

4. Tıklayın Tamam ve F5 tuşuna basın, size çalışmak için bir aralık seçmenizi hatırlatmak için bir iletişim kutusu açılır.

5. Tamam'a tıklayın. Ardından IP adresleri sıfırlarla doldurulmuştur.

6. IP adreslerini seçin ve tıklayın Veri > A'dan Z'ye Sırala onları sıralamak için.

---

IP adresini Metni Sütunlara Dönüştür özelliğiyle sırala

Aslında, Metni Sütunlara Dönüştür özelliği de Excel'de size yardımcı olabilir.

1. Kullandığınız hücreleri seçin ve tıklayın Veri > Metni Sütunlara Dönüştür. Ekran görüntüsüne bakın:

2. Metni Sütunlara Dönüştürme Sihirbazı iletişim kutusunda, aşağıdaki işlemleri yapın:

Sınırlı'yı işaretleyin ve İleri'ye tıklayın;

Diğer'i işaretleyin ve metin kutusuna . yazın ve İleri'ye tıklayın;

Sonucu yerleştirmek için IP adresinin yanındaki bir hücreyi seçin. Tamamla'ya tıklayın.

3. IP adreslerini ve bölünmüş hücreleri içeren tüm hücreleri seçin ve tıklayın Veri > Sırala.

4. Sırala iletişim kutusunda Koşullar Ekle B'den E'ye kadar (bölünmüş hücreler) verileri sıralamak için tıklayın. Ekran görüntüsüne bakın:

5. Tıklayın Tamam. Şimdi sütunlar sıralanmıştır.

---