اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

الاخوه الافاضل بقاعدة بياناتى يوجد اجازات مرضى متتاليه اريد عند طباعة التقرير ان تظهر اخر اجازه مرضى قد اخذت فقط و ان يتجاهل الباقى بمعنى ان الموظف قد اخد خمس اجازات مرضى بفترات مختلفه اريد طباعة

 التقرير باخر مده قد اخذها فقط

و هل توجد طريقه للترقيم من جديد بالتقارير وتجاهل الترقيم الموجود بالجدول

قاعدة البيانات 
http://www.mediafire.com/file/icff3gfcbull3b9/Sickness.rar

  • Like 1
قام بنشر

ده اللى قدرت اوصل ليه مقارب للمطلوب ولكن خاص بالاكسيل ولا يفيد فى التقرير
 

Sub sbLastRowOfAColumn()
'Find the last Row with data in a Column
'In this example we are finding the last row of column A
Dim lastRow As Long
With ActiveSheet
lastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
MsgBox lastRow
End Sub
قام بنشر
  في 5‏/2‏/2017 at 17:56, 99عمرو said:

هل توجد طريقه للترقيم من جديد بالتقارير وتجاهل الترقيم الموجود بالجدول

Expand  

نعم
اعمل مربع جديد في التقرير
واكتب فيها = 1
وفي قائمه‌ خصائصه
غير خاصية Running Sum من No الى Over Group

  في 5‏/2‏/2017 at 17:56, 99عمرو said:

 اريد عند طباعة التقرير ان تظهر اخر اجازه مرضى قد اخذت فقط و ان يتجاهل الباقى بمعنى ان الموظف قد اخد خمس اجازات مرضى بفترات مختلفه اريد طباعة

 التقرير باخر مده قد اخذها فقط

Expand  

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

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

  • Like 3
قام بنشر
  في 6‏/2‏/2017 at 05:43, Shivan Rekany said:

نعم
اعمل مربع جديد في التقرير
واكتب فيها = 1
وفي قائمه‌ خصائصه
غير خاصية Running Sum من No الى Over Group

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

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

Expand  

سلمت يداك اخى شفان الترقيم تمام 
وبالنسبه للجداول انا بالفعل سانشىء جدول خاص للبيانات والجدول الاتى هو للاجازات فقط ولكن لم افهم الماكس من الاستعلام لان كل موظف له اكثر من عمود للاجازات 

قام بنشر
  في 6‏/2‏/2017 at 06:01, 99عمرو said:

سلمت يداك اخى شفان الترقيم تمام 
وبالنسبه للجداول انا بالفعل سانشىء جدول خاص للبيانات والجدول الاتى هو للاجازات فقط ولكن لم افهم الماكس من الاستعلام لان كل موظف له اكثر من عمود للاجازات 

Expand  

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

  • Like 2
قام بنشر
  في 6‏/2‏/2017 at 15:18, 99عمرو said:

مشكور اخى شفان ولكن انا لم افهم  اعمل تجميع اي كروب للاستعلام
لانى استخدم اوفس 2016 ولا يوجد خانه للتوتال بالاستعلام

Expand  

شوف الصورة
11.JPG.1d3d526674e65cfe4c839893c68c3656.JPG
 

  • Like 2
قام بنشر

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

Untitled.jpg

قام بنشر (معدل)

اخر تاريخ من بين كم عمود ؟
اكتب لي اسماء العمود اللي تريد ان توصل لاخر تاريخ من بينهم

تم تعديل بواسطه Shivan Rekany
قام بنشر
  في 6‏/2‏/2017 at 15:47, 99عمرو said:

[s1] [s1+0]

Expand  

اعمل استعلام بنفس اللي في الصور
شوف الصور
1.JPG.a692c150fd30d2dc5a4e7c5ef74dc76d.JPG

واستخدم هذا الكود

S1S: IIf([Sickness]![s1]>[Sickness]![s1+0];[Sickness]![s1];[Sickness]![s1+0])

 

  • Like 2
قام بنشر (معدل)

بارك الله فيك اخى شفان وزادك علما 

واذا اردت ان ازيد خانه ثالثه بينهم فكيف يكون

