الأحد، 7 يوليو 2019

كيفية جمع خلايا متفرقة وغير مرتبة فى اى مكان فى ورقة العمل 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)
يقوم الكود (الماكرو) بجمع جميع الخلايا المحددة  وعمل متوسط حسابى لهم واستخراج اكبر قيمة واقل قيمة ايضا 
كود سهل وبسيط يقوم بعدد من العمليات الحسابية دفعة واحدة
لمعرفة معلومات اكثر عن الكود يرجى متايعة الشرح الفيديو


ليست هناك تعليقات:

إرسال تعليق

من نحن

authorمرحبا، أسمي عماد غازى وهذه مدونتي أسعى دائما لأقدم لكم أفضل المواضيع الخاصة بالاوفيس
المزيد عني →

التصنيفات

نموذج الاتصال

الاسم

بريد إلكتروني *

رسالة *

إجمالي مرات مشاهدة الصفحة