انشاء سلسلة تواريخ فى جدول

[mohamed_m]

السلام عليكم لدى جدول اريد فى اول حقل من كل سجل اضع تاريخ (ليس شرط تاريخ اليوم  دائما تاريخ سابق) وفى الحقل الاول من السجل التالى يظهر التاريخ التالى

مثال

01/07/2016

02/07/2016

03/07/2016

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

[سعيد صواب]

حياك الله اخي الكريم 

استخدم دالة Dateadd لإضافة يوم للتاريخ الأول وبعدد السجلات التي تريد اضافتها 

مع استخدم احد دوال اللوب ... وهكذا

اذا لم تتضح الصورة اضف مرفق للتعديل عليه.

بالتوفيق

[mohamed_m]

3 ساعات مضت, سعيد صواب said:

حياك الله اخي الكريم 

استخدم دالة Dateadd لإضافة يوم للتاريخ الأول وبعدد السجلات التي تريد اضافتها 

مع استخدم احد دوال اللوب ... وهكذا

اذا لم تتضح الصورة اضف مرفق للتعديل عليه.

بالتوفيق

جزاك الله خيرا يا أخى على المساعدة

حاولت ان اعمل ما قلت لكنى غير متمكن من الدالة 

ارفقت لك ملف

Test.rar

[صالح حمادي]

السلام عليكم بعد إذنك أخي سعيد

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

 

سلسلة تواريخ.rar

[mohamed_m]

22 دقائق مضت, صالح حمادي said:

السلام عليكم بعد إذنك أخي سعيد

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

 

سلسلة تواريخ.rar

جزاك الله خيرا اخى صالح ولكن عندما افتح الملف تظهر رسالة  خطأ وعندما احاول الدخول للحدث  ارفقتها لك 

[صالح حمادي]

تفضل أخي هذا هو الملف بعد إصلاحه.

Me.num = CurrentRecord
On Error Resume Next
Dim ss As Date
If Me.num > 1 Then
ss = DLookup("[ÇáÊÇÑíÎ]", "tbl", "num=" & [num] - 1) + 1
Me.dat = ss
Me.dat.Enabled = False
Else
Me.dat.Enabled = True
End If

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

 

 

سلسلة تواريخ.rar

[mohamed_m]

5 دقائق مضت, صالح حمادي said:

تفضل أخي هذا هو الملف بعد إصلاحه.

Me.num = CurrentRecord
On Error Resume Next
Dim ss As Date
If Me.num > 1 Then
ss = DLookup("[ÇáÊÇÑíÎ]", "tbl", "num=" & [num] - 1) + 1
Me.dat = ss
Me.dat.Enabled = False
Else
Me.dat.Enabled = True
End If

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

 

 

سلسلة تواريخ.rar

جزاك الله خيرا كثيراً وسقيت من الكوثر هذا ما كنت اريد

ان لم يكن بها ازعاج اذا  اردت ان تظهر التواريخ الخاصة بكل شهر مستقلة كأن اقول يناير تظهر التواريخ الخاصة به من 1 الى و31

فالحل المتوفر لدى ان اقوم بانشاء جدول الشهور واكتب كود الشهر واسم الشهر وأنشأ علاقة بينة وبين هذا الجدولone to many 

فهل هذا الحل صحيح أم هناك أفضل ؟ 

[صالح حمادي]

آميين يا رب العالمين اللهم أسقي جميع المؤمنين شربة هنيئة لا نظمأ بعدها أبدا يا رب العالمين.

أنا لم أفهم ما تقصده جيدا لكن ربما يكون هذا الحل.

أطلع جيدا على الملف و أخبرني أو أعد شرح المطلوب.

بالتوفيق...

 

 

سلسلة تواريخ.rar

[mohamed_m]

7 ساعات مضت, صالح حمادي said:

آميين يا رب العالمين اللهم أسقي جميع المؤمنين شربة هنيئة لا نظمأ بعدها أبدا يا رب العالمين.

أنا لم أفهم ما تقصده جيدا لكن ربما يكون هذا الحل.

أطلع جيدا على الملف و أخبرني أو أعد شرح المطلوب.

بالتوفيق...

 

 

سلسلة تواريخ.rar

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

والله يا اخى اخجل واشعر انى اثقلت عليكم ولكن منكم نتعلم

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

ارفقت مثال 

سلسلة تواريخ.rar

[صالح حمادي]

لا حول و لا قوة إلا بالله.

يا أخي العزيز لا خجل في طلب العلم كلنا نتعلم من هذا المنتدى جازى الله كل القائمين عليه الجنة إن شاء الله. فأنا أيضا مثلك مازلت مبتدى أتعلم الأكسس. الله يوفقك إن شاء الله. أنت ما عليك إلا أن تجتهد و تدعو لجميع أعضاء النادي بظهر الغيب لعلى الله يستجيب لدعائك.

أما بالنسبة لملفك فقد أجريت النعديل المطلوب تفضل.

 

 

سلسلة تواريخ.rar

[mohamed_m]

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

تعلمت منك الكثير

 

[صالح حمادي]

بالنوفيق للجميع إن شاء الله