الفرق بين عدد السنوات بالهجري

[أحمد82]

مرحبا

 

عندي استفسار بخصوص الفرق بين عدد السنوات بالهجري

 

 

 

عدد السنوات.rar

[Ali Mohamed Ali]

تفضل لك ما طلبت

 

عدد السنوات.xlsm

[أحمد82]

هل من الممكن أن أعمل السنين والشهور في خلية و احدة   يعني  3 سنوات و3 أشهر 

[Ali Mohamed Ali]

تفضل 

 

 

عدد السنوات.xlsm

[أحمد82]

يعطيك العافية الحين كيف اضيف الدالة عندي مستند اخر لا يوجد فيه هذه الدالة

[أحمد82]

دالة contdate

[Ali Mohamed Ali]

هذه دالة معرفة لابد من الضغط على Alt +f11

وفتح مديول جديد ثم وضع هذا الكود فيه

Function ContDate(MyDate1 As Date, MyDate2 As Date, YMD As String)
D1 = Day(MyDate1): D2 = Day(MyDate2)
M1 = Month(MyDate1): M2 = Month(MyDate2)
Y1 = Year(MyDate1): Y2 = Year(MyDate2)
If D1 > D2 Then Dr = D2 + 30 - D1: M = -1 Else Dr = D2 - D1
If M1 > M2 Then Mr = M2 + M + 12 - M1: Y = -1 Else Mr = M2 - M1
Yr = Y2 - Y1 + Y
If YMD = "D" Or YMD = "d" Then ContDate = Dr
If YMD = "M" Or YMD = "m" Then ContDate = Mr
If YMD = "Y" Or YMD = "y" Then ContDate = Yr
End Function

 

 

[أحمد82]

شكرا جزيلا استاذ علي

تم تعديل فبراير 5, 2019 بواسطه أحمد82
لا شيء

[أحمد82]

في ٤‏/٢‏/٢٠١٩ at 23:00, ali mohamed ali said:

اذا سحبت لبقية خلايا لا يستجيب لي تظهر عندي  474  ارقام وانا اريد عدد السنين فقط كيف طريقة سحب الخلايا ونسخ المعادلة لتظهر نفس النتيجة سنة واحدة

 

[Ali Mohamed Ali]

من فضلك عليك برفع الملف الذى به المشكلة للعمل على حلها ان شاء الله

[أحمد82]

اريد النسخ التلقائي بطريقة السحب

 

 

ححساب.rar

[Ali Mohamed Ali]

تفضل انظر الى المعادلة جيدا وحاول تفهمها لأننا قمنا بتثبيت خلية تاريخ اليوم بمعنى كتابة الخلية ثم الضغط على f4 لوضعها بين علامات الدولار كما ترى

 

ححساب.xlsm

[أحمد82]

أحسنت فعلا هذا ما افتقدته ، فلقد استخدمتُ طريقة تثبيت خاطئة ، حيث إني وضعت الدولار مكان خاطئ

 

بارك الله فيك

[Ali Mohamed Ali]

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

والحمد لله الذى بنعمته تتم الصالحات

 

[أحمد82]

 لو سمحت طبقت الكود نفسه في مكان العمل

 

وكلما ضبط وبدأت العمل اختفى الكود ما المشكلة في نظرك

[athal]

بارك الله فيكم