كيف تُنشئ رقمًا متزايدًا مع نص أو داخله في Excel؟
في Excel، يُعد إنشاء تسلسلات الأرقام المتزايدة مهمةً أساسية، خاصةً لتنظيم البيانات أو توليد معرّفات فريدة. وعلى الرغم من أن ميزة مقبض الملء التلقائي (AutoFill Handle) توفر طريقةً سهلةً لملء أرقام متتالية، إلا أنها لا تدعم دمج الأرقام المتزايدة مباشرةً مع سلاسل نصية—مثل إنشاء "User001" و"User002" وما يليها في خطوة واحدة. ويُعقّد هذا القيد مهامًا شائعةً مثل إنشاء أسماء مستخدمين مخصصة، عناوين بريد إلكتروني، رموز منتجات، أو أرقام فواتير تتطلب دمج نصٍ ثابت مع مكوّن رقمي تسلسلي. في هذا البرنامج التعليمي، سنستعرض عدة طرق فعّالة لإنشاء أرقام متزايدة مدمجة مع سلاسل نصية أو مضمنة داخلها في Excel، بدءًا من الصيغ الكلاسيكية ووصولًا إلى الأتمتة المتقدمة باستخدام VBA وأدوات متخصصة سهلة الاستخدام.
تشمل السيناريوهات الشائعة: إنشاء دفعات من العناصر ذات تسميات فريدة، أو توليد قوائم بريد إلكتروني بأسماء منتظمة، أو إصدار أرقام تسلسلية لتتبع المنتجات. ولكل حل مزاياه الخاصة—سواء من حيث سهولة الاستخدام، أو إمكانية الأتمتة، أو المرونة في تحديد موقع الرقم، أو ملاءمته لمجموعات البيانات الكبيرة.

الرقم المتزايد مع النص باستخدام صيغة في Excel
الرقم المتزايد مع النص باستخدام Kutools لـ Excel
ماكرو VBA: إنشاء أرقام متزايدة داخل النص أو بينه
الرقم المتزايد مع النص باستخدام صيغة في Excel
توفر صيغ Excel المضمنة طريقة مباشرة وفعّالة لدمج النص مع الأرقام المتزايدة، مما يجعلها حلاً مثاليًا عندما يكون تسلسلك منظمًا بأرقام ونصوص في مواضع ثابتة، وتحتاج إلى شفافية تامة في كيفية تركيب المعرّف.
1. جهّز ورقة العمل الخاصة بك وفقًا للشكل الموضح أدناه:

2. في الخلية D2، أدخل الصيغة التالية، ثم اضغطEnter لتطبيقها:
=$A$2&TEXT(B2,"000")&$C$2
بعد أن تُرجع الصيغة النتيجة، اسحب مقبض الملء من الخلية D2 لأسفل لملء باقي خلايا العمود D. وستعرض كل خلية نصًا مدمجًا مع رقم متزايد، مثل “User001@localdomain.com” و“User002@localdomain.com”، وهكذا، كما هو موضح أدناه:

ملاحظات ونصائح:
$A$2و$C$2) للحفاظ على عناصر النص ثابتة عند نسخ الصيغة لأسفل.هذا النهج شفافٌ للغاية ومثاليٌ للبيانات المنظمة جيدًا، لكنه غالبًا ما يتطلب إعداد أعمدة مساعدة يدويًّا لكل مكوِّن. علاوةً على ذلك، إذا اختلف موضع التقسيم بين النص والرقم من صفٍّ إلى آخر، فقد يحتاج هذا النهج إلى تعديلات إضافية.
الرقم المتزايد مع النص باستخدام Kutools لـ Excel
إذا كنت بحاجةٍ متكررة إلى إنشاء معرّفات نصية متزايدة، وتفضّل واجهة رسومية، أو ترغب في خيارات أكثر ديناميكية (مثل بادئة أو لاحقة مرنة، زيادات مخصصة، أو تذكّر الإعدادات للاستخدام المتكرر)، فإنKutools لـ Excelيوفّر ميزة متخصصة تُسمىإدراج رقم تسلسلي. وباستخدام هذه الأداة، يمكنك إنشاء مخططات ترقيم معقّدة بنقرات قليلة—دون الحاجة إلى إعداد صيغ.
1. على شريط Excel، انتقل إلىKutools > إدراج > إدراج رقم تسلسلي…كما هو موضح أدناه:

2. في مربع الحوارإدراج رقم تسلسلي، انقر فوقجديدلتوسيع خيارات الإعداد الإضافية. إليك كيفية التهيئة:

3. حدد نطاق الخلايا الذي تريد إدراج الأرقام المتزايدة مع النص فيه، ثم انقر فوقتعبئة النطاق. سيتم ملء الأرقام المخصصة فورًا في النطاق المحدد، لتُنتج نتائج مثل “User001@localdomain.com” و“User002@localdomain.com”…

