كيفية حذف كل صف آخر في إكسيل بسرعة؟
إذا كنت تريد حذف كل صف أو عمود آخر في Excel بسرعة ، فإن النقطة الأساسية هي كيف يمكنك تحديد كل صف أو عمود آخر بسرعة أولاً ثم تطبيق عملية الحذف عليها. وستعرض لك هذه المقالة بعض الأشياء الصعبة حول كيفية تحديد كل صف أو عمود آخر أولاً ثم حذفها بسرعة.
احذف كل صف آخر في Excel باستخدام أمر التصفية
احذف كل صف آخر في Excel برمز VBA
احذف كل صف أو عمود آخر في Excel باستخدام Kutools for Excel
احذف كل صف آخر في Excel باستخدام أمر التصفية
مايكروسوفت اكسل منقي يمكن أن يساعدك الأمر في تصفية كل صف آخر بسرعة ثم حذفها مرة واحدة ، يرجى القيام بما يلي:
1. في عمود فارغ بجانب البيانات الأصلية ، أدخل 0,1,0,1،0,1،XNUMX،XNUMX ... ، XNUMX،XNUMX. في هذه الحالة ، نقوم بإدخال الأرقام في العمود المساعد C. انظر لقطة الشاشة التالية:
2. حدد العمود C ، وانقر فوق منقي زر تحت البيانات التبويب. ثم انقر فوق زر السهم بجوار C1 ، وتحقق فقط من ملف 0 تحت حدد الكل اختيار. انظر لقطة الشاشة:
3. ثم يتم إخفاء جميع الصفوف التي تحتوي على 1. حدد الصفوف المرئية بـ 0 ، وانقر فوق الصفحة الرئيسية > حذف > حذف صفوف الورقة لحذف هذه الصفوف. ثم يقوم بحذف كل صف آخر ، وتحتاج إلى النقر فوق منقي زر مرة أخرى لإظهار الصفوف فقط مع 1. انظر لقطات الشاشة:
4. أخيرًا ، يمكنك حذف العمود المساعد C حسب حاجتك.
حدد كل الصفوف الأخرى أو الأعمدة ثم احذفها مرة واحدة
كوتولس ل إكسيل's حدد الفاصل الزمني للصفوف والأعمدة يمكن أن تساعدك الأداة المساعدة في العثور على كل الصفوف أو الأعمدة الأخرى أو تحديدها ، وبعد ذلك يمكنك القيام ببعض العمليات حسب حاجتك. انقر لتنزيل Kutools for Excel!
احذف كل صف آخر في Excel برمز VBA
في الواقع ، يعد ماكرو VBA أيضًا خيارًا جيدًا لحل هذه المشكلة.
1. اضغط باستمرار قديم + F11 في Excel ، ويفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، ولصق الماكرو التالي في ملف وحدة نافذة او شباك.
كود فبا: احذف كل صف آخر في التحديد:
Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
Set rng = InputRng.Cells(i, 1)
rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub
3. اضغط على F5 مفتاح لتشغيل هذا الماكرو. ثم ينبثق مربع حوار لاختيار النطاق. انظر لقطة الشاشة:
4. ثم اضغط OK، يتم حذف كل صف آخر في النطاق المحدد من الصف الثاني مرة واحدة ، انظر الصورة:
احذف كل صف أو عمود آخر في Excel باستخدام Kutools for Excel
بالنسبة لمستخدم Microsoft Excel المبتدئ ، يعد استخدام ماكرو VBA أمرًا معقدًا بعض الشيء. ال حدد الفاصل الزمني للصفوف والأعمدة فائدة كوتولس ل إكسيل يمكن أن تساعدك على حذف كل صف آخر بسرعة.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. حدد النطاق الذي تريد حذفه من كل صفوف أخرى ، ثم قم بتطبيق هذه الأداة المساعدة بالنقر فوق كوتولس > أختار > حدد صفوف وأعمدة الفاصل الزمني ....
2. في حدد الفاصل الزمني للصفوف والأعمدة مربع الحوار ، حدد الإعدادات كما هو موضح في لقطة الشاشة التالية ، وانقر فوق OK زر لتحديد كل الصفوف الأخرى أولاً.
3. ثم يتم تحديد وتمييز كل صف آخر في التحديد. انظر لقطة الشاشة:
4. بعد ذلك ، يمكنك حذف كل الصفوف المحددة بسرعة من خلال النقر فوق الصفحة الرئيسية > حذف > حذف صفوف الورقة لحذف كل هذه الصفوف. انظر لقطات الشاشة:
انقر لمعرفة المزيد حول ميزة تحديد صفوف وأعمدة الفاصل الزمني.
باستخدام هذه الميزة ، يمكنك أيضًا حذف كل الصفوف أو الأعمدة حسب حاجتك.
قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!
العرض التوضيحي: احذف كل صف أو عمود آخر باستخدام Kutools for Excel
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!