كيفية تعبئة الخلايا المتزايدة تلقائيًا في Excel؟

في عملنا اليومي مع Excel، تعد ملء الخلايا تلقائيًا بالأرقام المتزايدة حاجة شائعة. على سبيل المثال، قد ترغب في ملء عمود بسرعة بتسلسل مثل 1، 2، 3، وهكذا، لتتبع المعرفات أو أرقام المعاملات أو البيانات المرتبة. ومع ذلك، هناك العديد من الحالات التي تحتاج فيها الأرقام إلى الزيادة بمقدار ثابت غير 1، مثل إنشاء أرقام الفواتير مثل 10001، 10012، 10023، وما إلى ذلك. إدخال كل قيمة يدويًا ليس فقط مضيعة للوقت ولكن أيضًا يزيد من خطر الأخطاء. لذلك، فإن إتقان الطرق لتعبئة التسلسلات المتزايدة تلقائيًا — سواء كانت خطوة بسيطة أو فاصل مخصص — يمكن أن يحسن كفاءتك ودقتك بشكل كبير. يشرح هذا البرنامج التعليمي عدة حلول عملية، قابلة للتطبيق على احتياجات ومستويات مهارة مختلفة في Excel، لمساعدتك على إنشاء أرقام متزايدة حسب الحاجة.

تعبئة الخلايا المتزايدة تلقائيًا باستخدام وظيفة الملء التلقائي

تعبئة الخلايا المتزايدة تلقائيًا باستخدام الصيغة

تعبئة الخلايا المتزايدة تلقائيًا باستخدام Kutools لـ Excel

تعبئة الخلايا المتزايدة تلقائيًا باستخدام كود VBA

تعبئة الخلايا المتزايدة تلقائيًا باستخدام وظيفة الملء التلقائي

يوفر ميزة الملء التلقائي في Excel طريقة سريعة وبديهية لإنشاء تسلسلات أساسية من القيم المتزايدة في ورقة العمل الخاصة بك. هذا النهج فعال بشكل خاص للأنماط البسيطة أو عندما ترغب في حل بصري سريع دون استخدام الصيغ.

السيناريو المناسب: استخدم هذه الطريقة عندما تحتاج إلى ملء سلسلة من الأرقام بخطوة ثابتة (مثل 1، 2، 3...) أو فاصل مخصص (مثل 10001، 10013، 10025...), والتسلسل بسيط بما فيه الكفاية ليتم تعريفه عن طريق إعطاء الأرقام الابتدائية فقط.

1. انقر فوق الخلية التي تريد أن يبدأ بها التسلسل الخاص بك. على سبيل المثال، اكتب الرقم الأولي (مثل 10001) في الخلية A1. انظر إلى لقطة الشاشة:

2. في الخلية التالية (على سبيل المثال، A2)، أدخل الرقم التالي كما تريد زيادة الفاصل به. على سبيل المثال، إذا كنت تريد زيادة كل رقم بمقدار 11، اكتب 10012 في الخلية A2. (تحقق من هذه القيمة بعناية - فهي تحدد حجم الخطوة لكل السلسلة).

3. قم بتحديد الخليتين الأولى والثانية (A1 و A2). ثم، حرك مؤشرك إلى مقبض التعبئة (المربع الصغير في الزاوية اليمنى السفلى من التحديد). انقر واسحب مقبض التعبئة لأسفل العمود لتوسيع التسلسل حسب الحاجة. ستقوم الخلايا بالتعبئة تلقائيًا وفقًا لنمط الزيادة المحدد. انظر إلى لقطات الشاشة:

تعبئة الخلايا المتزايدة تلقائيًا باستخدام الصيغة

بالإضافة إلى الملء التلقائي، يمكنك استخدام صيغ Excel لمزيد من التحكم والمرونة عند إنشاء تسلسلات متزايدة. هذه الطريقة مناسبة جدًا للحالات التي ترغب فيها في تحديث السلسلة تلقائيًا إذا تغيرت القيمة الابتدائية، أو إذا كنت ترغب في نسخ الصيغة لتعديل التسلسلات في أماكن أخرى.

السيناريو المناسب: استخدم الصيغ للتسلسلات المتزايدة الديناميكية، خاصة عندما قد تحتاج القيمة الابتدائية أو الفاصل إلى التغيير، أو للقوائم الطويلة حيث تكون الأتمتة والاتساق مهمين.

1. أولاً، في الخلية الابتدائية الخاصة بك (على سبيل المثال، A1)، أدخل القيمة الأولية. على سبيل المثال، اكتب 10001 في الخلية A1. ثم، انقر على الخلية الموجودة أسفل مباشرة (A2) وأدخل الصيغة التالية، باستخدام الخطوة المطلوبة (هنا، الفاصل هو 11):

