Skip to main content

كيفية تعبئة الأرقام التسلسلية بتجاهل الصفوف المخفية في Excel؟

Author: Xiaoyang Last Modified: 2025-08-06

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

A screenshot showing a dataset where sequence numbers will be filled into visible rows Arrow A screenshot showing sequence numbers filled into visible rows and skipped hidden rows

تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام صيغة

تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام كود VBA

تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام Kutools لـ Excel


تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام صيغة

لتعبئة الأرقام التسلسلية فقط في الخلايا المرئية، قد تساعدك صيغة بسيطة، يرجى القيام بما يلي:

1. أدخل هذه الصيغة: =SUBTOTAL(103,$B$3:$B3) (B3 هي الخلية المرئية التي تتوافق مع الخلية التي تريد البدء في تعبئة الرقم التسلسلي فيها) في أول خلية تريد تعبئة الأرقام التسلسلية فيها، A3 في هذه الحالة، ثم اضغط على مفتاح Enter، ستحصل على الرقم 1، انظر لقطة الشاشة:

A screenshot showing the first sequence number in a visible row using a formula

2. ثم حدد الخلية A3، واسحب مقبض التعبئة إلى الأسفل للخلايا التي تريد تعبئة الأرقام التسلسلية فيها، انظر لقطة الشاشة:

A screenshot showing sequence numbers filled into visible rows in Excel using a formula


تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام كود VBA

الكود التالي من VBA يمكن أن يساعدك أيضًا على تعبئة الأرقام التسلسلية فقط في الخلايا المرئية، يرجى القيام بما يلي:

1. اضغط باستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.

كود VBA: تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية:

Sub FillValue()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim xVal As Long
    Dim I As Long
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
    Set xRg = xRg.SpecialCells(xlVisible)
    Debug.Print xRg.Address
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        xVal = xVal + 1
        xCell = xVal
    Next
End Sub

3. ثم اضغط على مفتاح F5 لتشغيل هذا الكود، ستظهر نافذة منبثقة لتذكيرك بتحديد نطاق البيانات الذي تريد تعبئته، انظر لقطة الشاشة:

A screenshot showing a VBA input box for selecting data to fill sequence numbers

4. وبعد ذلك انقر فوق زر موافق، سيتم تعبئة الأرقام التسلسلية فقط في الخلايا المرئية.


تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام Kutools لـ Excel

الطريقتان السابقتان يمكن أن تساعدك فقط على تعبئة الأرقام التسلسلية في الخلايا المرئية، إذا كنت تريد تعبئة تسلسل مثل AA-0001-BB، AA-0002-BB، AA-0003-BB ...، فإن الطرق المذكورة أعلاه لن تعمل. ولكن، لا تقلق، أداة إدراج الأرقام التسلسلية من Kutools لـ Excel يمكن أن تساعدك على إنهاء الأمر بسرعة وسهولة.

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

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

1. حدد الخلايا التي تريد تعبئة سلاسل التسلسل فيها.

2. انقر فوق Kutools > إدراج > إدراج رقم تسلسلي، في مربع الحوار إدراج رقم تسلسلي، انقر فوق زر جديد، انظر لقطات الشاشة:

A screenshot showing the Insert Sequence Number option on the Kutools tab on the ribbon Arrow A screenshot showing the Insert Sequence Number dialog

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

A screenshot showing sequence number settings

4. بعد الانتهاء من الإعدادات، انقر فوق زر إضافة لحفظ هذا العنصر الجديد في مربع القائمة أعلاه، انظر لقطة الشاشة:

A screenshot showing custom sequence number preview

6. وبعد ذلك حدد العنصر الذي قمت بإنشائه وانقر فوق زر تعبئة النطاق، سيتم تعبئة سلاسل التسلسل فقط في الخلايا المرئية، انظر لقطة الشاشة:

A screenshot showing sequence numbers filled into visible cells in Excel using Kutools

قم بتنزيل وتجربة Kutools لـ Excel الآن مجانًا!


عرض توضيحي: تعبئة الأرقام التسلسلية مع تجاهل الصفوف المخفية باستخدام Kutools لـ Excel

Kutools لـ Excel: أكثر من 300 أدوات عملية في متناول يدك! استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! قم بالتنزيل الآن!

أفضل أدوات زيادة الإنتاجية لمجموعة Office

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات بفضل: التنفيذ الذكي|توليد الشيفرة|إنشاء الصيغ المخصصة|تحليل البيانات وتوليد الرسوم البيانية|استدعاء الوظائف المحسنة
الميزات الشائعة: إيجاد أو تمييز أو وضع علامة على المكررات|حذف الصفوف الفارغة|دمج الأعمدة أو الخلايا دون فقدان البيانات|تقريب...
بحث متقدم: بحث V بمعايير متعددة|بحث V بقيم متعددة|بحث في عدة ورقات|مطابقة غامضة ....
قائمة منسدلة متقدمة: أنشئ قائمة منسدلة بسرعة|قائمة منسدلة معتمدة|قائمة منسدلة متعددة الاختيار ....
إدارة الأعمدة: إضافة عدد معين من الأعمدة |نقل الأعمدة |تغيير حالة إظهار/إخفاء الأعمدة المخفية| مقارنة النطاقات و الأعمدة ...
ميزات مميزة: التركيز على الشبكة|عرض التصميم|شريط الصيغ المحسن|إدارة أدوات المصنف وورقة العمل|مكتبة النص التلقائي (Auto Text)|منتقي التاريخ|دمج البيانات |تشفير/فك تشفير الخلايا|إرسال البريد الإلكتروني حسب القائمة|مرشح متقدم|تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض أو مائل أو يتوسطه خط...) ...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ... )|أكثر من50 نوعاً من الرسوم البيانية (مخطط جانت، ...)|أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...)|19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ... )|12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...)|7 أدوات دمج و تقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...)|... والمزيد
استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من40 لغة أخرى!

عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...


Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير

  • فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
  • افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
  • يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!