تحويل اسم اليوم الي تاريخ

[الحلبي]

السلام عليكم 

حقل نص مكتوب فيه اسم اليوم ماهو الكود او الدالة التي يمكن في حقل اخر وليكن اسمه x مثلا تحويل اسم اليوم الي تاريخ من الاسبوع الحالي

الحقل الاول مكتوب فيه الجمعة كيف نجعل الحق الثاني مكتوب فيه 16/08/2019

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

[عبد اللطيف سلوم]

جرب هيك شوف هذا المطلوب

New Microsoft Access قاعدة بيانات.accdb

[الحلبي]

استاذي / ابو اشرف 

حياك الله جميل منك المحاولة اسعد الله اوقاتكم بما تقدمه من مساعدات 

ولكن اخي الفاضل / عبد اللطيف ماذا بعد شهر (8) وجاء شهر (9)

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

اكرمك الله وكل الاحترام لكم 

[kha9009lid]

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

[الحلبي]

استاذنا وخبيرنا الاستاذ / @kha9009lid

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

شوف كان لي موضع سابق عن ايام حضور المهندسين وافادني الاستاذ (مروض الاكسس ) المهندس / ابا جودي اسم المشاركة (تحديد مواعيد المهندسين)

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

وحين يوضح خبير مثلكم بان استخلص اسم اليوم من التاريخ معناه اني مخطئ وسؤالي في غير مكانه ويفضل ان اراجع سؤالي مرة اخري

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

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

بمناسبة ذكر اسم مهندسنا ابا جودي ياتري غيابة عن المنتدي خير ان شاء الله

 

[kha9009lid]

لا ما قصدت ابدا انك مخطئ ولا السؤال في غير مكانة كان مجرد استفسار فقط

بخصوص المقترحات صعب بدون الاطلاع على البرنامج

 

تم تعديل أغسطس 16, 2019 بواسطه kha9009lid

[الحلبي]

لا لا استاذي الفاضل انا اعلم انك لا تقصد 

انا اراجع نفسي طالما استاذ وخبير مثلكم يشير او يوحي بفكرة مثل ماتفضلت معناه ان محاولاتي قاصرة (وهذا ليس بعيب) وانت اوحيت لي بفكرة تانية وهذا مجرد اقتراح منكم وكلامك مصبوط ومقنع جدا وطالما الاستاذ يتكلم فعلى الطالب ان يستمع وينصت  ....هذا الذي قصده انكم اوحيتم لي بفكرة ثانية فقط

والله انك انسان متواضع ومحترم والله ادعو لكم بعلو الشأن ودوام الصحة والعافية

[ابو ياسين المشولي]

محاوله مع الاخوة

New Microsoft Access قاعدة بيانات (5).accdb

[الحلبي]

اخي واستاذي الفاضل / @ابو ياسين المشولي

محاولة صائبة ومفيده جدا جدا  اخي / محمد   جزاك الله خير وبارك الله فيك

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

لعل وعسى اصل الى هدفنا.

والله يا جماعة الخير لا يسعني الا ان اقول لكم زادكم الله علما ونفعكم به

[ابو عارف]

و هذا محاولة ايضا كما قال أخي ابو ياسين 

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

New Microsoft Access قاعدة بيانات (5).accdb

[الحلبي]

الاستاذ والخبير الفاضل/ ابو عارف

ايه ده ـ ما هذا ـ رائع رائع رائع حقيقي خبير طال الله عمرك وبارك في اسرتك وزادك الله علما

هذا المطلوب

اولا اعتذر لاني لم اري مداخلتكم الا الان وكانت فيها الشفاء العاجل

هناك ملاحظة صغيرة  دعني اتفاخر باني اعدل على استاذ كبير مثلك  وهي عند ادخال يوم السبت مثلا يعطي التاريخ اليوم التالي يعني يعطي 18/8/2019 مع انه الصيحيح 17/08/2019

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

DT = Date - Weekday(Date) + x - 1

واضفت -1 والنتيجة كانت سليمة ايه رايك بقي

[ابو عارف]

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

اولا اعتذر لاني لم اري مداخلتكم الا الان وكانت فيها الشفاء العاجل

الحمد لله على ايجاد مطلوب 

 

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

هناك ملاحظة صغيرة  دعني اتفاخر باني اعدل على استاذ كبير مثلك  وهي عند ادخال يوم السبت مثلا يعطي التاريخ اليوم التالي يعني يعطي 18/8/2019 مع انه الصيحيح 17/08/2019

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

كلامك صحيح اخي و انا اعتذر جدا لعدم انتباهي للتاريخ  على بالي تاريخ اليوم 19 ولكن عند شراء كرت تعبئة من مكينة الكروت ، وجدت تاريخ اليوم 18 و الآن فتحت الجهاز حتى اقوم بتعديل الكود بطريقة :

Function DayDate(Num As String) As Date
Dim x As String
Dim DT As Date
Select Case Num
Case "السبت", "Saturday"
x = 0
Case "الأحد", "Sunday"
x = 1
Case "الإثنين", "Monday"
x = 2
Case "الثلاثاء", "Tuesday"
x = 3
Case "الأربعاء", "Wednesday"
x = 4
Case "الخميس", "Thursday"
x = 5
Case "الجمعة", "Friday"
x = 6
Case Else
x = ""
End Select
DT = Date - Weekday(Date) + x
DayDate = DT

End Function

و تعديلك صحيح ايضا

[الحلبي]

اقتباس

و تعديلك صحيح ايضا

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

طبعا انا اخذت بالتعديل الذي قمتم به وليس تعديلي

رزقكم الله بكل الخير وجعلكم اكثر تواضعا 

كل الاحترام والتقدير لاستاذنا وخبيرنا / ابو عارف