nacer_alger

شكرا للك اخي عبد الله قدور

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

شكرا لك على مساعدة نفس الكود الذي استعمله الفرق اناا اضعه في المصدر هذا الذي لديك يوضع في الفيجيال اعتقد انا هناك فيروس في قاعة اخيyms12 شكرا جزيل

سلام عليكم لقد استعملت هذا الكود =DernDom("[code_employé]";"Employé en arabe") لكن عندما اعدل في سجيل يظهر لي اخر رقم الخاص بسجل الذي عدلت عليه ان اريد اين يظهر اخر رقم الذي توقفت عنده مثلا اريد تسجيل موظف جديد اعطيه رقم 100 اريد ان يظهر هذا الرقم في حقل مستقل الغرض من هذا هو عندما اريد ان اسجل موظف اخر اعرف اني توقفت عند رقم 100 فاعطيه رقم اخر هو 101 وهكذا بترتيب

شكرا لك على النصيحة

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

شكرا لك حفظك الله

شكرا استاذ جعفر عل هذا الشرح بارك الله فبك

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

شكرا لك اخي الكريم توصلت الى حل بهذا الكود مثلا =Somme(VraiFaux([في الخدمة]="F";1;0))

شكرا لك على التجاوب مع طلبي حت لا اصعب امر عليك انت وضعت كود لحساب الموظفين في القاعدة التي ارسلتها لي =CpteDom("[الاسم]";"Employee") اريدك ان تضيف له شرط لذين في الخدمة ويظهر العدد في حفل او انا اطبق على الذين خارج الخدمة يمثالك يحقل جديد

اخي الكريم ها هو المرفق هناك حقلين اريسد حساب يظهر فيهم حقل اسمه titulaires و اخر اسمه contractuel الشرح مفصل في النموذج contactuel titulares.rar

المشكلة ثانية انت اعطيتني مثال بشرط if هي عندما يختار يحسب و عند عدم اختيار يضهر الحقل فارخ دون حساب انا اريده ان يحسب دائما كلما اضفت قيمة يحسبها

شكرا اخي وليد اتبعت المثال هذا الكود الذي توصلت اليه Private Sub employé__AfterUpdate() If employé_.Value = "TITULAIRES" Then ( " Texte1.Value = DCount("[code_employé]", "Employé", "[en activeté] = 0 End If End Sub المشكلة هيا يعطيني الذين ليس في الخدمة للأني وضعت علامة صفر في0= en activité ماهي العلامة عكس صفر جربت =1 لم تنجح شكرا

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

شكرا على الرد عند حقل في النموذج اسمة نمط التوضيف هذا الحقل يحتوي على خيارين في قائمة هما متعاقد مرسم اريد انشاء حقلين في النموذج مثلا عدد المرسمين عدد المتعاقدين طلبي هو كود حساب للمتعاقدين و المرسمين اعرف انه يكتب في المصدر الحقول المذكورين هذا الكود مع دالة CUNT لكن كيف

السلام عليكم عند مربع التحريروالسرد سميته نمط التوظيف يحتوي هذا المربع على خيارين هما (مرسم و متعاقد ) اريد ان احسب عدد المرسمين و عدد المتعاقدين كل لوحده في حقل مستقل مثلا حقل عدد المرسمين و حقل عدد المتعاقدين استعملت الدالة compte=([مرسم]) لكني لم انجح هناك خطا في الكود ارجو المساعدة

شكرا لك استاذ جعفر

سلام قمت عمل هذا الكود لتصدير استعلامات من اكسس الى اكسل لكن المشكلة هي ان في اكسل الورقة الأولى القوائم تظهر بالعربيةهذا جيد اما باقي اوراق تظهر بلغة الفرنسية كما سميتها مع اني وصفتها بلغة العربية كما هو الحال في الورقة الأولى طلبي هو اريد ان تظهر القوائم بالغة العربية في كل الورقات وليس في الورقة الأولى فقط (تسميات الحقول) DoCmd.OutputTo acOutputQuery, "Employé en arabe Requête", "ExcelWorkbook(*.xlsx)", "", False, "", , acExportQualityPrint DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "Mis en dispo arabe", "Employé en arabe Requête.xlsx", True, sheet2 DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "Mutation arabe", "Employé en arabe Requête.xlsx", True, sheet3 DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "les contractuelles en arabe", "Employé en arabe Requête.xlsx", True, sheet4

السلام عليكم ممكن استفسار هل تغيير امتداد اكسس 207من accdb الى accdr لا يوقع مشاكل في التطبيق اثناء عمل به

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

شكرا لك و للأخ ردوان على مساعدة

سلام عليكم عندي نموذج فيه 60 حقل قمت بتعطيل هذه الحقول و جعلتها غير نشطة من خصائص ثم انشائت زر امر و في خاصية عند النقر جعلت لكل حقل امامه كود التفعيل مثال: nom.Enabled = True Adresse.Enabled = True المشكلة هي عندما اضع سوى 15 حقل واجعل لهم الكود التفعيل تعمل بشكل عادي لكن عندما اجعل كل الحقول اي 60 حقل تظهر رسالة تقول ان القرس غير كافي او تقول رسالة اخر الذاكرة غير كافية ارجو الحل او اعطائي البديل اي اريد ان تكون الحقول غير نشطة و بمجرد الضغط على زر امر تنشط من جديد وشكرا