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.
Sırala işleviyle Yanlış Sıralama

Doğru Sıralama

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.
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi güçlendirin, daha önce hiç yaşamadığınız bir verimlilik deneyimini yaşayın. Kutools for Excel, üretkenliğinizi artıracak ve zamanı kaydetmenizi sağlayacak300’den fazla gelişmiş özellik sunar. En çok ihtiyaç duyduğunuz özelliği almak için buraya tıklayın...
Office Tab, Office’e sekmeli arayüz kazandırır ve işinizi çok daha kolaylaştırır
- Word, Excel, PowerPoint’te sekmeli düzenleme ve okuma işlevini etkinleştirin.
- Aynı pencere içerisinde yeni sekmelerde birden fazla belge açın veya oluşturun, yeni pencerelerde açmak yerine.
- Verimliliğinizi %50 artırın, her gün yüzlerce fare tıklamasını sizin için azaltın!