فبا: كيفية استخدام باي في العمليات الحسابية

في الرياضيات، باي هو عدد غير منطقي (عدد عشري لا نهاية له) يساوي تقريبًا 3.14.

لاستخدام Pi في العمليات الحسابية في VBA، يمكنك استخدام بناء الجملة التالي:

 Function MultiplyByPi(inputVal)

Dim Pi As Double

MultiplyByPi = inputVal * Application.WorksheetFunction.Pi()

End Function

تسمح لك هذه الوظيفة المحددة بضرب أي قيمة في Excel بواسطة Pi.

لاحظ أن Application.WorksheetFunction.Pi يُرجع القيمة 3.14159265358979 ، وهو ثابت Pi الدقيق المكون من 15 رقمًا.

إذا كنت بحاجة إلى عملية حسابية أكثر دقة من 15 رقمًا، فيمكنك ببساطة تشفير Pi بالعدد الذي تريده من الأرقام.

يوضح المثال التالي كيفية استخدام بناء الجملة هذا عمليًا.

مثال: كيفية استخدام Pi في VBA

لنفترض أن لدينا قائمة القيم التالية في Excel والتي نود ضربها في Pi:

للقيام بذلك، يمكننا إنشاء الوظيفة التالية في VBA:

 Function MultiplyByPi(inputVal)

Dim Pi As Double

MultiplyByPi = inputVal * Application.WorksheetFunction.Pi()

End Function

بمجرد إنشاء هذه الوظيفة، يمكننا بعد ذلك كتابة الصيغة التالية في الخلية B2 لضرب القيمة في الخلية A2 بـ Pi:

 =MultiplyByPi( A2 )

يمكننا بعد ذلك النقر على هذه الصيغة وسحبها إلى كل خلية متبقية في العمود B:

يعرض العمود B الآن كل قيمة في العمود A مضروبة في Pi.

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:

فبا: كيفية إضافة القيم في النطاق
فبا: كيفية حساب متوسط قيمة النطاق
فبا: كيفية حساب عدد الصفوف في النطاق