كيف يمكن تعبئة عناوين IP في Excel مع زيادة تدريجية؟
يمكن أن يكون تعيين عناوين IP بكفاءة في Excel مفيدًا بشكل خاص، سواء كنت تدير أجهزة الحاسوب المكتبية أو الخوادم أو تعدّ لعمليات نشر تقنية المعلومات بالجملة. على سبيل المثال، قد تحتاج إلى إنشاء سلسلة من عناوين IP، مثل من192.168.1.1 إلى192.168.10.1، مع زيادة جزء معيّن من العنوان لكل إدخال. إن إدخال هذه العناوين يدويًا يستغرق وقتًا طويلاً وعرضة للأخطاء، كما أن ميزة التعبئة التلقائية القياسية في Excel لا تستطيع التعامل مع الأنماط الرقمية الخاصة بعناوين IP بالشكل المطلوب. لذلك، من الأهمية بمكان استكشاف طرق بديلة تسهّل عليك تنفيذ هذه المهمة المتكررة بدقة واتساق عند توزيع عناوين IP. تعرض لك هذه المقالة عدة حلول فعّالة، بما في ذلك تقنيات الصيغ المدمجة وأدوات متقدمة مثل Kutools لـ Excel وغيرها، لمساعدتك على تعبئة عناوين IP ذات القيم التزايدية في Excel بسرعة وسهولة.
➤ املأ عنوان IP مع الزيادة باستخدام الصيغ
➤ املأ عنوان IP مع الزيادة باستخدام Kutools لـ Excel
➤ رمز VBA - إنشاء تسلسل عناوين IP مع زيادات برمجيًا
تعبئة عناوين IP مع زيادة تدريجية باستخدام الصيغ
إذا كنت تريد إنشاء نطاق من عناوين IP من192.168.1.1 إلى192.168.10.1، حيث تزداد القيم في الجزء الثماني الثالث، فيمكنك بسهولة تحقيق ذلك باستخدام صيغة Excel. هذه الطريقة مثالية خاصةً عندما يكون لديك نمط زيادات منتظم وتحتاج إلى حلٍّ مرن يعتمد فقط على الصيغ ووظائف Excel المدمجة.
1. حدد خلية فارغة (مثل الخلية B2)، وأدخل الصيغة التالية، ثم اضغط على مفتاحEnter لتوليد أول عنوان IP في السلسلة:
="192.168."&ROWS($A$1:A1)&".1" 
2. بمجرد توليد أول عنوان IP، انقر على الخلية واسحب مقبض التعبئة لأسفل العمود لإنشاء عناوين إضافية تلقائيًا. يجب أن يتطابق عدد الصفوف مع عدد العناوين المطلوبة بين القيمتين الابتدائية والنهائية.

ℹ️ ملاحظات ونصائح عملية:
- في الصيغة أعلاه، يشير192 و168 و1 إلى الأجزاء الثمانية الثابتة. أما الجزء المتغير—
ROWS($A$1:A1)—فهو الذي يولّد أعدادًا صحيحة متسلسلة تزداد مع كل صف لتحديث الجزء الثماني الثالث. وللبدء برقم مختلف (مثلًا، 3)، غيّر المرجع إلى (مثلًا،)$A$3:A3). - لزيادةالجزء الثماني الأول:
=ROWS($A$1:A192)&".168.2.1" - لزيادةالجزء الثماني الثاني:
="192."&ROWS($A$1:A168)&".1.1" - لزيادةالجزء الثماني الرابع(تعيينات المضيف):
="192.168.1."&ROWS($A$1:A1) - عدّل دائمًا منطق الصيغة ليتوافق مع نطاق العناوين وقيم البداية المطلوبة.
- تلميح:إذا كنت تنوي نسخ الصيغة إلى العديد من الصفوف، فانقر مرتين على مقبض التعبئة لتعبئة العمود تلقائيًا.
- احتياطات:
- تأكد من أن كل جزء لا يتجاوز النطاق الصحيح (0–255).
- النتائج عبارة عن سلاسل نصية، لذا تأكد من توافقها مع متطلبات التنسيق في نظامك المستهدف.
- استكشاف الأخطاء وإصلاحها:إذا ظهرت قيم غير متوقعة، فتحقق من مراجع الصفوف وموضع الخلية الابتدائية.
يُعد هذا الحل الأمثل للأنماط البسيطة والمنتظمة، ويوفّر أقصى درجات المرونة إذا كنتَ بالفعل على درايةٍ بصيغ إكسل. ومع ذلك، إذا احتجتَ إلى زيادات عناوين IP أكثر تعقيدًا أو تنسيقات متقدمة، فننصحك بالنظر في الحلول الأخرى المذكورة أدناه.
املأ عناوين IP مع الزيادة باستخدام Kutools لـ Excel
إذا كنت من المستخدمين الذين يفضلون واجهة رسومية أو يحتاجون إلى إنشاء تسلسلات أكثر تعقيدًا—مثل أرقام تسلسلية مخصصة، زيادات غير قياسية، أو تنسيقات خاصة—فإن أداةإدراج رقم تسلسليفيKutools لـ Excelتوفّر لك حلاً سريعًا ومرنًا. ويُعد هذا الأسلوب مثاليًا خصوصًا عند العمل مع قوائم كبيرة، أو عند حاجتك إلى ميزات إضافية مثل التنسيق التلقائي، وتسعى لتقليل التعديلات اليدوية على الصيغ.
1. انقرKutools > إدراج > إدراج رقم تسلسلي. راجع لقطة الشاشة:

