مساعده فى كشف حساب عميل

[عمرو السيد]

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

يوجد بالمرفق كشف حساب لعميل

وارجو من سيادتكم كيفيه خصم المبالغ المدفوعه من الرصيد الكلى خلال فتره معينه

ولقد حاولت كثيرا ولكن دون جدوى

اريد كود او معادله تقوم بعمل هذا

شكرا مسبقا لمن سيساعد وان لم يفعل فقد استفدت كثيرا من هذا المنتدى الراقى ومشرفيه

حساب عميل.rar

تم تعديل ديسمبر 4, 2011 بواسطه amroomo

[عمرو السيد]

بانتظار الرد وشكرا للجميع

تم تعديل ديسمبر 4, 2011 بواسطه amroomo

[عمرو السيد]

مثلا لدينا عميل رصيده 50 الف مقسمه على حسب استحقاقها

30يوم 60يوم و 90 يوم

اريد عندما يتم دفع جزء من المبلغ يتم خصمه من رصيد المده الاولى وهى 90 يوم ثم 60 يوم ثم 30 يوم

ارجو ان اكون وضحت المطلوب

والمرفق يوضح اكثر

شكرا لكم

تم تعديل ديسمبر 4, 2011 بواسطه amroomo

[عمرو السيد]

هل السوال صعب ام ماذا؟

وشكرا لكم جميعا

[يحيى حسين]

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

في الخلية C11 ضع المعادلة التالية

=IF(F11>C5,0,F11-C5)

في الخلية D11 ضع المعادلة التالية

=IF($F$11>SUM($C$5:D5),0,SUM($C$5:D5)-$F$11)

في الخلية E11 ضع المعادلة التالية

=IF($F$11>SUM($C$5:E5),0,SUM($C$5:E5)-$F$11-SUM($C$11:D11))

أرجو تجربتها و أعلمني بالنتيجة

[عمرو السيد]

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

وشكرا لمساعدتك

لكن لاتعمل المعادله بشكل صحيح عندما يكون المدفوع مثلا اقل من المستحق خلال 90 يوم

ولكن بعد فكرتك بالمعادلات جاتنى فكره عملها بلكود وكانت كالتالى

Sub acck()

With ActiveSheet

m = [b5]

n = m + [c5]

o = n + [d5]

p = o + [e5]

If [f11] <= m Then

[b11] = m - [f11]

[c11] = [c5]

[d11] = [d5]

[e11] = [e5]

ElseIf [f11] > m And [f11] <= n Then

[b11] = 0

[c11] = n - [f11]

[d11] = [d5]

[e11] = [e5]

ElseIf [f11] > n And [f11] <= o Then

[b11] = 0

[c11] = 0

[d11] = o - [f11]

[e11] = [e5]

ElseIf [f11] > o Then

[b11] = 0

[c11] = 0

[d11] = 0

[e11] = p - [f11]


End If

End With

End Sub

لكن اريد ايضا عملها بالمعادلات وشكرا مره اخرى

حساب عميل2.rar

[يحيى حسين]

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

شاهد الملف المرفق

حساب عميل.rar

حساب عميل.rar