Moosak

حسب نظام الصلاحيات عندك .. لو كان عامل للمدير صلاحيات خاصة تطبقها عند فتح النموذج .. مثال : If [forms]![LoginForm]![IsManager] = True Then Me.AgreeCbo.Visible = True Else Me.AgreeCbo.Visible = False End If بمعنى التحكم يكون بخاصية الظهور Visible للقائمة المنسدلة .. والطرق كثييييييييرة ومتنوعة 🙂

وعليكم السلام ورحمة الله 🙂 ممكن تعمل حقل عبارة عن قائمة منسدلة بها الـ 3 خيارات اللي ذكرتها (موافق - غير موافق - للتريث ) .. وتكون ظاهرة للمدير فقط .. ويمكنك أن تفلتر السجلات عليها ..

الحمدلله على سلامتك حبيبنا 🙂 عودا حميدا 🌹

البرنامج محول إلى الصيغة accde .. لايمكن فتحه .. يجب أن ترجع للمصمم الأصلي للبرنامج وتطلب البرنامج بصيغة accdb

تعديل على ملف الأستاذ @kkhalifa1960 🙂 جرب الآن الملف .. ( قبل وبعدما تقسمه ) attention.rar

تفضل أخي @waheidi2005 🙂 تكتب في القيمة الافتراضية للحقل tno هذه الجملة : =Nz(DMax("[tno]";"[tbltameem]");0)+1

بارك الله فيك أخي @qathi 🙂 إذا أفضل إجابة تذهب للعزيز @saud3 🌹😉

حياك الله أخي أبو طلال 🙂 لم أجد الجدول الذي به تواريخ البداية والنهاية في مرفقك .. ولكن عملت لك دالة تحيب عدد الأيام بين تاريخين بدون أيام السبت والأحد ... وكذلك تتجنب أيام الإجازات الرسمية حسب الجدول الذي في قاعدتك .. Function CountWorkingDays(startDate As Date, endDate As Date) As Integer ' لحساب عدد الأيام بين تاريخين غير أيام السبت والأحد والإجازات الرسمية الموجودة في جدول الإجازات Dim totalDays As Integer Dim workingDays As Integer Dim currentDay As Date startDate = Format(startDate, "mm/dd/yyyy") endDate = Format(endDate, "mm/dd/yyyy") totalDays = DateDiff("d", startDate, endDate) + 1 ' Include both start and end dates Dim i Dim c For i = 0 To totalDays - 1 currentDay = DateAdd("d", i, startDate) ' البحث في جدول أيام الإجازات إن كان هذا اليوم هو يوم إجازة أم لا c = DCount("[ID]", "[Holidays]", "CDbl(date) =" & CDbl(currentDay) & "") If Weekday(currentDay) <> vbSaturday And Weekday(currentDay) <> vbSunday And c = 0 Then workingDays = workingDays + 1 End If Next i CountWorkingDays = workingDays End Function

تفضل أخي @qathi 🙂 جواب مسألتك هنا :

وهنا فكرة أيضا .. شاشة انتظر من فضلك !! | سلسلة مهارات في أكسس | 06 |

تفضل أخي عبد القدوس .. ممكن تعملها عن طريق التنسيق الشرطي 🙂 : والنتيجة ( لا يمكن تحرير البيانات ..... وتبقى مجمدة حتى يتم تغيير خانة مشطوب) : قاعدة البيانات.accdb

نفس الشي وما صارت عندي أي مشكلة ..

طريقة الاستدعاء مكتوبة في الكود نفسه أخي أمين 🙂 : 'to call the Function 'To Hijri التاريخ الهجري 'txtMonthNameHijri =MnthName(txtDate,"HJ") 'To Arabic التاريخ بالعربي 'txtMonthNameArabic =MnthName(txtDate,"Ar") 'To English الإنجليزي 'txtMonthNameEnglish =MnthName(txtDate,"En") 'To English Short الإنجليزي المختصر 'txtMonthNameEnglish =MnthName(txtDate,"EnShrt") 'To Coptic القبطي 'txtMonthNameCoptic =MnthName(txtDate,"Cpti") 'To Syriac السرياني 'txtMonthNameSyriac =MnthName(txtDate,"Syr")

أو يمكن الضغط على [زر الويندوز] + D من الكيبورد لإظهار سطح المكتب مباشرة 🙂

لا يا أخي @ابو عبد الرحمن اشرف العكس .. 🙂 الذي سيظهر للمستخدمين هو ملف النماذج فقط .. أما ملف الجداول سيكون بعيد عن أعين المستخدمين .. فقط ستحتاجه أنت كمصمم البرنامج لربط نسخة النماذج ( الواجهات ) بنسخة الجداول .. هذا سؤال خارج عن موضوعنا هنا 🙂 إرجع للموضوع الأصلي .. أو إفتح موضوع جديد 🙂

أول مرة أفهم عليك أيش تقول 😂 على أية حال أخي @ابو عبد الرحمن اشرف .. لو كنت تقصد أنه لو عطبت نسخة الجداول BE وأردت إعادة الربط بالنخة الاحتياطية .. فأنت تحتاج في هذه الحالة لكود البحث عن نسخة ال BE وإعادة ربطها بنسخة الواجهة .. وهناك عدة أفكار لذلك .. وفي الرابط التالي ستجد فكرتين .. واحدة لأستاذنا جعفر والأخرى للعبد الفقير .. لكيفية تخزين عناوين قواعد البيانات الخلفية ثم إعادة الربط بها حسب حاجة المبرمج :

أخي @ابو عبد الرحمن اشرف بالعكس .. المجلد المشترك في الشبكة يكون فيه ملف الجداول .. أو ال Back End .. أما الملف الذي ستوزعه على المستخدمين هو ملف الواجهات ( النماذج والتقارير والاستعلامات والأكواد والماكرو ) وهذه صورة مختصرة توضح الآلية .. :

هكذا تضبط معك (استخدم أداة تنسيق الأكواد من المحرر) : IIf(([انتهاء الدوام]-[بدء الدوام])*24<0;(([انتهاء الدوام]-[بدء الدوام])*24)+24;([انتهاء الدوام]-[بدء الدوام])*24)

أنظر هنا :

أخي العزيز @ابو عبد الرحمن اشرف 🙂 دائما عندما تريد مساعدة أو تفتح موضوع جديد اجعل أول ما تفكر به لكي تستقطب مساعدة الإخوة هو إرفاق ملف للتطبيق عليه .. 😅✋🏻

وعليك السلام ورحمة الله أخي الدكتور قاسم 🙂 ما يدور في ذهني في هذا الموضوع هو كيف نستطيع أن نربط قاعدة بيانات الأكسس بالجوجل شيت Google Sheet .. وخلفيتي حول هذا الموضوع غير مكتملة لحد الآن .. ولكن حسب بحثي الأولي أنه يمكن الرط عن طريق ال Google Sheets API .. وهي خدمة تقدمها جوجل للربط بخدماتها .. وتحتاج لتفعيلها للدخول إلى موقع الجوجل وتفعيل الخدمة وستعطيك رقم للتفعيل والربط مع البرامج الأخرى مثل الأكسس .. بعدها يمكنك ترحيل البيانات مباشرة 🙂 ويمكنك من خلال القاعدة المركزية تحميل البيانات من الجوجل شيت وجمعها وتحليلها . والموضوع بحاجة للمزيد من البحث والتجربة ..

وعليكم السلام ورحمة الله وبركاته 🙂 أنا تعلمت أساسيات الأكسس من قناة الأستاذ المهندس منذر السفان .. https://www.youtube.com/watch?v=I5B2G1At_lA&list=PLof3yw6ZFPFgJ64ioThh8IR_X9Rc6i0Zk

تتعدد الأساليب والهدف واحد 🙂👌🏻

قصدت بالتقسيم أنك تضيف حقول جديدة في الجدول بالإضافة للحقول الحالية .. جرب بنفسك الموضوع بسيط جدا 🙂 بالنسبة للنموذج Staff_form فهو مثال مشابه لمثالك عملته لشخص آخر وأنا اشتغلت على نفس الملف بدون ما أحذف السابق 🙂

وعليك السلام ورحمة الله وبركاته 🙂 نعم يمكنك ذلك ولكن أنصحك بعمل تعديلات على الجدول والنموذج .. قم بتقسيم الحقل إلى حقلين .. واحد للمعلم .. والثاني للمادة .. وهكذا سيسهل عليك الفرز .. وبعدها يمكنك جعل حقل المعلم عبارة عن قائمة منسدلة تختار منها اسماء المعلمين بدل الكتابة اليدوية ..