nacer_alger قام بنشر مارس 12, 2015 مشاركة قام بنشر مارس 12, 2015 السلام عليكم عند مربع التحريروالسرد سميته نمط التوظيف يحتوي هذا المربع على خيارين هما (مرسم و متعاقد ) اريد ان احسب عدد المرسمين و عدد المتعاقدين كل لوحده في حقل مستقل مثلا حقل عدد المرسمين و حقل عدد المتعاقدين استعملت الدالة compte=([مرسم]) لكني لم انجح هناك خطا في الكود ارجو المساعدة رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 12, 2015 مشاركة قام بنشر مارس 12, 2015 بالمثال يتضح المقال رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 13, 2015 الكاتب مشاركة قام بنشر مارس 13, 2015 شكرا على الرد عند حقل في النموذج اسمة نمط التوضيف هذا الحقل يحتوي على خيارين في قائمة هما متعاقد مرسم اريد انشاء حقلين في النموذج مثلا عدد المرسمين عدد المتعاقدين طلبي هو كود حساب للمتعاقدين و المرسمين اعرف انه يكتب في المصدر الحقول المذكورين هذا الكود مع دالة CUNT لكن كيف رابط هذا التعليق شارك More sharing options...
سعيد صواب قام بنشر مارس 13, 2015 مشاركة قام بنشر مارس 13, 2015 http://www.officena.net/ib/index.php?showtopic=59638&hl= http://www.officena.net/ib/index.php?showtopic=59601&hl= اخي الكريم هناك مثالين في الرابطين ,, وهي ان شاء الله ماتبحث عنه . بإمكانك تعريف الحقل في النموذج بالطريقة forms!form1!text1 forms : ثابته . form1: اسم النموذج لديك text1: اسم الحقل في النموذج . اذا لم تفدك فقم بإرفاق ملف للتعديل عليه .. وفقنا الله واياك ... 1 رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 13, 2015 الكاتب مشاركة قام بنشر مارس 13, 2015 (معدل) شكرا اخي هذا هو طلبي هل ممكن ان تضيف لي شرط اخر في الكود اي الموظفين المرسمين الذين هم في الخدمة فقط لا يحسب المنتهية خدمتهم عند في النموذج خانة اعلم بصح على الموظف الذي يعمل والموظف الذي انتهت خدمته متقاعد مثلا اترك الخانة فارغة الكود يعمل بشكل جيد لكنه يحسب الموظفين الذين انتهت خدمتهم هل هناك مثال لطلبي وشكرا تم تعديل مارس 13, 2015 بواسطه nacer_alger رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 13, 2015 مشاركة قام بنشر مارس 13, 2015 انظر المرفق ربما يكون المطلوب Database1.rar 1 رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 14, 2015 الكاتب مشاركة قام بنشر مارس 14, 2015 شكرا اخي وليد اتبعت المثال هذا الكود الذي توصلت اليه 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 لم تنجح شكرا رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 14, 2015 الكاتب مشاركة قام بنشر مارس 14, 2015 (معدل) المشكلة ثانية انت اعطيتني مثال بشرط if هي عندما يختار يحسب و عند عدم اختيار يضهر الحقل فارخ دون حساب انا اريده ان يحسب دائما كلما اضفت قيمة يحسبها تم تعديل مارس 14, 2015 بواسطه nacer_alger رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 14, 2015 مشاركة قام بنشر مارس 14, 2015 (معدل) الكود المستخدم تحت زر الأمر بهذا الشكل ، لقد استخدمت منه جزء وتركت الجزء الآخر ولهذا لم تظهر معك النتيجة كما تريد أنصحك بأن ترفق مثالاً لتحصل على ما تريد، واعلم أن المنتدى مليء بالخيرات وفي المرفق مثالاً تظهر فيه النتيجة بدون استخدام الدالة ، فبمجرد التحديث تظهر البيانات Private Sub Comb_AfterUpdate() If Comb.Value = "***********" Then Text1.Value = DCount("[M]", "Employee", "[s] = 0") Text3.Value = DCount("[M]", "Employee") - (Text1.Value) ElseIf Comb.Value = "**********" Then Text2.Value = DCount("[R]", "Employee", "[s]=0") Text4.Value = DCount("[R]", "Employee") - (Text2.Value) Else Text1.Value = "" Text2.Value = "" Text3.Value = "" Text4.Value = "" End If End Sub تم تعديل مارس 14, 2015 بواسطه وليد الخميسي رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 14, 2015 مشاركة قام بنشر مارس 14, 2015 الكود المستخدم تحت زر الأمر بهذا الشكل ، لقد استخدمت منه جزء وتركت الجزء الآخر ولهذا لم تظهر معك النتيجة كما تريد Private Sub Comb_AfterUpdate() If Comb.Value = "ãÊÚÇÞÏíä" Then Text1.Value = DCount("[M]", "Employee", " = 0") Text3.Value = DCount("[M]", "Employee") - (Text1.Value) ElseIf Comb.Value = "ãÑÓãíä" Then Text2.Value = DCount("[R]", "Employee", "=0") Text4.Value = DCount("[R]", "Employee") - (Text2.Value) Else Text1.Value = "" Text2.Value = "" Text3.Value = "" Text4.Value = "" End If End Sub أنصحك بأن ترفق مثالاً لتحصل على ما تريد، واعلم أن المنتدى مليء بالخيرات وفي المرفق مثالاً تظهر فيه النتيجة بدون استخدام الدالة ، فبمجرد التحديث تظهر البيانات رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 14, 2015 مشاركة قام بنشر مارس 14, 2015 الكود المستخدم تحت زر الأمر بهذا الشكل ، لقد استخدمت منه جزء وتركت الجزء الآخر ولهذا لم تظهر معك النتيجة كما تريد Private Sub Comb_AfterUpdate() If Comb.Value = "ãÊÚÇÞÏíä" Then Text1.Value = DCount("[M]", "Employee", " = 0") Text3.Value = DCount("[M]", "Employee") - (Text1.Value) ElseIf Comb.Value = "ãÑÓãíä" Then Text2.Value = DCount("[R]", "Employee", "=0") Text4.Value = DCount("[R]", "Employee") - (Text2.Value) Else Text1.Value = "" Text2.Value = "" Text3.Value = "" Text4.Value = "" End If End Sub أنصحك بأن ترفق مثالاً لتحصل على ما تريد، واعلم أن المنتدى مليء بالخيرات وفي المرفق مثالاً تظهر فيه النتيجة بدون استخدام الدالة ، فبمجرد التحديث تظهر البيانات رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 14, 2015 الكاتب مشاركة قام بنشر مارس 14, 2015 اخي الكريم ها هو المرفق هناك حقلين اريسد حساب يظهر فيهم حقل اسمه titulaires و اخر اسمه contractuel الشرح مفصل في النموذج contactuel titulares.rar رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 14, 2015 مشاركة قام بنشر مارس 14, 2015 أخي الكريم إن لم يكن هدفك في المرفق فالتمس لي العذر فالملف الذي أرسلته لم يفتح عندي، وما فهمته ترجمته لك في الملف المرفق. في الخدمة أم لا.rar رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 15, 2015 الكاتب مشاركة قام بنشر مارس 15, 2015 شكرا لك على التجاوب مع طلبي حت لا اصعب امر عليك انت وضعت كود لحساب الموظفين في القاعدة التي ارسلتها لي =CpteDom("[الاسم]";"Employee") اريدك ان تضيف له شرط لذين في الخدمة ويظهر العدد في حفل او انا اطبق على الذين خارج الخدمة يمثالك يحقل جديد رابط هذا التعليق شارك More sharing options...
وليد الخميسي قام بنشر مارس 16, 2015 مشاركة قام بنشر مارس 16, 2015 أخي الكريم تم وضع الشرط لمن هم في الخدمة ومن هم خارج الخدمة كل على حدة، انظر المرفق في الخدمة أم لا.rar رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر مارس 25, 2015 الكاتب مشاركة قام بنشر مارس 25, 2015 شكرا لك اخي الكريم توصلت الى حل بهذا الكود مثلا =Somme(VraiFaux([في الخدمة]="F";1;0)) رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان