جمع سلول های رنگی در اکسل

0
Amir Farzanefar این مطلب رو نوشت. 03 آبان 1394

چگونه می توان بدون استفاده از قابلیت فیلتر کردن رنگها، جمع سلول هایی که رنگ خاصی دارند را بدست آورد؟؟؟؟

برای انجام اینکار از هیچ یک از توابع آماده اکسل نمی توان استفاده کرد و می بایست از توابع افزوده استفاده کرد. در اینجا می خواهیم یک تابع افزوده را به اکسل اضافه کنیم که حاصل جمع یک بازه از سلول ها را از روی رنگ آنها مشخص می کند.

1- برای انجام این کار بعد از باز کردن فایل اکسل کلید ترکیبی Alt+F11 را بزنید تا به محیط ویرایش VBA بروید.

2- در این محیط از پنجره سمت چپ روی گزینه Modules کلیک راست کنید و سپس از منوی بازشده گزینه Insert و بعد از زیر منوی باز شده گزینه Module را انتخاب کنید تا یک ماژول جدید ایجاد شود.

3- در پنجره خالی ایجاد شده کدهایی را که در تصویر زیر مشاهده می نمایید را وارد نمایید : enter image description here

4- حالا فایل خود را با پسوند xlam ذخیره نمایید. با این کار شما یک تابع افزوده ایجاد نمودید که نتنها برای خود، بلکه برای دیگران هم قابل استفاده است ( البته به شرط اینکه در تنظیمات اجازه اجرا به کدهای VBA داده شده باشد).

منبع : آقای حسین صابری

امیر فرزانه فر

8 نظرات
0
100557 این مطلب رو نوشت. 30 آبان 1394

سلام

اقای فرزانه فر ممنون بابت پست خوبتان لطفا متن تایپ شده کد VBA را در تالار قراردهید، البته اگر فایلی را که ایجاد کرده‌اید در اختیار کاربران تالار قراردهید که فوق العاده است.

samir karamkhani

1
Amir Farzanefar این مطلب رو نوشت. 30 آبان 1394

سلام آقای کرمخانی

تابع افزوده جمع سلولهای رنگی در اکسل

امیر فرزانه فر

0
100557 این مطلب رو نوشت. 11 آذر 1394

سلام

بابت فایل ارسالی ممنون هستم

با اجازه من فایل رو در فضای مجازی گوگل درایو اپلود کردم

https://drive.google.com/open?id=0B4LHnwkvjvbuMGhwMmctdXA4aUk

samir karamkhani

0
geramimehdi978@gmail.com این مطلب رو نوشت. 21 آبان 1397

باسلام من فرمول فوق رو اجرا کردم ولی جواب نداد. منظور از cell4color و sum-range چیه؟ اگه راهنمایی کنید ممنون میشم. خیلی ضروریه

0
geramimehdi978@gmail.com این مطلب رو نوشت. 21 آبان 1397

سلام آقای فرزانه فر و آقای کرمخانی میشه راهنمایی کنید . منظور از cell4color و sum-range چیه؟

0
geramimehdi978@gmail.com این مطلب رو نوشت. 21 آبان 1397

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

0
deltasina@yahoo.com این مطلب رو نوشت. 05 آذر 1397

با استفاده از فرمول - ساخت تابع جدید بوسیله ماکرونویسی

اکسل فرمول‌های مختلفی برای کاربردهای متفاوت دارد اما متاسفانه هیچ فرمولی وجود ندارد که امکان جمع زدن و یا شمارش برحسب رنگ را به ما بدهد. بنابراین باید با استفاده از ماکرو نویسی یک تابع جدید برای اکسل تعریف کرد.

فرض کنید در جدولی مشابه شکل زیر لیست سفارش‌های یک شرکت را دارید که در آن سلول‌ها در ستون Delivery برمبنای مقدار خود رنگ شده‌اند، سلول‌های Due in X Days نارنجی، Delivered سبز و Past Due قرمز هستند.

آنچه اکنون می‌خواهیم شمارش خودکار سلول‌ها برحسب رنگ است یعنی محاسبه تعداد سلول‌های قرمز، سبز و نارنجی.

آخرین ویرایش 12 دی 1397

0
100557 این مطلب رو نوشت. 18 آبان 1399

سلام
در مورد جمع خانه‌های رنگی در اکسل راه حل‌های متفاوتی ارائه شده که هرکس بنا به نیاز خودش از این راه حل‎ها استفاده میکند
از آنجایی که راه حل پیشنهادی قبلی راه حل خوب و قابل استفاده‌ای بود ضرورتی به ارائه راه حل دیگری نبود تا اینکه چند روز پیش گروه حسابرسی ما نیاز به شمارش و یافتن تعداد خانه‌های رنگی داشت هرچند در کاربرگ مربوطه با استفاده از شماره گزاری دستی رنگها مشکل حل شد ولی ارائه راه حل ساده تری ضروری به نظر می‌رسید در نتیجه ارائه راه حلی که بتواند تعداد خانه‌های رنگ شده را شمارش کند ضروری شد که با مطالعه تالار گفتگو متوجه این پست شدم، ظاهرا دیگران هم به این مشکل برخورد کرده بودن ولی با عرض پوزش به دلیل مشغله کاری من و همکارانم متوجه این پست نشده بودیم، ساده ترین روش استفاد از افزونه AbleBits Utility Pack است یکی ازامکاناتی که این افزونه به کاربر می‌دهد این است که بتواند جمع خانه‌های رنگ شده را به تفکیک رنگ محاسبه کند یا تعداد خانه‌های رنگ شده به یک رنگ خاص را ارائه کند. enter image description here یا رنگهای منتخب را انتخاب کنید enter image description here لینک این افزونه را در سایت soft98 با یک جستجوی ساده پیدا خواهید کرد برای استفاده از این افزونه کافی است مطابق با دستور العمل درج شده رد راهنمای نصب همراه نرم افزار آن را نصب کنید کار با نرم افزار هام ساده هست ولی اگر نیاز داشتید در این خصوص آموزش لازم نیز درج خواهد شد

آخرین ویرایش 18 آبان 1399

samir karamkhani


272 نفر از 981 عضو ما 1217 بار در مباحثه ها نظر ارسال کرده اند.