كيفية فرز عناوين IP بسرعة من الأدنى إلى الأعلى في Excel؟
بشكل عام، نستخدم وظيفة الفرز لترتيب النصوص في Excel. ولكن إذا كانت هناك بعض عناوين IP تحتاج إلى الفرز، فقد يكون ترتيب الفرز خاطئًا عند استخدام وظيفة الفرز مباشرة كما هو موضح في لقطة الشاشة أدناه. الآن لدي بعض الطرق لفرز عناوين IP بسرعة ودقة في Excel.
فرز خاطئ باستخدام وظيفة الفرز
فرز صحيح
فرز عنوان 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")
اضغط Enter ثم اسحب مقبض التعبئة على الخلايا لتطبيق هذه الصيغة.
2. انسخ نتائج الصيغة والصقها كقيم في العمود التالي. انظر لقطة الشاشة:
 |
 |
3. احتفظ بالقيم الملصقة محددة، ثم انقر البيانات > فرز من الألف إلى الياء.
4. في تحذير الفرز الحوار، احتفظ بـ توسيع اللوحة محدد.
5. انقر فرز. الآن تم فرز عناوين IP من الأدنى إلى الأعلى.
يمكنك إزالة الأعمدة المساعدة.
فرز عنوان IP باستخدام VBA
إليك كود VBA يمكن أن يساعدك أيضًا.1. اضغط على مفاتيح Alt + F11 لتمكين نافذة Microsoft Visual Basic for Applications.
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 Regular Expressions 5.5 في الحوار المنبثق.
 |
 |
4. انقر موافق واضغط F5 يظهر مربع حوار ينبثق لتذكيرك باختيار نطاق للعمل عليه.
5. انقر موافق. بعد ذلك يتم ملء عناوين IP بالأصفار.
6. حدد عناوين IP وانقر البيانات > فرز من الألف إلى الياء لفرزها.
فرز عنوان IP باستخدام ميزة النص إلى أعمدة
في الواقع، ميزة النص إلى أعمدة يمكن أن تساعدك أيضًا في Excel.
1. حدد الخلايا التي تستخدمها، وانقر البيانات > النص إلى أعمدة. انظر لقطة الشاشة:
2. في مربع حوار معالج تحويل النص إلى أعمدة، قم بما يلي:
حدد محدد بواسطة، وانقر التالي؛
حدد آخر واكتب . في مربع النص، وانقر التالي؛
حدد خلية بجانب عنوان IP لوضع النتيجة. انقر إنهاء.
 |
 |
 |
3. حدد جميع الخلايا التي تحتوي على عناوين IP والخلايا المقسمة، وانقر البيانات > فرز.
4. في فرز الحوار، انقر إضافة الشروط لفرز البيانات من العمود B إلى E (الخلايا المقسمة). انظر لقطة الشاشة:
5. انقر موافق. الآن تم فرز الأعمدة.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...
Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير
- تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
- افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!
جميع إضافات Kutools. مثبت واحد
حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.
- حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
- مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
- الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
- تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد