كيفية استخدام الدالة vba formatpercent؟

يتم إدراج الدالة VBA FORMATPERCENT في فئة تحويل نوع البيانات لوظائف VBA. عند استخدامه في التعليمات البرمجية لـ VBA، فإنه يقوم بإرجاع التعبير المقدم عن طريق تطبيق تنسيق النسبة المئوية عليه . بكلمات بسيطة، تقوم بإرجاع النتيجة بتنسيق النسبة المئوية كنوع بيانات سلسلة.

بناء الجملة

FormatPercent(Expression, [NumDigitsAfterDecimal], [IncludeLeadingDigit],[UseParensForNegativeNumbers], [GroupDigits])

الحجج

  • التعبير : التعبير الذي تريد تنسيقه.
  • [ NumDigitsAfterDecimal] : قيمة رقمية لتحديد المنازل العشرية [هذه وسيطة اختيارية وإذا تم حذفها، تكون القيمة الافتراضية هي -1].
  • [IncludeLeadingDigit] : قيمة تعداد لتحديد ما إذا كان يجب عرض صفر بادئ [هذه وسيطة اختيارية وإذا تم حذف VBA فسوف يستخدم vbUseDefault بشكل افتراضي].
    • vbFalse: ألا يسبقه صفر.
    • vbTrue: يعرض صفرًا بادئًا.
    • vbUseDefault: يستخدم الإعدادات الافتراضية.
  • [UseParensForNegativeNumbers] : قيمة تعداد لتحديد ما إذا كان يجب وضع الأرقام السالبة بين قوسين [هذه وسيطة اختيارية وإذا تم حذفها، سيستخدم VBA vbUseDefault بشكل افتراضي].
    • vbFalse: عدم وضع الأرقام السالبة بين قوسين.
    • vbTrue: ضع الأرقام السالبة بين قوسين.
    • vbUseDefault: يستخدم الإعدادات الافتراضية.
  • [GroupDigits] : قيمة تعداد لتحديد ما إذا كان يجب تجميع الرقم (إلى الآلاف، وما إلى ذلك)، باستخدام محدد المجموعة المحدد في لغة الكمبيوتر [هذه وسيطة اختيارية وما إذا تم حذفها، فسيستخدم VBA vbUseDefault افتراضيًا ].
    • vbFalse: لعدم استخدام الأرقام الموجودة في المجموعة.
    • vbTrue: لاستخدام الأرقام الموجودة في المجموعة.
    • vbUseDefault: يستخدم الإعدادات الافتراضية للكمبيوتر.

مثال

لفهم كيفية استخدام وظيفة VBA FORMATPERCENT بشكل عملي، يجب عليك الاطلاع على المثال أدناه حيث قمنا بكتابة كود vba باستخدامها:

example-vba-formatpercent-function
 Sub example_FORMATPERCENT() Range("B1").Value = FormatPercent(Range("A1")) End Sub

في التعليمات البرمجية أعلاه، استخدمنا FORMATPERCENT لتحويل القيمة في الخلية A1 إلى نسبة مئوية وإرجاع النتيجة في الخلية B1.

تعليقات

  • إذا كانت القيمة المحددة قيمة أخرى غير رقم أو سلسلة لا يمكن التعرف عليها كرقم، فسيقوم VBA بإرجاع خطأ وقت التشغيل 13.

اضف تعليق

لن يتم نشر عنوان بريدك الإلكتروني. الحقول الإلزامية مشار إليها بـ *