=A1+11

حيث يشير A1 إلى الخلية الابتدائية الخاصة بك، و11 هي قيمة الزيادة. قم بضبط الخطوة حسب الحاجة للتسلسل الخاص بك.

2. اضغط على Enter لحساب القيمة. ثم، انقر على الخلية A2 لتحديدها، واسحب مقبض التعبئة (المربع الصغير في الزاوية اليمنى السفلى) لأسفل لتوسيع الصيغة حسب الحاجة. هذا سيولد تلقائيًا قيمًا متزايدة مع الفاصل المحدد في جميع الخلايا المحددة.

تعبئة الخلايا المتزايدة تلقائيًا باستخدام Kutools لـ Excel

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

بعد التثبيت المجاني لـ Kutools لـ Excel، الرجاء القيام بما يلي:

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

2. في مربع الحوار إدراج رقم التسلسل الذي يظهر، انقر على جديد لإنشاء تسلسل جديد. انظر إلى لقطة الشاشة:

3. أكمل الإعدادات التالية في الحوار الموسع:

1) أدخل اسمًا للتسلسل الجديد (مفيد لإعادة الاستخدام أو تحديد الهوية لاحقًا)؛

2) حدد الرقم الأولي، وهو القيمة الأولى للتسلسل؛

3) أدخل الفاصل المطلوب في مربع الزيادة (على سبيل المثال، أدخل 11 لحجم خطوة 11)؛

4) حدد عدد الأرقام للعرض في حقل عدد الأرقام. على سبيل المثال، إدخال "5" سيملأ الأرقام بأصفار بادئة لجعل 10001 تظهر كـ 10001، و15 تظهر كـ 00015.

5) يمكنك أيضًا تحديد بادئة أو لاحقة اختيارية، والتي ستظهر قبل أو بعد كل رقم (على سبيل المثال، 'ID-' أو '-A').

4. بعد تكوين التسلسل الخاص بك، انقر على إضافة لحفظه في الحوار، ثم انقر على ملء النطاق لتعبئة الخلايا المحددة تلقائيًا بناءً على هذه الإعدادات. انظر إلى لقطة الشاشة:

النطاق الذي حددته سيتم الآن ملؤه بالأرقام المتزايدة المنسقة بالضبط كما هو محدد، بما في ذلك أي بادئة أو لاحقة مخصصة.

ملاحظة:

1. لإعادة تشغيل تسلسل الزيادة وملء من الرقم الأولي مرة أخرى، عد إلى مربع الحوار إدراج رقم التسلسل، حدد التسلسل الخاص بك من القائمة، واستخدم خيار إعادة التعيين. انقر على موافق لتأكيد.

2. إذا كنت ترغب في إيقاف التسلسل عند رقم معين وإعادة التشغيل من البداية، افحص مربع الرقم الأخير في الحوار وأدخل القيمة النهائية المطلوبة. يمكنك معاينة التأثير قبل التنفيذ، مما يضمن أن الترقيم يلبي متطلباتك.

تعبئة الخلايا المتزايدة تلقائيًا باستخدام كود VBA 

عندما تحتاج إلى أتمتة الأرقام المتزايدة في سيناريوهات أكثر تعقيدًا، أو تنفيذ الإجراء بشكل متكرر، قد تفكر في استخدام VBA (Visual Basic for Applications). هذا النهج مرن ويمكنه توليد سلاسل متزايدة مخصصة بسرعة، خاصة للمجموعات الكبيرة من البيانات أو الأنماط المخصصة المحددة.

1. اضغط على Alt + F11 لفتح محرر Visual Basic for Applications. في المحرر، انقر على إدراج > وحدة لإنشاء وحدة جديدة. ثم انسخ والصق الكود VBA التالي في نافذة الوحدة:

Sub FillIncrementCells()
    Dim rng As Range
    Dim startVal As Long
    Dim stepVal As Long
    Dim i As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select range to fill incrementing values:", xTitleId, rng.Address, Type:=8)
    
    startVal = Application.InputBox("Enter the starting number:", xTitleId, "", Type:=1)
    stepVal = Application.InputBox("Enter the increment step:", xTitleId, "", Type:=1)
    
    If rng Is Nothing Then Exit Sub
    
    For i = 1 To rng.Count
        rng.Cells(i).Value = startVal + (i - 1) * stepVal
    Next i
End Sub

2. ثم، اضغط على مفتاح F5 لتشغيل هذا الكود. في مربعات الحوار، أدخل الرقم الأولي والفاصل واحدًا تلو الآخر. سيتم تعبئة الخلايا المحددة بالتسلسل المتزايد كما هو محدد.