استخراج الشهور من مجموع ايام

[احمد حبيبه]

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

اساتذتى الاعزاء

عندى خليه تجمع فيها الايام

وليكن مثلا 129 يوم .... عايز اقسمهم كام شهر وكام يوم

اشكركم جدا وتحياتي للمنتدى الرائع

[ابوخليل]

وعليكم السلام

Dim i1, i2 As Double
Dim i3
i1 = 129 \ 30
i2 = 129 Mod 30
i3 = i1 & "أشهر" & " " & "و" & " " & i2 & "أيام"
MsgBox i3

 

[احمد حبيبه]

2 ساعات مضت, ابوخليل said:

وعليكم السلام

Dim i1, i2 As Double
Dim i3
i1 = 129 \ 30
i2 = 129 Mod 30
i3 = i1 & "أشهر" & " " & "و" & " " & i2 & "أيام"
MsgBox i3

 

استاذى الحبيب ابو خليل

اشكرك جدا جدا

لكن اخى الكريم انا محتاج معادله فى استعلام تستخرج عدد الشهور فى حقل وعدد الايام فى حقل

والامر الثاني رقم 129 غير ثابت ممكن يزيد مع موظف ويقل مع اخر

dayess.mdb

تم تعديل يناير 19, 2021 بواسطه احمد حبيبه

[ابوخليل]

انا كتبت لك الصيغة  واظهرت لك رسالة حتى ترى النتيجة

وللتطبيق فمثلا في الاستعلام اذا اعتبرنا حقل القيمة اسمه total

imonths:[total]\30
idays : [total] Mod 30

 

dayess.mdb

[احمد حبيبه]

احسنت اخى الحبيب

جزاك الله خيرا 

كله تمام الحمد لله ... اشكرك جدا