کار با رنگ ها در اکسل با استفاده از کدهای VBA
- آخرین بروزرسانی: 31 اردیبهشت 1402
کار با رنگ ها در اکسل با استفاده از کدهای VBA این هم یک آموزش رایگان اکسل در دسته بندی بانک کد VBA در اکسل
در خدمت شما کاربران سایت آکادمی روح الله هستم
شما با دیدن این آموزش رایگان اکسل می توانید به راحتی در هر قسمت از نرم افزار های که در اکسل طراحی می کنید با استفاده از کد رنگ مورد نظر با یک کلیک رنگ مورد نظر
خود را در برنامه های که طراحی کردین اضافه و استفاده نمایید.
شما با دیدن فیلم آموزشی بالا به صورت کامل یاد خواهید گرفت با کد نویسی vba اکسل چطور کار خواهید کرد.
برای تنظیم رنگ پس زمینه سلول با استفاده از کد عددی، می توانید از خصوصیت ColorIndex در محدوده سلولی که می خواهید رنگ پس زمینه آن تغییر کند، استفاده کنید.
شما می توانید از مقادیر ColorIndex مختلفی برای تنظیم رنگ پس زمینه سلول استفاده کنید، به شرح زیر:
- 0: بدون رنگ (سفید)
- 1: سفید
- 2: سیاه
- 3: قرمز
- 4: سبز
- 5: آبی
- 6: زرد
- 7: بنفش
- و غیره…
کار با رنگ ها در اکسل با استفاده از کدهای VBA
1 2 3 |
Sub ColorIndex() Range("A1:A10").Interior.ColorIndex = 3 End Sub |
کار با رنگ ها در اکسل با استفاده از کدهای VBA
در این کد، “A1” محدوده سلولی است که می خواهید رنگ پس زمینه آن تغییر کند، و عدد 3 به معنی رنگ قرمز است. شما می توانید عدد دیگری برای تنظیم رنگ پس زمینه سلول استفاده کنید، به شرطی که مقدار آن در مجموعه مقادیر ColorIndex موجود باشد.
لازم به ذکر است که استفاده از کد عددی برای تنظیم رنگ پس زمینه سلول، ممکن است باعث ایجاد ناهماهنگی در رنگ ها بین نسخه های مختلف اکسل شود. بهتر است برای تنظیم رنگ پس زمینه سلول از کد رنگ های نام گذاری شده (مانند کد رنگی که در پاسخ قبلی ذکر شد) استفاده کنید.
برای تنظیم رنگ پس زمینه سلول به عنوان مثال به رنگ قرمز با استفاده از کد عددی، می توانید از کد زیر استفاده کنید:
کدهای رنگ در VBA برای تغییر رنگ سلول ها، پس زمینه و قلم متن استفاده میشوند. رنگها در VBA با استفاده از کد های RGB یا با نام رنگ مشخص می شوند. در زیر به توضیح کامل این کدها می پردازیم.
استفاده از کد RGB
در کد RGB، هر رنگ با یک کد سه رقمی مشخص می شود که شامل سه رنگ اصلی (قرمز، سبز و آبی) است. مقادیر هر کد بین 0 تا 255 می باشد. برای مثال، کد RGB برای رنگ سفید به صورت زیر است:
1 |
RGB(255, 255, 255) |
که به ترتیب نماینده رنگ قرمز، سبز و آبی است.
به طور مشابه، کدهای RGB برای برخی از رنگ های دیگر به صورت زیر می باشد:
کار با رنگ ها در اکسل با استفاده از کدهای VBA
برای تغییر رنگ سلول می توان از دستور زیر استفاده کرد:
1 |
Range("A1").Interior.Color = RGB(255, 255, 255) 'تغییر رنگ پس زمینه سلول به سفید |
و برای تغییر رنگ متن در یک سلول:
1 |
Range("A1").Font.Color = RGB(255, , ) 'تغییر رنگ متن سلول به قرمز |
استفاده از نام رنگ
همچنین می توان از نام رنگ های پیش فرض در VBA استفاده کرد. برای این کار، ابتدا باید به کتابخانه VBA مربوطه را اضافه کرد:
1 2 3 4 5 6 7 8 |
Option Explicit Public Enum vbColor vbBlack = & vbRed = 255& vbGreen = 65280& vbYellow = 65535& vbBlue = 16711680& vbMagenta = |
سلام استاد ، چگونه میتونم دی ریک سلول یک عدد 4 رقمی بنویسم که دو رقم اول اون بی رنگ یا رنگ دیگه ای باشه؟؟؟ ممنون میشم راهنماییم کنید.
سلام سلام ارادت خدمت شما دوست عزیز
برای دی ریکت کردن یک سلول اکسل به شکلی که دو رقم اول آن بی رنگ یا با رنگ دیگری باشند، میتوانید از قوانین قالببندی شرطی (Conditional Formatting) در اکسل استفاده کنید. در اینجا نحوه انجام این کار را توضیح میدهم:
1. ابتدا متن/عدد مورد نظر را وارد سلول مربوطه کنید.
2. سلول را انتخاب کنید (با کلیک راست روی سلول).
3. در منوی “صفحه اصلی” (Home) به قسمت “قالببندی شرطی” (Conditional Formatting) بروید.
4. در این قسمت، گزینه “نقشه رنگی تاییدیه” (Color Scales) را انتخاب کنید.
5. در منوی باز شده، یکی از قالبهای نقشه رنگی انتخاب کنید که به نیاز شما میخورد. برای مثال، میتوانید گزینه “سه رنگ از تیره به روشن” (3-Color Scale) را انتخاب کنید.
6. پس از انتخاب قالب، مقادیر حداقل و حداکثر را برای رنگهای مختلف تعیین کنید. برای مثال، میتوانید حداقل را 1000 و حداکثر را 9999 قرار دهید و رنگهای دیگر را به ترتیب تعیین کنید.
7. با کلیک بر روی “تأیید” (OK)، قالببندی شرطی اعمال میشود و سلول مورد نظر به تناسب با مقدار داخلی آن، رنگ میگیرد.
با انجام این مراحل، سلول مورد نظر دیگری رنگ دار نخواهد بود و تغییر رنگ بر اساس دو رقم اول عدد 4 رقمی داخل سلول انجام میشود.
موفق باشید