اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

لو سمحت انا عايز اعرف الدالة المستخدمة ف هذه الحالة ..
حساب قيمة الاستهلاك مع العلم ان  فارق القراءة معلوم والشروط هى  5 ريال لل 70 وات الاولى .. 9 ريال لل 80 وات التالية..15 ريال لل 200 وات التالية و 17 ريال لما زاد عن ذلك

اخوكم ما زال يدرس المحاسبة الرجاء ساعدونى :)

Screenshot001.jpg

  • Like 1
قام بنشر

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

بارك الله فيك الأخ الكريم مختار البركاني على المعادلّة التي أراها موفّقة بإذن الله .. جزاك الله خيرا و زادها بميزان حسناتك

5612df1d21857___.thumb.gif.0b50030245272

 

  • Like 2
قام بنشر
اشكركم جميعا واشكرك استاذى مختار البركانى على المعادلة السهل والبسيطة للموضوع وهذا المنتدى من افضل المنتديات التى تخص هذا المجال وذلك بفضل الاعضاء الكرام ربنا يحفظكم جميعا 

 

  • Like 1
قام بنشر

 استبدل الكود بهذا

 Function myfacteur(Myfact As Long, n1 As Integer, n2 As Integer, n3 As Integer, n4 As Integer) As Long
''''''''''''''''''''''''''''''''''''''''''
Select Case Myfact
        Case 0 To 70
          How_Many = Myfact * n1
        Case 70.00001 To 80
          How_Many = (70 * n1) + (Myfact - 70) * n2
        
        Case 80.0001 To 200
         How_Many = (70 * n1) + (10 * n2) + (Myfact - 80) * n3
       Case Is > 200.001
     How_Many = (70 * n1) + (10 * n2) + (120 * n3) + (Myfact - 200) * n4
 End Select
 
 myfacteur = How_Many
''''''''''''''''''''''''''''''''''''''''
 End Function

و يكون شكل المعادلة الجديدة

=myfacteur(f3,5,9,15,17)

 

  • Like 3
قام بنشر
في ٦‏/١٠‏/٢٠١٥ at 19:48, سلطان مختار said:

هذا الشغل الممتاز

جزاك الله خير استاذ سليم حاصبيا

الكود رائع

لي ملاحظة وهي ان القيم المتغيرات ثلاث قيم

5 ل 70 وما دون

9 ل 80 وما دون

15 ل 200 وما دون

17 ل اعلى من 200

حاولت اعدل بالكود لم استطيع

 

هي بالتتالي

الاولي  ٧٠ وحدة 

التأليه ٨٠ وحدة من بعد ال ٧٠ الاولى

التالية ٢٠٠ وحدة من بعد ال ١٥٠ السابقة

التالية اكثر من ٣٥٠ وحدة السابقة

وفعلا اخر ملف نفذها بدقة 

لكود الاستاذ الرائع سليم حاصبيا

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information