فاتورة الكهرباء

[سليم حاصبيا]

الكثير يتساءل عن كيفية حساب فاتورة الكهرباء مع شطورها
مثلاُ  دون 70 كيلو واط السعر 5 جنيه
       من  71 كيلو واط الى 80 السعر 8 جنيه
        من  81 كيلو واط الى 200 السعر 15 جنيه
       من 201 و ما فوق 17 جنيه
                                         كيف نحسب الفاتورة اذا كان الاستهلاك 550 كيلو واط مثلاً
هذا الملف يجيب عن هذا السؤال

الكود

 Function My_Facture(Myfact As Long, n1 As Integer, n2 As Integer, n3 As Integer, n4 As Integer) As Long
''''''''''''''''''''''''''''''''''''''''''
Select Case Myfact
        Case Is <= 70
          How_Many = Myfact * n1
        Case Is <= 80
          How_Many = (70 * n1) + (Myfact - 70) * n2
         Case Is <= 200
         How_Many = (70 * n1) + (10 * n2) + (Myfact - 80) * n3
        Case Is > 200
     How_Many = (70 * n1) + (10 * n2) + (120 * n3) + (Myfact - 200) * n4
  End Select
 
 My_Facture = How_Many
''''''''''''''''''''''''''''''''''''''''
 End Function

الملف مرفق

 

Facture_Electrique.xlsm

[Ali Mohamed Ali]

عمل رائع بارك الله فيك وجعله الله فى ميزان حسناتك

[احمد بدره]

عمل مبدع ومبتكر ودائمًا نتعلم منك الكثير جزاك الله خير

[على متولى]

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

[مهند محسن]

أحسنت استاذى الكريم بارك الله فيك

[ابوانس2013]

بارك الله فیك

 

[ridasanhaji]

السلام عليكم ورحمة الله وبركاتة 

أسال المولى عز وجل أن يكرمك بكل الرضى والسعادة

بارك الله فيك