אינדקס צבעים VBA של Excel
כמו בגליון עבודה, אנו משנים את צבע התא או טווח תאים נתון מכרטיסיית הבית ב- VBA. יש לנו פונקציית vba הנקראת אינדקס צבעים המשמשת לשינוי צבעי התאים או טווח התאים המסופק, לפונקציות אלו יש זיהוי ייחודי לסוג צבעים שונה.
ב- VBA יש לנו שתי דרכים להחיל את הצבע, הראשונה היא באמצעות מאפיין "צבע" והשנייה באמצעות המאפיין "ColorIndex".
אנו מורחים צבע על התא כצבע רקע, אנו מורחים צבע גופן, ומורחים צבע גבול. אז כדי לגשת למאפיין צבע ואינדקס צבעים עלינו לבחור תחילה בתא.
כיצד להשתמש במאפיין אינדקס צבעים וצבעים?
אתה יכול להוריד תבנית אינדקס צבעים VBA זו כאן - תבנית אינדקס צבעים VBA# 1 - שימוש במאפיין צבעוני
נניח שיש לך את המילה "שלום" בתא A1. נראה כיצד להחיל את צבע הרקע של תא זה.
כדי לשנות את צבע הרקע, בתכונות הצבעים עלינו להזכיר תחילה את טווח התא.
קוד:
טווח צבע משנה () ("A1") משנה סוף 
לאחר בחירת התא עלינו להזכיר מה הדבר שעלינו לעשות. כפי שאמרתי עלינו לשנות את צבע הפנים של התא. אז כדי לשנות את צבע הרקע של התא השתמש במאפיין "פנים".
קוד:
טווח צבעי משנה () ("A1"). משנה פנים קצה 
תחת רכוש פנים, יש לנו כמה שיטות ותכונות אחרות. מכיוון שעלינו לשנות את צבע התא להשתמש במאפיין הצבע.
קוד:
טווח צבע משנה () ("A1"). פנים.צבע = סוף משנה 
כאן אנו יכולים להשתמש בשמונה צבעים בעלי שם קבוע. להלן הרשימה של אותו דבר.
vbBlack, vbRed, vbGreen, vbBlue, vb Yellow, vbMagenta, vbCyan, vbWhiteבחר את סוג הצבע לפי רצונך.
קוד:
טווח צבע משנה () ("A1"). פנים.צבע = vbBlue סוף משנה 
אם אני מריץ קוד זה באמצעות מקש F5 או באופן ידני הוא ישנה את צבע הרקע של התא A1 ל- vbBlue.
ככה, אתה יכול להשתמש בצבעים קבועים אחרים עם שם. נסה להשתמש בהם כדי לבדוק את התוצאה.
מלבד 8 הצבעים הקבועים הללו, אנו יכולים גם למלא בצבעים שונים גם באמצעות פונקציית RGB ב- VBA.
קוד:
טווח צבע משנה () ("A1"). פנים.צבע = RGB (סוף משנה 
עלינו להזין את התערובת של אדום, ירוק וכחול במספרים. כדי להשתמש בזה אתה צריך להיות מושלם בהזנת המספרים. נכנסתי לתערובת כ- RGB (250, 200, 150).
קוד:
טווח צבע משנה () ("A1"). פנים.צבע = RGB (250, 200, 150) סוף משנה 
שינוי צבע זה הוא כזה.
הבעיה כאן היא שאתה לא יודע בדיוק איזה מספר מחזיק איזה צבע.
הקוד שלמטה הוא לשנות את צבע הגופן.
קוד:
טווח Sub Color_Font () ("A1"). Font.Color = RGB (100, 400, 100) Sub Sub 
הפעל קוד זה באמצעות מקש F5 או באופן ידני כדי לקבל את התוצאה.
# 2 - שימוש במאפיין אינדקס צבעים
אינדקס הצבעים שונה במקצת ממאפיין הצבע. במאפיין COLOR אנו משתמשים בשמונה צבעים קבועים הניתנים על ידי VBA וגם באמצעות פונקציית RGB אנו יוצרים צבע משלנו.
המאפיין COLOR INDEX מוגבל ב- VBA, והוא יכול להחזיק את הערכים בין 1 ל -56. כל מספר שבין 1 ל -56 מחזיק בצבעים שונים. להלן מספרי הרשימה וצבעיהם בהתאמה.
להלן קוד המאקרו לשינוי צבע הרקע של התא A1 לורוד.
קוד:
טווח Sub ColorIndex_Cell () ("A1"). Interior.ColorIndex = 26 Sub End 
הפעל קוד זה באופן ידני או השתמש במקש F5 כדי לראות את התוצאה.
להלן קוד המאקרו לשינוי צבע הגופן של התא A1 לצהוב.
קוד:
טווח משנה ColorIndex_Font () ("A1"). Font.ColorIndex = 27 סוף משנה 
הפעל קוד זה באמצעות מקש F5 או שתוכל לרוץ ידנית ולראות את התוצאה.
אחד הדברים החשובים שיש לזכור כאן הוא שנוכל להזין מספרים בין 1 ל -56. אם משהו יותר מ -56 נקבל את השגיאה "Subscript Out of Range".
האם התבוננת?
כפי שאמרתי מאפיין אינדקס הצבעים יכול להכניס רק 56 צבעים אך העובדה היא שהוא יכול להכניס רק 46 צבעים ייחודיים ויש 10 צבעים כפולים. להלן רשימת קודי הצבעים הכפולים.