تم تعديل بواسطه 99عمرو
  • Like 1
قام بنشر

كنت اريد زيادة حقل ثالث للمقارنه اخى شفان وكتبته كالاتى 

Expr1: IIf(AND([Sickness]![s1]>[Sickness]![s1+0]>[Sickness]![s1+1],[Sickness]![s1],[Sickness]![s1+0],[Sickness]![s1+1])

ولكن هناك خطأ به

قام بنشر
  في 6‏/2‏/2017 at 16:38, 99عمرو said:

كنت اريد زيادة حقل ثالث للمقارنه اخى شفان وكتبته كالاتى 

Expr1: IIf(AND([Sickness]![s1]>[Sickness]![s1+0]>[Sickness]![s1+1],[Sickness]![s1],[Sickness]![s1+0],[Sickness]![s1+1])

ولكن هناك خطأ به

Expand  

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

S1S1: IIf(Nz([Sickness]![s1])>Nz([Sickness]![s1+0]) And Nz([Sickness]![s1])>Nz([Sickness]![s1+1]);Nz([Sickness]![s1]);IIf(Nz([Sickness]![s1+0])>Nz([Sickness]![s1]) And Nz([Sickness]![s1+0])>Nz([Sickness]![s1+1]);Nz([Sickness]![s1+0]);IIf(Nz([Sickness]![s1+1])>Nz([Sickness]![s1]) And Nz([Sickness]![s1+1])>Nz([Sickness]![s1+0]);Nz([Sickness]![s1+1]);Nz([Sickness]![s1]))))

شوف اضفنا NZ لانه احتمال احد من الحقول بيكون فارغ
او تكدر تستخدم هذا الكود شوية اقصر من الاول ولكن بنفسه بس حذفنا اسم الجدول

S1S11: IIf(Nz([s1])>Nz([s1+0]) And Nz([s1])>Nz([s1+1]);Nz([s1]);IIf(Nz([s1+0])>Nz([s1]) And Nz([s1+0])>Nz([s1+1]);Nz([s1+0]);IIf(Nz([s1+1])>Nz([s1]) And Nz([s1+1])>Nz([s1+0]);Nz([s1+1]);Nz([s1]))))

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

  • Like 1
قام بنشر

سلمت يداك اخى شفان الكود فعلا طويل جدا ولك هو سوف يناسبنى ولكنى سوف اقوم بتعميمه على اكثر من 20 حقل سأفكر فى طريقه لاختصاره

قام بنشر
  في 6‏/2‏/2017 at 19:11, 99عمرو said:

سلمت يداك اخى شفان الكود فعلا طويل جدا ولك هو سوف يناسبنى ولكنى سوف اقوم بتعميمه على اكثر من 20 حقل سأفكر فى طريقه لاختصاره

Expand  

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

  • Like 1
قام بنشر
  في 7‏/2‏/2017 at 12:23, Shivan Rekany said:

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

Expand  

ما هو اخى تكمن المشكله بالنسبه لى فى ربط التسلسل بشخص واحد فقط 

قام بنشر

بمعنى ان رقم 1 فى التسلسل التلقائى فى جميع الجداول ينتمى لشخص واحد فقط لهذا انا اعمل حقول متعدده للتسلسل الواحد لتعدد الاجازات ولرغبتى ان يكون التسلسل تلقائى بكل الجداول

قام بنشر
  في 7‏/2‏/2017 at 16:43, 99عمرو said:

بمعنى ان رقم 1 فى التسلسل التلقائى فى جميع الجداول ينتمى لشخص واحد فقط لهذا انا اعمل حقول متعدده للتسلسل الواحد لتعدد الاجازات ولرغبتى ان يكون التسلسل تلقائى بكل الجداول

Expand  

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

قام بنشر

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

قام بنشر
  في 7‏/2‏/2017 at 18:15, 99عمرو said:

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

Expand  

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

تحياتي

  • Like 1
قام بنشر
  في 9‏/2‏/2017 at 14:57, 99عمرو said:

لو ممكن مثال لتلك الطريه امون شاكر ليك اخى

Expand  

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

تحياتي

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information