السلام عليكم
شكرا للاخ الكريم ssm على الاجابة وجزاه الله خيرا
اخونا الشاعر :
يمكن عمل ما تريد يدويا او بالاستعانة بالكود البرمجي
شريطة ان تكون خصيصة : توسيط تلقائي=لا
اما يدويا فكما ذكر اخونا ssm ففي عرض التصميم اسحب النموذج في المكان المحدد الذي تريد ان يظهر فيه ثم احفظ
اما الكود البرمجي فضع هذا السطر في حدث فتح النموذج
Me.Move Left:=3000, Top:=6000
وغير في الارقام حسب رغبتك
يا عزيزي
مايصلح تجعل استعلام تجميعي هو مصدر لنموذج ادخال
الاستعلام المذكور نستخدمه للاطلاع فقط على مجاميع الاجازات والباقي من الارصدة من خلال نموذج خاص او حتى من التقارير
وايضا يمكن ان نجلب حقل الرصيد لاي موظف في اي مكان نريده داخل النماذج او الاستعلامات .
اذا :
اجعل الجدول هو مصدر النموذج الفرعي
اخواني .. شكرا لكم على الاعمال الجميلة ، وقد تم اعادة رفع المرفقات
ايضا احب ان اساهم في احدى طرق الاستيراد والتصدير والتي هي موجودة ضمن اكسس
اي الاستغناء عن الاكواد والاكتفاء بخدمات اكسس الاصلية
المثال المرفق سيفتح على التقرير ..
انقر بزر الفأرة الأيمن داخل التقرير ثم اختر تصدير
من مربع الحوار اختر
1- مكان الحفظ
2- الصيغة التي تريد تصدير التقرير على نسقها
officena2.rar
مع اني لا املك الوقت الكافي حاليا
الا انني متواجد ان شاء الله على مدار اليوم
وحاضر لاي مساعدة
ولا تنسى انه يتواجد في منتدانا هذه الايام العديد من الخبراء
فابدأ انت على بركة الله .. ولتكن بدايتك مما انتهى منه الآخرون
السلام عليكم
طريقة التعامل مع اجازات الموظفين حسب علمي وما اطلعت عليه :
1- مقدار الاجازة السنوية معلومة يمكن كتابتها داخل الكود وللمرونة نكتبها ضمن بيانات الموظف الثابتة او نخصص جدولا لها
2- الجدول الفرعي للاجازات يدرج به كل اجازة تمنح للموظف خلال السنة
3- لحصر اجازات الموظف خلال عدة سنوات واستخراج الرصيد : ننشء استعلاما مصدره الجدول الفرعي المذكور يشتمل على مجاميع سنوية (مطروحة من اصل مقدار الاجازة )
4- من واقع هذا الرصيد يمكن اعتماد اجازة الموظف الحالية
تفضل اخوي احمد
تم تعديل خصائص الصلة في العلاقات
ان اردت الاستجابة السريعة في الرد من اخوانك فاجعل امثلتك في المرات القادمة على صيغة mdb
برنامج المرتبات2.rar
DoCmd.OutputTo acOutputReport, "reportName", acFormatXLS, "C:\filName" & ".xls", False, "", 0
باعتبار reportName اسم التقرير
و C:\filName اسم ومكان حفظ الملف
اولا : في تنسيق خصائص الحقل ff اجعل القيمة: مرئي=لا
ثم الصق الجملة التالية في حدث بعد التحديث للحقل tt
If tt.Value = "شيك" Or tt.Value = "مرتجع" Then
ff.Visible = True
Else
ff.Visible = False
End If
الحذف الجماعي حسب معايير جماعية يحتاج الى عمل دوارات تبحث في الجدولين
وهذا يحتاج الى وقت
ما رأيك بالحذف الفردي ؟
انظر المثال تم التطبيق على الحذف
ان حقق الحاجة يمكنك عمل التعديل مثله
ملحوظة : تم حذف جدول apc للتخفيف
Dec_lab2.rar
الاخوة الكرام
علي المصري ... at_aziz ..... تعليموه
شكرا لمروركم وثنائكم
هنا بعض المشاركات حول هذا الموضوع
http://www.officena.net/ib/index.php?showtopic=43914#entry254950
http://www.officena.net/ib/index.php?showtopic=53179#entry333843