כיצד לנעול תאים על בסיס צבע ב- Microsoft Excel

Microsoft Excel מאפשר לך להחיל תנאיעיצוב לתאים. אם הערך בתא עומד בכללים מסוימים שקבעת, תכונת העיצוב המותנה תשנה את צבע הטקסט בתא, או את צבע המילוי, או את שניהם. זוהי תכונה בסיסית שעובדת ממש מחוץ לקופסה, אם אתה רוצה לנעול תאים על בסיס צבע, אתה צריך סקריפט VBA קטן כדי לעשות זאת.

אתה יכול להשתמש בעיצוב מותנה כדי לשנות אתצבע של תא או שתוכל לשנות את הצבע באופן ידני לכל דבר שתרצה. סקריפט ה- VBS אינו תלוי בעיצוב מותנה לנעילת תאים. זה רק צריך שתא צבעוני.

נעילת תאים על בסיס צבע

לפני שתוכל ליצור סקריפט VBA, עליך לדעת את צבע התא שאתה מפנה אליו. VBA לא רואה צבעים כמו שהם; זה מפנה אותם באמצעות קודי הצבע שלהם.

הדבר הראשון שאתה צריך לעשות זה לתת את התא שלךצבע. עברנו עם הצהוב הבסיסי שקל די להתייחס אליו. אם אתה הולך עם צבע אחר, השתמש באתר זה כדי למצוא באיזה קוד צבע אתה צריך להשתמש. קוד הצבע בו אנו משתמשים בצבע צהוב הוא # FFFF00.

ב- Excel, הפעל את כרטיסיית המפתח ולאחר מכן עבור אליו. לחץ על כפתור Visual Basic והדבק את הדברים הבאים ב'גליון עבודה זה '. תסריט זה נכתב על ידי המשתמש Superuser דייב.

Sub WalkThePlank()
dim colorIndex as Integer
colorIndex = FFFF00
Dim rng As Range
For Each rng In ActiveSheet.UsedRange.Cells
Dim color As Long
color = rng.Interior.ColorIndex
If (color = colorIndex) Then
rng.Locked = True
else
rng.Locked = false
End If
Next rng
End Sub

הפעל את הסקריפט, והוא יינעל את כל התאים שהם הצבע שקבעת. קוד הצבע שמצאת לצבע שלך יוגדר בשורה זו בסקריפט;

colorIndex = FFFF00

ה- FFFF00 מייצג את הצבע הצהוב וזהומה שאתה צריך להחליף בכל קוד הצבע שמתאים לצבע שאתה משתמש בו. נציין כי עדיף ללכת עם צבע בסיסי. לאחר שתוסיף את זה, תצטרך לשמור את קובץ ה- Excel שלך כקובץ המאפשר מאקרו או שתסריט VBA לא ישמור.

ניתן בקלות לבטל את הנעילה של התאים הנעולים. המנעול אינו נעילה המוגנת באמצעות סיסמה, וכך מונע מאנשים אחרים לשנות את ערך התא אם הם רוצים. זהו מנעול רגיל שמונע שינויים בטעות בקובץ.