ملاحظات إضافية:بمجرد تجميع قالب الترقيم وحفظه في Kutools، يمكنك إعادة استخدامه بسرعة—حتى عبر ملفات عمل متعددة! وإذا كان آخر رقم تم إنشاؤه هو 30، فسيستأنف الترقيم تلقائيًا من 31 في المرة التالية التي تستخدم فيها هذا التسلسل. وهذه الميزة مثالية لتجنب تكرار الأرقام أو فقدان التتبع في مجموعات البيانات الكبيرة.
يُوصى بهذه الطريقة للمستخدمين الذين يتعاملون بانتظام مع البيانات التسلسلية ويرغبون في تحقيق الكفاءة والمرونة عبر واجهة النقر، فضلاً عن إمكانية حفظ القوالب لاستخدامها في المهام الدفعية المتكررة. وإذا كنت بحاجة إلى تخصيص متقدم يعتمد على المواضع ويتجاوز البادئة أو اللاحقة، فقد تكون البرمجة الآلية خيارًا أكثر ملاءمة (انظر أدناه).
إذا كنت ترغب في تجربة هذه الأداة مجانًا (لمدة 30 يومًا)،فما عليك سوى النقر لتنزيلها، ثم اتبع الخطوات المذكورة أعلاه لتطبيق العملية.
الرقم المتزايد مع النص باستخدام Kutools لـ Excel
ماكرو VBA: إنشاء أرقام متزايدة داخل النص أو بينه
إذا كنت بحاجة إلى تحكمٍ قصوى—مثل إدراج رقم متزايد في أي موضع ضمن سلسلة نصية، أو إنشاء معرّفات معقّدة فورًا، أو تطبيق هذه العملية على صفوف متعددة دفعة واحدة—فإن ماكرو VBA يوفّر أتمتةً وتخصيصًا لا تستطيع الصيغ أو الإضافات تحقيقهما دائمًا. ويُعدّ VBA الخيار المثالي للعمليات الجماعية، أو الأنماط المخصصة، أو عند الحاجة إلى تضمين الأرقام في أي مكان داخل السلسلة (ليس فقط في بدايتها أو نهايتها).
قبل البدء، تذكّر دائمًا حفظ ملف العمل الخاص بك كملف يدعم الماكرو ().xlsm) لتجنب فقدان كود VBA الخاص بك. وللأمان التام، ننصحك باختبار أي ماكرو على نسخة من بياناتك أولًا لتفادي أي تغييرات غير متوقعة.
كيفية استخدام الماكرو:
1. افتح ملف العمل الخاص بك، ثم انقر على شريط Excel فوقأدوات المطور > Visual Basic. (إذا لم يكن تبويب المطور ظاهرًا، ففعّله من خلال الانتقال إلى ملف > خيارات > تخصيص الشريط.)
2. في نافذة محررMicrosoft Visual Basic for Applications، انقر فوقإدراج > وحدة نمطية. ثم انسخ والصق الكود التالي في الوحدة النمطية الفارغة:
Sub InsertIncrementNumberIntoText()
Dim cell As Range
Dim rng As Range
Dim startNum As Long
Dim increment As Long
Dim pattern As String
Dim position As Variant
Dim currentNum As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the range to apply incremented text.", xTitleId, rng.Address, Type:=8)
startNum = Application.InputBox("Enter the starting number:", xTitleId, 1, Type:=1)
increment = Application.InputBox("Enter the increment between numbers:", xTitleId, 1, Type:=1)
pattern = Application.InputBox("Enter the pattern (use {n} to mark the insertion point, e.g. 'User{n}@local.com'):", xTitleId, "User{n}@local.com", Type:=2)
currentNum = startNum
If rng Is Nothing Then Exit Sub
For Each cell In rng
cell.Value = Replace(pattern, "{n}", currentNum)
currentNum = currentNum + increment
Next
End Sub 3. لتنفيذ الماكرو، انقر فوق الزر
أو اضغطF5. بعد ذلك، سيعرض لك مربع حوار يرشدك لاختيار النطاق المستهدف، وتعيين الرقم الأول، وتحديد قيمة الزيادة، واختيار نمط النص المطلوب (على سبيل المثال، استخدم)ID-{n}-LIST لتضمين رقم متزايد بين أجزاء نصية مخصصة).
- يمكنك إدراج «{n}» في أي مكان ضمن نمطك—قبل النص، بعده، أو حتى في منتصفه—لتخصيص موضع الرقم التسلسلي بدقة.
- بعد التأكيد، تُملأ كل خلية محددة بمعرّف متزايد يتوافق مع النمط والفاصل الزمني اللذين اخترتهما.
- لتطبيق الماكرو على منطقة جديدة، ما عليك سوى إعادة تشغيله وتحديد المعايير الجديدة التي تحتاجها.
- إذا ارتكبت خطأً، فاستخدم ميزةالتراجع (Ctrl+Z) أو أعد تشغيل الماكرو مرة أخرى.
استكشاف الأخطاء وإصلاحها ونصائح:
{n}. أما الأنماط التي لا تحتوي على هذا الرمز فسيتم ملؤها حرفيًّا، لذا راجع نمطك جيدًا قبل التشغيل.يُعد هذا الحل مثاليًا بشكل خاص للسيناريوهات المتقدمة، مثل تضمين الأرقام داخل أسماء الملفات، أو إنشاء معرّفات منتظمة عبر صفوف متعددة دفعة واحدة، أو أتمتة مخططات التسمية التسلسلية المعقدة.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل