كيفية إدراج صفوف فارغة عندما تتغير القيمة في إكسيل؟
لنفترض أن لديك نطاقًا من البيانات ، وتريد الآن إدراج صفوف فارغة بين البيانات عندما تتغير القيمة ، بحيث يمكنك فصل القيم المتسلسلة نفسها في عمود واحد كما هو موضح في لقطات الشاشة التالية. في هذا المقال سوف أتحدث عن بعض الحيل لك لحل هذه المشكلة.
أدخل صفوفًا فارغة عندما تتغير القيمة باستخدام دالة Subtotal
قم بإدراج صفوف فارغة عندما تتغير القيمة مع الأعمدة المساعدة
قم بإدراج صفوف فارغة عندما تتغير القيمة برمز VBA
أدخل عددًا محددًا من الصفوف الفارغة عندما تتغير القيمة بميزة قوية
أدخل صفوفًا فارغة عندما تتغير القيمة باستخدام دالة Subtotal
مع المجموع الفرعي ميزة ، يمكنك إدراج صفوف فارغة بين البيانات عندما تتغير القيمة على النحو التالي:
1. حدد نطاق البيانات الذي تريد استخدامه.
2. انقر البيانات > المجموع الفرعي لفتح المجموع الفرعي مربع الحوار وفي المجموع الفرعي الحوار ، يرجى القيام بالخيارات التالية:
1: حدد اسم العمود الذي تريد إدراج صفوف فارغة بناءً على الوقت الذي تتغير فيه القيمة في كل تغيير في قسم؛
2: أختر العد التنازلي من استخدام وظيفة قائمة منسدلة؛
3: حدد اسم العمود الذي تريد إدراج الإجمالي الفرعي فيه في أضف المجموع الفرعي إلى قائمة
|
3. ثم اضغط OK، تم إدراج خطوط الإجمالي الفرعي بين المنتجات المختلفة ، ويتم عرض رموز المخطط التفصيلي على يسار الجدول ، انظر الصورة:
4. ثم انقر فوق الرقم 2 في الجزء العلوي من رمز المخطط التفصيلي لعرض خطوط الإجمالي الفرعي فقط.
5. ثم حدد بيانات النطاق الإجمالي الفرعي ، واضغط على Alt + ؛ مفاتيح الاختصار لتحديد الصفوف المرئية فقط ، انظر الصورة:
6. بعد تحديد الصفوف المرئية فقط ، اضغط على حذف على لوحة المفاتيح ، وتمت إزالة جميع صفوف الإجمالي الفرعي.
7. ثم انقر فوق أي خلية أخرى ، ثم ارجع البيانات > فك التجميع > مسح المخطط التفصيلي لإزالة الخطوط العريضة ، انظر الصورة:
8. تم مسح رموز المخطط التفصيلي مرة واحدة ، ويمكنك رؤية صفوف فارغة تم إدراجها بين البيانات عندما تتغير القيمة ، انظر الصورة:
9. أخيرًا ، يمكنك حذف العمود A حسب حاجتك.
قم بإدراج فاصل صفحة أو صفوف فارغة أو حد سفلي أو لون تعبئة عندما تتغير القيمة بسرعة
إذا كان لديك كوتولس ل إكسيل's ميّز الاختلافات الميزة ، يمكنك إدراج فاصل صفحة أو صفوف فارغة أو حد سفلي أو ملء اللون بسرعة عندما تتغير القيمة حسب حاجتك. انظر أدناه التجريبي. انقر لتنزيل Kutools for Excel!
قم بإدراج صفوف فارغة عندما تتغير القيمة مع الأعمدة المساعدة
باستخدام أعمدة المساعد ، يمكنك إدراج الصيغة أولاً ، ثم تطبيق بحث واستبدال الوظيفة ، أخيرًا ، أدخل الصفوف الفارغة بين القيم المتغيرة. الرجاء القيام بما يلي:
1. في خلية فارغة C3 ، الرجاء إدخال هذه الصيغة = A3 = A2، وفي الخلية D4 أدخل هذه الصيغة = A4 = A3، انظر لقطة الشاشة:
2. ثم حدد C3: D4 ، واسحب مقبض التعبئة إلى النطاق الذي تريد تطبيق صيغ أطروحاته ، وستحصل على صواب or خطأ في الخلايا ، انظر لقطة الشاشة:
3. ثم اضغط CTRL + F مفاتيح لفتح بحث واستبدال الحوار ، في مربع الحوار المنبثق ، أدخل خاطئة في تجد ما مربع نص أسفل علامة التبويب وانقر فوق مزيد من الخيارات لتوسيع هذا الحوار واختيار القيم من إنظر في القائمة المنسدلة ، انظر لقطة الشاشة:
4. انقر جد كل زر ، ثم اضغط CTRL + A لتحديد جميع نتائج البحث ، تم تحديد جميع الخلايا FALSE مرة واحدة ، انظر الصورة:
6. أقفل ال بحث واستبدال الحوار ، الخطوة التالية ، يمكنك إدراج صفوف فارغة بالنقر فوق الصفحة الرئيسية > إدراج > إدراج صفوف الورقة، وتم إدراج صفوف فارغة في البيانات عندما تتغير القيمة بناءً على العمود A ، انظر لقطات الشاشة:
7. أخيرًا ، يمكنك حذف العمود المساعد C و D حسب حاجتك.
قم بإدراج صفوف فارغة عندما تتغير القيمة برمز VBA
إذا مللت من استخدام الطرق المذكورة أعلاه ، فإليك رمزًا يمكن أن يساعدك أيضًا في إدراج صفوف فارغة بين القيم المتغيرة مرة واحدة.
1. اضغط باستمرار على ALT + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: أدخل صفوف فارغة عندما تتغير القيمة
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. ثم انقر فوق OK، تم إدراج الصفوف الفارغة بين البيانات عندما تتغير القيمة بناءً على العمود A.
أدخل عددًا محددًا من الصفوف الفارغة عندما تتغير القيمة بميزة قوية
إذا جربت الطرق المزعجة المذكورة أعلاه ، فسوف أقدم هنا أداة مفيدة ، كوتولس ل إكسيل's ميّز الاختلافات يمكن أن تساعدك على إدراج فاصل صفحة أو صفوف فارغة أو حد سفلي أو تعبئة لون عندما تتغير قيمة الخلية بسرعة وسهولة.
نصيحة:لتطبيق هذا ميّز الاختلافات الميزة ، أولاً ، يجب عليك تنزيل ملف كوتولس ل إكسيل، ثم قم بتطبيق الميزة بسرعة وسهولة.
بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:
1. انقر كوتولس > شكل > ميّز الاختلافات، انظر لقطة الشاشة:
2. في التمييز بين الاختلافات حسب العمود الرئيسي مربع الحوار ، يرجى القيام بالعمليات التالية:
- حدد نطاق البيانات الذي تريد استخدامه ، ثم اختر عمود المفتاح الذي تريد إدراج صفوف فارغة بناءً عليه ؛
- ثم تحقق صف فارغ الخيار من مزيد من الخيارات ، وأدخل عدد الصفوف الفارغة التي تريد إدراجها.
3. ثم اضغط Ok زر ، وتم إدراج العدد المحدد من الصفوف الفارغة في البيانات إذا تغيرت قيمة الخلية ، انظر لقطات الشاشة:
انقر لتنزيل Kutools for Excel والتجربة المجانية الآن!
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!