2. في مربع حوارإدراج رقم تسلسلي، قم بتكوين تسلسل عنوان IP الخاص بك كما يلي:
- (1) اكتب اسمًا وصفيًا لهذه القاعدة في حقلالاسم(مثلًا،)
OfficeIP3rdOctet). - (2) أدخل القيمة الابتدائية للجزء الثماني المتزايد في حقلالرقم الأول. على سبيل المثال، استخدم1 للبدء من
192.168.1.x. - (3) حدد مقدار الزيادة بين كل عنوان IP في حقلالزيادة(عادةً)1).
- (4) عيّنعدد الأرقامإذا كنت بحاجة إلى أصفار بادئة في تسلسلك (مثلًا،)
001،002). - (5) املأ المكونات الثابتة (مثلًا،)
192.168.كـبادئةو.1كـلاحقة)، مع التأكد من وضع النقاط بشكل صحيح. - (6) انقر على زرإضافةلحفظ هذه القاعدة لاستخدامها لاحقًا.

3. عندما تكون مستعدًا لملء الورقة بعناوين IP، حدد الخلايا التي تريد أن تظهر فيها العناوين، ثم اختر القاعدة المحفوظة وانقرFill Range:

تتيح لك هذه الأداة أيضًا إنشاء تسلسلات مخصصة أخرى، مثل أرقام الفواتير أو معرّفات الموظفين أو أي تركيبة متكررة من نص وأرقام.
✅ المزايا:
- قابل للتخصيص بشكل كبير – يدعم النصوص الثابتة، والزيادات المتغيرة، والتنسيق المتنوع.
- لست بحاجة إلى حفظ الصيغ أو تطبيقها يدويًّا.
- يمكنك حفظ قواعد التسلسل وإعادة استخدامها بسهولة عبر مختلف ملفات العمل.
⚠️ الاحتياطات:
- تأكد من ضبط البادئة، اللاحقة، وعدد الأرقام بدقة لتجنب إنشاء عناوين ذات تنسيق غير صحيح.
- تأكد مجددًا من صحة الإعدادات قبل تطبيقها على نطاق واسع.
🛠️ استكشاف الأخطاء وإصلاحها:
- إذا لم يعملتعبئة النطاق، فتأكد من أن قاعدتك تتوافق مع تنسيق تحديد النطاق.
- قد تتطلب بعض الشبكات استبعاد نطاقات عناوين معيّنة، مثل عناوين البث.
إذا كنت ترغب في تجربة هذه الأداة مجانًا (لمدة 30 يومًا)،فما عليك سوى النقر لتنزيلها، ثم اتبع الخطوات المذكورة أعلاه لتطبيق العملية.
رمز VBA - إنشاء تسلسل عناوين IP مع زيادات برمجيًا
إذا كنت تبحث عن طريقة مرنة لإنشاء نطاقات عناوين IP باستخدام قيم بداية ونهاية وزيادة مخصصة، أو إذا كان نمط عناوينك أكثر تعقيدًا مما يمكن للصيغ وأدوات التسلسل التعامل معه، فقد يكون استخدام ماكرو VBA حلاً فعّالًا للغاية. ويُعد هذا الخيار مثاليًا لمستخدمي إكسل المتقدمين، ولأتمتة عمليات الإنشاء الجماعي، وكذلك للسيناريوهات التي ترغب فيها في إدخال معايير التسلسل يدويًا في كل مرة.
1.لإنشاء عناوين IP باستخدام VBA، انقرالمطوّر > Visual Basic لفتح نافذةMicrosoft Visual Basic for Applications. بعد ذلك، انقرإدراج > وحدة نمطية (Module)والصق الكود التالي في الوحدة النمطية:
Sub GenerateIPSequence()
Dim startThird As Long
Dim endThird As Long
Dim increment As Long
Dim base1 As String
Dim base2 As String
Dim base4 As String
Dim i As Long
Dim rowStart As Long
Dim outCell As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
base1 = Application.InputBox("Enter the first octet:", xTitleId, "192", Type:=2)
base2 = Application.InputBox("Enter the second octet:", xTitleId, "168", Type:=2)
startThird = Application.InputBox("Enter starting value for third octet:", xTitleId, 1, Type:=1)
endThird = Application.InputBox("Enter ending value for third octet:", xTitleId, 10, Type:=1)
base4 = Application.InputBox("Enter the fourth octet:", xTitleId, "1", Type:=2)
increment = Application.InputBox("Increment value for third octet:", xTitleId, 1, Type:=1)
Set outCell = Application.InputBox("Select the first cell for output:", xTitleId, Type:=8)
If increment <= 0 Then
increment = 1
End If
rowStart = 0
For i = startThird To endThird Step increment
outCell.Offset(rowStart, 0).Value = base1 & "." & base2 & "." & i & "." & base4
rowStart = rowStart + 1
Next i
End Sub 2. انقر زر
لتشغيل الماكرو. سيتم توجيهك عبر سلسلة من مطالبات الإدخال:
- الجزء الأول– أدخل الجزء الأول من عنوان IP الخاص بك (مثلًا،)
192). - الجزء الثماني الثاني – عادةً ما يكون قيمةً ثابتةً مثل
168، وفقًا لشبكتك الفرعية. - القيمة الابتدائية للجزء الثماني الثالث– تحدد الموضع الذي تبدأ منه كتلة العناوين المتزايدة (مثلًا،)
1). - القيمة النهائية للجزء الثماني الثالث– تُحدد متى يتوقف التسلسل (مثلًا،)
10لتوليد العناوين من192.168.1.1إلى192.168.10.1). - الجزء الرابع عشر– غالبًا ما يكون ثابتًا (مثلًا،)
1) ويمثّل جزء المضيف من العنوان. - قيمة الزيادة– تتحكم في كيفية زيادة الجزء الثالث من العدد الثماني بين كل صف (عادةً)
1للعناوين المتتالية). - خلية الإخراج – اختر الخلية الأولى التي سيتم فيها كتابة عناوين IP المُنشأة. سيقوم الماكرو بتعبئة الخلايا لأسفل بدءًا من هذه الخلية.
بمجرد إدخال جميع القيم، سيقوم الماكرو تلقائيًا بإنشاء عناوين IP وملئها بالتنسيق التالي: first.second.third.fourth(على سبيل المثال،)192.168.3.1،192.168.4.1، إلخ.).
✅ نصائح الاستخدام:
- احفظ دائمًا ملف عملك قبل تشغيل ماكرو جديد لتجنب فقدان البيانات غير المقصود.
- شغّل الماكرو عدة مرات باستخدام معايير مختلفة لتوليد كتل عناوين متنوعة—بدون الحاجة إلى تعديل الكود.
- استخدم هذه الطريقة عندما تعجز أدوات الصيغ أو واجهة المستخدم الرسومية عن التعامل مع تنسيقات عناوين IP المعقدة أو المتغيرة.
⚠️ الاحتياطات:
- يتم التحقق من جميع مدخلات المستخدم—وإذا كانت الزيادات سالبة، فسيتم إعادة تعيينها تلقائيًا إلى
1. - تأكد من أن كل جزء ثماني في عنوان IP يقع ضمن النطاق الصحيح (0–255).
- تأكد من أن عمود الإخراج يحتوي على عدد كافٍ من الصفوف الفارغة لتجنب الكتابة فوق البيانات الموجودة.
- لتنفيذ الماكرو، يلزم تفعيل علامة تبويب «المطور» وتمكين الماكرو.
🛠️ استكشاف الأخطاء وإصلاحها:
- إذا ظهرت أخطاء، فانتقِل إلىالمطور > أمان الماكرووتحقق من إعدادات الأمان الخاصة بالماكرو.
- إذا لم تظهر أي نتائج، فتأكد من أن خلية الإخراج المحددة موجودة في ورقة العمل الصحيحة وليست مقفلة.
املأ عناوين IP مع الزيادة باستخدام Kutools لـ Excel
مقالات ذات صلة:
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل