تحويل التاريخ الميلادي الى ام القرى - هدية وبطريقة حصرية

[رمهان]

اعزائي رواد المنتدى الفاضل

 

اقدم لكم فكرة وطريقة في تحويل التاريخ الميلادي الى تاريخ ام القرى وهو الى حد ما التاريخ الهجري . وذلك باستخدام مكتبات الاكسل !

كما انه وعد مني للاخ والأستاذ أبو خليل وفي احد المناقشات وجب على الوفاء به ! وقد كانت هذه الفكرة طرحتها في احد المنتديات الشقيقة ولكن بدون مثال او تنفيذ .

اترككم مع المثال املا الاستفادة منه وطرح آراؤكم ومقترحاتكم البناءة !

لكم خالص تحياتي

Private Sub أمر4_Click()
''رمهان
'' اوفيسنا
''abc_2_me@hotmail.com
'' هدية للاخ ابو خليل
Set xl = CreateObject("Excel.Sheet")
xl.Application.Range("A1").Value = CDate(t2)
xl.Application.Range("A1").NumberFormat = "[$-1170000]B2yyyy-mm-dd;@"
t1 = xl.Application.Range("A1").Text
xl.Application.Quit
Set xl = Nothing
End Sub

رمهان - ام القرى.rar

[محمد سلامة]

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

طريقة فعلا جميلة وجديدة

وينك مختفي منذ فترة عن منتدي مملكة الاكسس

محمد سلامة

[رمهان]

بارك الله فيك اخي محمد سلامة

وشرفتني بمرورك !

وانا موجود هنا وهناك ! الواحد لما يكون عنده اكثر من بستان مش احسن والا ايه !

تحياتي

[ابوخليل]

مشكور اخوي رمهان 

هدية مقبولة ..  أهداك الله من الحور

 

جربت على الشهرين الاخيرين  محرم وصفر 1436  والنتيجة 100%

[yms12]

بارك الله فيك

[عبدالله المجرب]

ما شاء الله 

الاخ الفاضل رمهان سلمت يمينك على هذه الهدية القيمة

[يوسف أحمد]

رائع كالعادة استاذنا العزيز رمهان 

 

طريقة رائعة كروعتك

 

بارك الله فيك و نفع بعلمك

[سوبربرو]

بوركت استاذنا رمهان هدية رائعة 

[at_aziz]

بوركت استاذنا رمهان هدية رائعة 

[محمد سلامة]

في ٢١‏/٢‏/٢٠١٥ at 17:43, رمهان said:

اعزائي رواد المنتدى الفاضل

 

اقدم لكم فكرة وطريقة في تحويل التاريخ الميلادي الى تاريخ ام القرى وهو الى حد ما التاريخ الهجري . وذلك باستخدام مكتبات الاكسل !

كما انه وعد مني للاخ والأستاذ أبو خليل وفي احد المناقشات وجب على الوفاء به ! وقد كانت هذه الفكرة طرحتها في احد المنتديات الشقيقة ولكن بدون مثال او تنفيذ .

اترككم مع المثال املا الاستفادة منه وطرح آراؤكم ومقترحاتكم البناءة !

لكم خالص تحياتي

Private Sub أمر4_Click()
''رمهان
'' اوفيسنا
''abc_2_me@hotmail.com
'' هدية للاخ ابو خليل
Set xl = CreateObject("Excel.Sheet")
xl.Application.Range("A1").Value = CDate(t2)
xl.Application.Range("A1").NumberFormat = "[$-1170000]B2yyyy-mm-dd;@"
t1 = xl.Application.Range("A1").Text
xl.Application.Quit
Set xl = Nothing
End Sub

رمهان - ام القرى.rar

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

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

بمعني ادخال تاريخ ام القري يحوله الي ميلادي

هل من طريقة

[Shivan Rekany]

في ٢١‏/٢‏/٢٠١٥ at 18:43, رمهان said:

اعزائي رواد المنتدى الفاضل

 

اقدم لكم فكرة وطريقة في تحويل التاريخ الميلادي الى تاريخ ام القرى وهو الى حد ما التاريخ الهجري . وذلك باستخدام مكتبات الاكسل !

كما انه وعد مني للاخ والأستاذ أبو خليل وفي احد المناقشات وجب على الوفاء به ! وقد كانت هذه الفكرة طرحتها في احد المنتديات الشقيقة ولكن بدون مثال او تنفيذ .

اترككم مع المثال املا الاستفادة منه وطرح آراؤكم ومقترحاتكم البناءة !

لكم خالص تحياتي

Private Sub أمر4_Click()
''رمهان
'' اوفيسنا
''abc_2_me@hotmail.com
'' هدية للاخ ابو خليل
Set xl = CreateObject("Excel.Sheet")
xl.Application.Range("A1").Value = CDate(t2)
xl.Application.Range("A1").NumberFormat = "[$-1170000]B2yyyy-mm-dd;@"
t1 = xl.Application.Range("A1").Text
xl.Application.Quit
Set xl = Nothing
End Sub

رمهان - ام القرى.rar

ما شاء الله
بدون تعليق

[رمهان]

في 2/15/2017 at 23:57, محمد سلامة said:

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

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

بمعني ادخال تاريخ ام القري يحوله الي ميلادي

هل من طريقة

لم انساك

ولكن اعتقد دخولنا بحر الاكسل ونحن نجهل به جعلنا نغرق

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

ولكن هناك حل تقريبا ساجربه وارفعه قريبا ان شاء الله

تحياتي

[محمد سعيد رشاد]

صادفتنى هذه المشكله برجاء الحل ولكم جزيل الشكر

11.rar

[شريف ( أبو عبدالرحمن )]

عملت مشاركة لموضوع في المنتدي الرجاء مساعدتي ضروري 

فصل الكلام عن الارقام

عملت مشاركة لموضوع في المنتدي الرجاء مساعدتي ضروري 

فصل الكلام عن الارقام

 

[ابوخليل]

للفائدة اخوتي الكرام

التقويم الهجري

تقويم أم القرى

 

[رمهان]

9 ساعات مضت, محمد سعيد رشاد said:

صادفتنى هذه المشكله برجاء الحل ولكم جزيل الشكر

11.rar

يمكن الاكسل مش نازل على جهازك ؟

4 ساعات مضت, شريف ( أبو عبدالرحمن ) said:

عملت مشاركة لموضوع في المنتدي الرجاء مساعدتي ضروري 

فصل الكلام عن الارقام

عملت مشاركة لموضوع في المنتدي الرجاء مساعدتي ضروري 

فصل الكلام عن الارقام

 

اخي الكريم 

لافادتك افتح موضوعا جديدا زبه وصف اكثر للمشكلة

[محمد سلامة]

12 ساعات مضت, رمهان said:

لم انساك

ولكن اعتقد دخولنا بحر الاكسل ونحن نجهل به جعلنا نغرق

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

ولكن هناك حل تقريبا ساجربه وارفعه قريبا ان شاء الله

تحياتي

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

وربنا يسهل الحال

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

للفائدة اخوتي الكرام

التقويم الهجري

تقويم أم القرى

 

شكرا استاذنا ابو خليل

ولو عندك حل لتحويل التاريخ ام القري الي ميلادي.. ابقي شاكر جدا

[ابوخليل]

12 ساعات مضت, محمد سلامة said:

شكرا استاذنا ابو خليل

ولو عندك حل لتحويل التاريخ ام القري الي ميلادي.. ابقي شاكر جدا

هذا تحويل الى الميلادي بطريقتين

باستخدام  التاريخ الهجري  المجدول من اكسس

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

[رمهان]

في 3/15/2017 at 10:13, ابوخليل said:

هذا تحويل الى الميلادي بطريقتين

باستخدام  التاريخ الهجري  المجدول من اكسس

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

ممكن ايضاح اكثر استاذ ابو خليل حول المعدلة لموافقة ام القرى

لاني شايف الموضوع لهجري وميلادي فقط وحسب اخر ملف من الرابط السابق

تحياتي

[ابوخليل]

3 ساعات مضت, رمهان said:

لاني شايف الموضوع لهجري وميلادي فقط وحسب اخر ملف من الرابط السابق

حسب آخر ملف نعم هجري وميلادي ، انا وضحت ذلك وانه حسب جدول اكسس

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

[رمهان]

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

حسب آخر ملف نعم هجري وميلادي ، انا وضحت ذلك وانه حسب جدول اكسس

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

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

الموضوع هنا ام القرى والهجري هناك مشاركات قديمه هنا وفي منتديات شقيقه وكما تفضلتم به في الرابط السابق

وعلى ما اذكر كان هناك ملاحظة منك حول مشاركتي هنا باستخدام الاكسل وانها لم تنفع لتاريخ معين ذكرته انت في احد المشاركات ولكنني نسيته فياليت تعيد ذكره هنا ان ذكرت جزيتم خيرا

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

تحياتي

[ابوخليل]

اقتباس

وانا جالس احضر لعمل العكس كما طلب الاخ محمد سلامة بنفس الطريقة بالاكسل 

استفسار

هل  ميكروسوفت وضعت جدولين للتاريخ الهجري واحد لاكسس وآخر مختلف لاكسل ؟

[رمهان]

منذ ساعه, ابوخليل said:

استفسار

هل  ميكروسوفت وضعت جدولين للتاريخ الهجري واحد لاكسس وآخر مختلف لاكسل ؟

مافهمت وضع جدولين ؟ ما دخل الجداول . هل ميكروسوفت تستخدم الجداول للعمليه ؟ الله اعلم وافدنا بوركت 

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

 

[ابوخليل]

اقصد بالجدول : الجدول الزمني او الدالة الزمنية

اما مسألة قدرة اكسس واكسل فشي جديد علي ، فالذي اعرفه ان  وندوز هو المسؤول عن ذلك

لهذا  استفساري عن ميكروسوفت  هل وضعت دالة لتحويل التاريخ  تخص اكسل  واخرى لاكسس ؟

[رمهان]

13 دقائق مضت, ابوخليل said:

اقصد بالجدول : الجدول الزمني او الدالة الزمنية

اما مسألة قدرة اكسس واكسل فشي جديد علي ، فالذي اعرفه ان  وندوز هو المسؤول عن ذلك

لهذا  استفساري عن ميكروسوفت  هل وضعت دالة لتحويل التاريخ  تخص اكسل  واخرى لاكسس ؟

حسب علمي

الاكسل لديه القدره من ناحية التنسيق . فالتنسيق هو المسؤول اي يظهر التحويل شكلا وليس قيمةً . وهذا مافعلته انا في هذا الموضوع واصدت الشكل ان اخذ محتوى الخليه كنص .

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

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

تحياتي