كيفية حذف الأعمدة بأكملها بناءً على قيمة الترويسة في Excel؟
في العديد من الحالات، قد تحتاج إلى حذف الأعمدة بأكملها بناءً على قيمة الترويسة في Excel. على سبيل المثال، قد تحتاج إلى حذف جميع الأعمدة التي تحتوي على كلمة “قديم” في الترويسة. في هذا الدليل التعليمي، سنوضح لك طرق حذف الأعمدة بأكملها بناءً على قيمة الترويسة بالتفصيل.
حذف الأعمدة بأكملها بناءً على قيمة الترويسة باستخدام كود VBA
حذف الأعمدة بأكملها بناءً على قيمة الترويسة باستخدام Kutools لـ Excel
حذف الأعمدة بأكملها بناءً على قيمة الترويسة باستخدام كود VBA
يمكنك حذف الأعمدة بأكملها بناءً على قيمة الترويسة باستخدام كود VBA. يرجى اتباع الخطوات التالية:
1. اضغط على مفاتيح Alt + F11 معًا لفتح نافذة تطبيق Microsoft Visual Basic.
2. في نافذة تطبيق Microsoft Visual Basic، انقر فوق إدراج > وحدة. ثم قم بنسخ ولصق الكود أدناه في نافذة الوحدة.
كود VBA: حذف الأعمدة بأكملها بناءً على قيمة الترويسة
Sub DeleteSpecifcColumn()
Set MR = Range("A1:D1")
For Each cell In MR
If cell.Value = "old" Then cell.EntireColumn.Delete
Next
End Sub
ملاحظات:
3. اضغط على مفتاح F5 لتشغيل الكود، سيتم حذف العمود بالكامل الذي تكون فيه الترويسة مساوية للنص المحدد فورًا.
حذف الأعمدة بأكملها بناءً على قيمة الترويسة باستخدام Kutools لـ Excel
مع أداة تحديد خلايا محددة من Kutools لـ Excel، يمكنك بسهولة اختيار جميع الأعمدة التي تحتوي على قيمة ترويسة معينة أولاً، ثم حذف هذه الأعمدة المختارة دفعة واحدة. يرجى اتباع الخطوات التالية:
1. حدد النطاق الذي يحتوي على الأعمدة التي تحتاج إلى حذفها، ثم انقر فوق Kutools > تحديد > تحديد خلايا محددة. شاهد لقطة الشاشة:
2. في مربع الحوار تحديد خلايا محددة، حدد خيار العمود بأكمله في قسم نوع التحديد، وفي قائمة النوع المحدد المنسدلة، حدد الخيار يساوي، ثم اكتب قيمة الترويسة في الصندوق التالي. وأخيرًا انقر فوق الزر موافق. شاهد لقطة الشاشة:
3. انقر فوق زر موافق في مربع الحوار المنبثق الآخر، ثم يتم تحديد الأعمدة التي تحتوي على قيمة الترويسة المحددة فورًا.
4. انقر بزر الماوس الأيمن على رأس العمود المحدد، ثم انقر فوق حذف من قائمة النقر بزر الماوس الأيمن. بعد ذلك يتم حذف جميع الأعمدة المحددة دفعة واحدة.
إذا كنت ترغب في الحصول على نسخة تجريبية مجانية (30 يوم) من هذه الأداة، يرجى النقر لتنزيلها، ثم الانتقال لتطبيق العملية وفقًا للخطوات المذكورة أعلاه.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد