كيفية قفل الخلايا على أساس اللون في Microsoft Excel

يتيح لك Microsoft Excel تطبيق التنسيق الشرطي على الخلايا. إذا كانت القيمة في الخلية تستوفي قواعد معينة قمت بتعيينها ، فإن ميزة التنسيق الشرطي ستغير لون النص في الخلية ، أو لون التعبئة ، أو كليهما. هذه ميزة أساسية تعمل فور إخراجها من الصندوق ، إذا كنت ترغب في قفل الخلايا بناءً على اللون ، فأنت بحاجة إلى نص برمجي صغير لـ VBA للقيام بذلك.

يمكنك استخدام التنسيق الشرطي لتغيير لون الخلية أو يمكنك تغيير اللون يدويًا إلى أي شيء تريده. لا يعتمد البرنامج النصي VBS على التنسيق الشرطي لـ قفل الخلايا. تحتاج فقط إلى خلية لتلوينها.

خلايا القفل على أساس اللون

قبل أن تتمكن من إنشاء برنامج نصي VBA ، تحتاج إلى معرفة لون الخلية التي تشير إليها. لا يرى VBA الألوان كما هي ؛ يشير إليها عبر رموز الألوان الخاصة بهم.

أول شيء عليك القيام به هو إعطاء خليتك لونًا. لقد اخترنا اللون الأصفر الأساسي الذي يسهل الرجوع إليه. إذا كنت ذاهبًا بلون مختلف ، استخدم هذا الموقع للعثور على رمز اللون الذي تحتاج إلى استخدامه. رمز اللون الذي نستخدمه للأصفر هو # FFFF00.

في Excel ، قم بتمكين علامة تبويب المطور ، ثم قم بالتبديل إليه. انقر فوق الزر Visual Basic والصق ما يلي في "ورقة العمل هذه". تمت كتابة هذا البرنامج النصي من قبل مستخدم Superuser ديف.

Sub WalkThePlank () dim colorIndex كـ Integer. colorIndex = FFFF00 Dim rng كنطاق لكل rng في ActiveSheet. UsedRange. خلايا لون خافت طالما. color = rng. الداخلية. مؤشر اللون. إذا (color = colorIndex) ثم rng. مؤمن = صحيح. آخر. رنج. Locked = false End If Next rng End Sub

قم بتشغيل البرنامج النصي ، وسوف يقوم بقفل جميع الخلايا التي هي اللون الذي قمت بتعيينه. سيتم تعيين رمز اللون الذي وجدته للونك في هذا السطر في البرنامج النصي ؛

colorIndex = FFFF00

يمثل FFFF00 اللون الأصفر وهذا ما تحتاج إلى استبداله بأي رمز لون ينطبق على اللون الذي تستخدمه. يجب أن نذكر أنه من الأفضل استخدام اللون الأساسي. بمجرد إضافة هذا ، ستحتاج إلى حفظ ملف Excel كملف تم تمكينه للماكرو أو لن يتم حفظ البرنامج النصي VBA.

يمكن بسهولة فتح الخلايا المقفلة. القفل ليس قفلًا محميًا بكلمة مرور يمنع الأشخاص الآخرين من تغيير قيمة الخلية إذا أرادوا. إنه قفل عادي يمنع التغييرات العرضية في الملف.