فبا: كيفية إزالة ألوان التعبئة من الخلايا

يمكنك استخدام بناء الجملة الأساسي التالي في VBA لإزالة الحدود من الخلايا في نطاق معين:

 Sub RemoveFillColor()
Range(" A1:B12 ").Interior.Color = xlNone
End Sub

يقوم هذا المثال تحديدًا بإزالة كافة ألوان التعبئة من الخلايا الموجودة في النطاق A1:B12 .

يوضح المثال التالي كيفية استخدام بناء الجملة هذا عمليًا.

مثال: استخدام VBA لإزالة ألوان التعبئة من الخلايا

لنفترض أن لدينا مجموعة البيانات التالية في Excel والتي تحتوي على معلومات حول العديد من لاعبي كرة السلة:

لنفترض أننا نريد إزالة ألوان التعبئة من كل خلية في النطاق A1:B12 .

يمكننا إنشاء الماكرو التالي للقيام بذلك:

 Sub RemoveFillColor()
Range(" A1:B12 ").Interior.Color = xlNone
End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

لاحظ أنه تمت إزالة ألوان التعبئة لكل خلية في النطاق A1:B12 .

لإزالة ألوان التعبئة من الخلايا الموجودة في نطاق مختلف، ما عليك سوى استبدال A1:B12 بنطاق مختلف في الماكرو.

ملاحظة : يمكنك العثور على الوثائق الكاملة لخاصية VBA Interior.Color هنا .

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى باستخدام VBA:

فبا: كيفية إزالة حدود الخلايا
VBA: كيفية حساب عدد الأوراق في المصنف
فبا: كيفية حساب عدد الصفوف في النطاق