كيفية حذف جميع الصفوف الموجودة أسفل صف معين أو خلية نشطة في إكسيل؟
لحذف جميع الصفوف الموجودة أسفل صف معين أو خلية نشطة ، يمكن أن تساعدك هذه المقالة.
احذف جميع الصفوف الموجودة أسفل صف معين في Excel برمز VBA
احذف جميع الصفوف الموجودة أسفل الخلية النشطة في Excel برمز VBA
احذف جميع الصفوف الموجودة أسفل صف معين في Excel برمز VBA
سيساعدك رمز VBA التالي على حذف جميع الصفوف الموجودة أسفل صف معين في Excel.
1. صحافة قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة. ثم انسخ والصق رمز فبا التالي في نافذة التعليمات البرمجية.
كود فبا: احذف جميع الصفوف الموجودة أسفل صفوف معينة في إكسيل
Sub DeleteRowsBelow()
Worksheets("Sheet1").Rows(5 & ":" & Worksheets("Sheet1").Rows.Count).Delete
End Sub
ملاحظات: في رمز VBA ، يشير الرقم 5 والورقة 1 إلى جميع الصفوف الموجودة أسفل الصف 5 (بما في ذلك الصف 5) في الورقة 1 سيتم حذفها بعد تشغيل الكود. يمكنك تغييرها بناءً على احتياجاتك.
3. صحافة F5 مفتاح لتشغيل الكود. ثم يتم حذف جميع الصفوف الموجودة أسفل الصف 5 (بما في ذلك الصف 5) على الفور كما هو موضح أدناه.
افتح Excel Magic باستخدام Kutools AI
- التنفيذ الذكي: تنفيذ عمليات الخلية، وتحليل البيانات، وإنشاء المخططات - كل ذلك مدفوع بأوامر بسيطة.
- الصيغ المخصصة: قم بإنشاء صيغ مخصصة لتبسيط سير عملك.
- ترميز VBA: كتابة وتنفيذ كود VBA دون عناء.
- تفسير الصيغة: فهم الصيغ المعقدة بسهولة.
- ترجمة النص: كسر حواجز اللغة داخل جداول البيانات الخاصة بك.
احذف جميع الصفوف الموجودة أسفل الخلية النشطة في Excel برمز VBA
لحذف جميع الصفوف الموجودة أسفل صف الخلية النشط مباشرةً في Excel ، يمكنك تجربة رمز VBA التالي.
1. حدد خلية ستقوم بحذف جميع الصفوف الموجودة تحتها ، ثم اضغط قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة. ثم انسخ والصق رمز فبا التالي في نافذة التعليمات البرمجية.
كود فبا: احذف جميع الصفوف الموجودة أسفل صف الخلية النشط في إكسيل
Sub DeleteAllBelow()
Rows(ActiveCell.Row & ":" & Rows.Count).Delete
End Sub
3. اضغط على F5 مفتاح لتشغيل الكود. ثم يتم حذف جميع الصفوف الموجودة أسفل صف الخلية النشط (بما في ذلك صف الخلية النشط) على الفور.
مقالات ذات صلة:
- كيفية حذف جميع الصفوف باستثناء صف الرأس الأول في إكسيل؟
- كيفية حذف الصفوف إذا كانت الخلية أكبر / أقل من قيمة معينة في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!