كيف يمكن إدراج صفوف فارغة تلقائيًا عند تغيُّر القيمة في Excel؟
![]() | ![]() | ![]() |
لنفترض أن لديك نطاقًا من البيانات، وترغب الآن في إدراج صفوف فارغة بين البيانات عند تغيُّر القيمة، حتى تتمكن من فصل القيم المتسلسلة المتماثلة في عمود واحد كما هو موضح في لقطات الشاشة التالية. في هذه المقالة، سأتحدث عن بعض الحيل التي يمكنك استخدامها لحل هذه المشكلة.
إدراج صفوف فارغة عند تغيُّر القيمة باستخدام دالة المجموع الفرعي
إدراج عدد معيَّن من صفوف فارغة عند تغيُّر القيمة باستخدام ميزة قوية
إدراج صفوف فارغة عند تغيُّر القيمة باستخدام دالة المجموع الفرعي
باستخدام ميزةالمجموع الفرعي، يمكنك إدراج صفوف فارغة بين البيانات عند تغيُّر القيمة باتباع الخطوات التالية:
1. حدد نطاق البيانات الذي ترغب في استخدامه.
2. انقربيانات > مجموع فرعيلفتح مربع حوارالمجموع الفرعي. في مربع حوارالمجموع الفرعي، يرجى تنفيذ الخيارات التالية:

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

4. ثم انقر على الرقم 2 أعلى رمز المخطط التفصيلي لعرض صفوف المجموع الفرعي فقط.

5. بعد ذلك، حدد نطاق بيانات المجموع الفرعي، ثم اضغط على مفاتيح الاختصارAlt+; لتحديد الصفوف المرئية فقط. راجع لقطة الشاشة:

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

8. تم مسح رموز المخطط الهيكلي دفعة واحدة، ويمكنك ملاحظة أن صفوفًا فارغة قد أُدخلت بين البيانات كلما تغيّرت القيمة. راجع لقطة الشاشة:

9. في النهاية، يمكنك حذف العمود A عند الحاجة.
إدراج عدد معيَّن من صفوف فارغة عند تغيُّر القيمة باستخدام ميزة قوية
إذا شعرت بالإرهاق من الطرق المعقدة المذكورة أعلاه، فسأقدّم لك هنا أداة مفيدة: ميزةKutools لـ Excelالخاصة بـتمييز التغييرات في العمود، والتي تساعدك على إدراج فاصل صفحات أو صفوف فارغة أو حدٍّ سفلي أو تعبئة لونية بمجرد تغيُّر قيمة الخلية—وبكل سهولة وسرعة!
نصائح:لتطبيق هذهتمييز التغييرات في العمودالميزة، يجب عليك أولًا تنزيلKutools لـ Excel، ثم تطبيق الميزة بسرعة وبسهولة.
بعد تثبيتKutools لـ Excel، يرجى اتباع ما يلي:
1. انقر علىKutools > تنسيق > تمييز التغييرات في العمود، راجع لقطة الشاشة:

2. في مربع حوارتمييز التغييرات في العمود، يرجى تنفيذ الخطوات التالية:
- حدد نطاق البيانات الذي تريد استخدامه، ثم اختر العمود الرئيسي الذي تريد إدراج صفوف فارغة بناءً عليه؛
- ثم فعّل خيارصف فارغمن قسمالخيارات، وأدخل عدد الصفوف الفارغة التي ترغب في إدراجها.

3. بعد ذلك، انقر على زرموافق، وسيتم إدراج العدد المعيَّن من الصفوف الفارغة في البيانات عند تغيُّر قيمة الخلية. راجع لقطات الشاشة:
![]() | ![]() | ![]() |
انقر لتنزيل Kutools لـ Excel وتجربته مجانًا الآن!
إدراج صفوف فارغة عند تغيُّر القيمة باستخدام أعمدة مساعدة
باستخدام الأعمدة المساعدة، يمكنك إدخال الصيغة أولًا، ثم تطبيق دالةالبحث والاستبدال، وأخيرًا إدراج صفوف فارغة بين القيم المتغيرة. اتبع الخطوات التالية:
1. في الخلية الفارغة C3، أدخل الصيغة التالية: =A3=A2، وفي الخلية D4 أدخل الصيغة التالية: =A4=A3. راجع لقطة الشاشة:

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

3. بعد ذلك، اضغط على مفاتيحCtrl + F لفتح مربع حوارالبحث والاستبدال. في مربع الحوار المنبثق، أدخلخطأفي مربع النصالبحث عنضمن تبويببحث، ثم انقر على زرخياراتلتوسيع المربع، واخترالقيممن القائمة المنسدلةالبحث في. راجع لقطة الشاشة:

4.انقر على زربحث الكل، ثم اضغط علىCtrl + Aلتحديد جميع نتائج البحث دفعة واحدة، وستتم ملاحظة أن جميع خلايا «خطأ» قد تم تحديدها، راجع لقطة الشاشة:

6. أغلق مربع حوارالبحث والاستبدال. بعد ذلك، لإدراج صفوف فارغة، انقر علىالصفحة الرئيسية > إدراج > إدراج صفوف ورقة العمل، وسيتم إدراج الصفوف الفارغة في البيانات تلقائيًا عند تغيُّر القيمة في العمود A. راجع لقطات الشاشة:
![]() | ![]() | ![]() |
7. أخيرًا، يمكنك حذف العمودين المساعدين C وD متى شئت.
إدراج صفوف فارغة عند تغيُّر القيمة باستخدام كود VBA
إذا شعرت بالملل من الطرق السابقة، فهناك كودٌ يمكنه مساعدتك أيضًا في إدراج صفوف فارغة بين القيم المتغيرة دفعةً واحدة.
1. اضغط مع الاستمرار على مفاتيحALT + F11 لفتح نافذةمايكروسوفت فيجوال بيسك للتطبيقات.
2. انقر علىإدراج > وحدة نمطية، ثم الصق الكود التالي فينافذة الوحدة النمطية.
كود VBA: إدراج صفوف فارغة عند تغيُّر القيمة
Sub InsertRowsAtValueChange()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 2 Step -1
If WorkRng.Cells(i, 1).Value <> WorkRng.Cells(i - 1, 1).Value Then
WorkRng.Cells(i, 1).EntireRow.Insert
End If
Next
Application.ScreenUpdating = True
End Sub
3. بعد ذلك، اضغط على مفتاحF5 لتشغيل هذا الكود، وستظهر نافذة منبثقة تطلب منك تحديد عمود البيانات الذي تريد إدراج صفوف فارغة عند تغيُّر القيمة فيه. راجع لقطة الشاشة:

4. بعد ذلك، انقر علىموافق، وسيتم إدراج صفوف فارغة بين البيانات عند تغيُّر القيمة في العمود A.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل






