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

الرجاء المساعدة في حساب الفرق بين تاريخين بالهجري


slmlm

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

السلام عليكم

قمت بعمل دالة للتعرف على التاريخ الهجري وتحويله الى ميلادي للتعامل معه الدالة DATEDIF


Function MyDate(MyCel As String)

Calendar = vbCalHijri

If IsDate(MyCel) Then MyDate = CDate(MyCel)

End Function

جرب المرفق

الفرق بين تاريخين.rar

رابط هذا التعليق
شارك

يبدو ان دالة الاستاذ عبدالله هي الاصح لانها تتعامل مع التاريخ كسنوات هجرية

بينما تتعامل دالتي كميلادية وهناك فرق واضح

بارك الله فيك استاذ عبدالله

رابط هذا التعليق
شارك

الاستاذ عبدالله باقشير بعد التحيه

للاسف لم تنفع الداله معي لانها خاصة بحساب العمر

المطلوب هو ان تكون كل السنوات على اساس 360 يوم والاشهر 30 يوم

لان ما اريد حسابة هو خدمة الموظف بالتارخ الهجري

ارجو المساعدة

رابط هذا التعليق
شارك

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

بعد اذن استاذي الكبير عبدالله

واخي الحبيب ابو احمد

هذا فكرة اخرى للحل باستخدام الدوال

الفرق بين تاريخين هجري او ميلادي بالدوال.rar

رابط هذا التعليق
شارك

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

جرب المرفق

الفرق بين تاريخين.rar

  • Like 1
رابط هذا التعليق
شارك

  • 3 years later...
في ٤‏/٦‏/٢٠١٢ at 17:48, عبدالله باقشير said:

السلام عليكم

 

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

 

يمكن تنفع معاك

 

المرفق2003/2007

الفرق بين تاريخين.rar

استادي العزيز حاولت اكتب الدالة اكثر من مرة ولم تفلح محاولاتي بالنجاج ارجوا مساعدتي

رابط هذا التعليق
شارك

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