استخراج السنة من التاريخ

[العبيدي رعد]

السلام عليكم

عندي تكست بوكس  للسنة  اريد إملاء الحقل
بحسب  حقل التاريخ .... تكست بوكس التاريخ  t4
واسم حقل التاريخ بالجدول  datee

[Foksh]

Format([t4],"yyyy")

 

[العبيدي رعد]

انا لدي جدول  من 2017   ومستمر بالادخالات
اريد عند  كتابتي  في حقل التاريخ  تظر السنة  في  تكست بوكس
مثال 23/10/2023   يكتب  2023 
اين  اضع  المعيار  ؟

[Foksh]

هذا مثال بسيط

 

Year_2023.accdb

[Ahmed_J]

السلام عليكم

بالاضافة لمثال للاستاذ @Foksh

ضع الكود التالي بعد التحديث

Private Sub Text0_AfterUpdate()
Me.Text2 = Year([Text0])
End Sub

 

test.accdb

تم تعديل نوفمبر 18, 2023 بواسطه Ahmed_J

[العبيدي رعد]

شكرا  جزيلا  لكليكما 
في مثال  الاستاذ @Foksh  اريد  ان احفظ السنة في الجدول  ... وهذا  الأمر لايتلائم 
وفي حدث الاستاذ @Ahmed_J  يتم اجراء اللازم  لكن  يعطي رسالة
لذا  وضعت الكود  في حدث عند النقر 

[Foksh]

منذ ساعه, العبيدي رعد said:

شكرا  جزيلا  لكليكما 
في مثال  الاستاذ @Foksh  اريد  ان احفظ السنة في الجدول  ... وهذا  الأمر لايتلائم 
وفي حدث الاستاذ @Ahmed_J  يتم اجراء اللازم  لكن  يعطي رسالة
لذا  وضعت الكود  في حدث عند النقر 

بداية اخي المهم إنك حصلت على ما تريد في نهاية المطاف ، ولكن عادة نتمنى الشرح الكامل لما تريد حتى تحصل عليه 😉

ولكن من باب الفضول ، وحتى استفيد من تجربتك ( كيف لا يتلائم ) 😅.

 

[العبيدي رعد]

في 15‏/5‏/2023 at 18:09, دروب مبرمج said:

التعديل كان على نموذج ثاني

هذا طلبك

التعديل بكلمة 2rar.zip 97.66 kB · 1 download

 

20 ساعات مضت, Foksh said:

Format([t4],"yyyy")

 

 

17 ساعات مضت, Ahmed_J said:

السلام عليكم

بالاضافة لمثال للاستاذ @Foksh

ضع الكود التالي بعد التحديث

Private Sub Text0_AfterUpdate()
Me.Text2 = Year([Text0])
End Sub

 

test.accdb 612 kB · 1 download

 

40 دقائق مضت, Foksh said:

بداية اخي المهم إنك حصلت على ما تريد في نهاية المطاف ، ولكن عادة نتمنى الشرح الكامل لما تريد حتى تحصل عليه 😉

ولكن من باب الفضول ، وحتى استفيد من تجربتك ( كيف لا يتلائم ) 😅.

 

كل الشكر والتقدير  لجنابكم  الكريم