در مطلب قبلی در خصوص نحوه شمارش و جمع بستن سلول ها بر اساس رنگ پس زمینه سلول ها مطلبی را برای شما قرار دادم .
امروز  می خواهم در خصوص نحوه جمع و شمارش محتوای سلول ها بر اساس رنگ فونت آنها آموزشی را قرار دهم .

برای آشنایی با این روش در ادامه مطلب همراه من باشید .
 

برای این کارفایل خود را آماده نموده و  رنگ های مورد نظر را به فونت های خود اختصاص دهید

1. حال در محیط کاری اکسل کلید ترکیبی  ALT+F11  را فشار داده تا وارد محیط برنامه نویسی در اکسل شوید .
2. از منوی Insert  گزینه module را  انتخاب نمایید .
ماژول در اکسل
3. کدهای زیر را درون ماژول مربوطه کپی نموده و آن ا ذخیره نمایید .

count func

با انجام این کار و ذخیره ماژول تابعی به نام CountColor به لیست توابع  شما در اکسل اضافه می شود .شکل کلی این تابع به صورت زیر است :


Countcolor(Prange1;Prange2)

این تابع دارای دو ورودی می باشد .

Prange1:  شامل کل محدوده ای است که می خواهید بر مبنای رنگ فونت ،  آنها را شمارش نمایید .

Prange2: شامل سلولی است که بعنوان رنگ فونت مرجع به تابع معرفی می کنیم و می خواهیم سایر سلول هایی که فونت همرنگ با این سلول دارند شمرده شوند.

حال به محیط کاری اکسل رفته و درمحل مورد نظر برای شمارش سلول ها بر اساس رنگ فونت تابع مذکور  را فراخوانی کنید .

مثال :
می خواهیم در محدوده A1:C4 تعداد سلولهایی را که رنگ فونت آبی دارند  را شمارش نماییم .

count gif


برای جمع بستن سلول ها بر اساس رنگ فونت ، مراحل 1 تا 3 در بالا را تکرار و این بار کدهای زیر را درون ماژول قرار دهید با این کار تابعی به نام Sumbycolor با مشخصات زیر به لیست توابع شما اضافه می شود .
sum func
(Prange1;Prange2) sumbycolor

Prange1:  شامل کل محدوده ای است که می خواهید جمع آنها را بر مبنای رنگ فونت  آنها محاسبه   نمایید .

Prange2: شامل سلولی است که بعنوان رنگ فونت مرجع به تابع معرفی می کنیم و می خواهیم مقادیر  سایر سلول های
همرنگ با این سلول با هم جمع شوند .


مثال :
می خواهیم تمام سلولهایی که رنگ فونت آنها  آبی رنگ  است را با هم جمع کنیم
sum gif


فایل اکسل نمونه را به همراه کدهای مربوطه می توانید از طریق لینک زیر دانلود نمایید .



طبقه بندی: آموزش EXCEL، ترفند Excel ،
برچسب ها:نحوه جمع و شمارش محتوای سلول ها بر اساس رنگ فونت آنها، اکسل، ماژول، تابع کاربردی،
تاریخ : یکشنبه 2 مهر 1396 | 12:20 ب.ظ | نویسنده : امید شهری | نظرات()
.: Weblog Themes By Bia2skin :.