فبا: كيفية حساب الانحراف المعياري للنطاق
يمكنك استخدام بناء الجملة الأساسي التالي لحساب الانحراف المعياري للقيم في نطاق باستخدام VBA:
SubStDevRange ()
Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub
يحسب هذا المثال الانحراف المعياري للقيم في النطاق B2:B11 ويعين النتيجة للخلية D2 .
إذا كنت تريد بدلاً من ذلك عرض الانحراف المعياري للقيم في مربع الرسالة، فيمكنك استخدام بناء الجملة التالي:
SubStDevRange ()
'Create variable to store standard deviation of values
Dim stdev As Single
'Calculate standard deviation of values in range
stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
'Display the result
MsgBox " Standard Deviation of Values in Range: " & stdev
End Sub
توضح الأمثلة التالية كيفية استخدام كل من هذه الطرق عمليًا مع مجموعة البيانات التالية في Excel والتي تحتوي على معلومات حول لاعبي كرة السلة المختلفين:
مثال 1: حساب الانحراف المعياري للنطاق باستخدام VBA وعرض النتائج في الخلية
لنفترض أننا نريد حساب الانحراف المعياري للقيم في عمود النقاط وعرض النتائج في خلية معينة.
يمكننا إنشاء الماكرو التالي للقيام بذلك:
SubStDevRange ()
Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub
عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:
لاحظ أن الخلية D2 تحتوي على القيمة 11.93734 .
وهذا يخبرنا أن الانحراف المعياري للقيم في عمود النقاط هو 245.
مثال 2: حساب الانحراف المعياري للنطاق باستخدام VBA وعرض النتائج في مربع الرسالة
لنفترض أننا نريد بدلاً من ذلك حساب الانحراف المعياري للقيم في عمود النقاط وعرض النتائج في مربع رسالة.
يمكننا إنشاء الماكرو التالي للقيام بذلك:
SubStDevRange ()
'Create variable to store standard deviation of values
Dim stdev As Single
'Calculate standard deviation of values in range
stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
'Display the result
MsgBox " Standard Deviation of Values in Range: " & stdev
End Sub
عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:
يخبرنا مربع الرسالة أن الانحراف المعياري للقيم في النطاق B2:B11 هو 11.937 .
لاحظ أننا في هذا المثال قمنا بحساب الانحراف المعياري للقيم في النطاق B2:B11 .
ومع ذلك، إذا كنت تريد بدلاً من ذلك حساب الانحراف المعياري للقيم في عمود كامل، فيمكنك كتابة B:B بدلاً من ذلك.
سيؤدي هذا إلى حساب مجموع القيم لكل خلية في العمود B.
ملاحظة : يمكنك العثور على الوثائق الكاملة لأسلوب StDev VBA هنا .
مصادر إضافية
تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:
فبا: كيفية حساب متوسط قيمة النطاق
فبا: كيفية حساب عدد الصفوف في النطاق
فبا: كيفية كتابة وظائف SUMIF وSUMIFS