-->

كيفية جمع خلايا متفرقة وغير مرتبة فى اى مكان فى ورقة العمل How to sum selected cells in excel vba

بسم الله الرحمن الرحيم
اهلا بحضراتكم متابعى موقع ومدونة عالم الاوفيس
كيفية جمع اى خلايا متفرقة فى اى مكان فى ورقة العمل

درس اليوم هو سؤال لاحد الاصدقاء عن كيفية جمع اى عدد محدد من الخلايا  فى اى مكان من ورقة العمل من خلال vba ؟

وللاجابة عن هذا السؤال سنحتاج الى كتابة كود vbaبسيط جدا
وفى هذا الكود سنقوم باخبار الاكسل اننا عندما نحدد اى مجموعة من الخلايا فى ورقة العمل يقوم بجمع القيم المحددة وعمل متوسط حسابى وعمل احصاء لعدد القيم واستخراج اكبر قيمة فى مجموعة القيم المحددة واستخراج ايضا اقل قيمة .
والان ناتى الى كتابة الكود المستخدم للاجابة عن هذا السؤال 



لنفرض اننا نريد اظهار النتائج فى الخلية  b1,b2,b3,b4,b5 
[b1].Value = Application.WorksheetFunction.Sum(Selection)
[b2].Value = Application.WorksheetFunction.Average(Selection)
[b3].Value = Application.WorksheetFunction.Max(Selection)
[b4].Value = Application.WorksheetFunction.Min(Selection)
[b5].Value = Application.WorksheetFunction.Count(Selection)
يقوم الكود (الماكرو) بجمع جميع الخلايا المحددة  وعمل متوسط حسابى لهم واستخراج اكبر قيمة واقل قيمة ايضا 
كود سهل وبسيط يقوم بعدد من العمليات الحسابية دفعة واحدة
لمعرفة معلومات اكثر عن الكود يرجى متايعة الشرح الفيديو


Emad ghazi
كاتب المقالة
كاتب ومحرر اخبار اعمل في موقع عالم الاوفيس .

جديد قسم : اكسل متقدم

إرسال تعليق