jjafferr

حياك الله بس ياريت تضع لنا الحدثين (احذف الكود اللي ما له علاقة بموضوعنا) ، علشان يستفيد الكل جعفر

السلام عليكم اخي عبدالله هذه احد اسراري ، وانت كشفتها ولكني جعلت إضافة القيمة وتغييرها من نموذج واحد ، ومن الصورة ترى عدد الحقول التي استعملتها في الجدول (مثل مثالك) : . وعندما يتم التعديل ، فيكون التعديل في هذا الجدول المخزن فيه القيمة للإختيار ، بالاضافة الى سجلات الجدول الذي يتم فيه اختيار هذه القيمة جعفر

وعليكم السلام الحدث الذي عليه cmd_Search3 ، بدل ان يكون Private ، اجعله Public ، ثم في الحدث على cmd_Search اكتب هذا الكود: Form_frm_yy. ستحصل على قائمة الاوامر الموجودة في ذلك النموذج ، فاختار Form_frm_yy.cmd_Search3..... حيث ... يكون بقية اسم الحدث جعفر

وهو كذلك ونتيجة المعادلة: Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8,Nz(DCount("[service]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]),0),0) Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8, Nz( DCount("[service]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [service]=" & [service]) ,0) ,0) . . كذلك النتيجة صحيحة جعفر 779.QryVisitors.accdb.zip

معادلة العمود C كما كان: =(I6+H6+E6+D6)/5*J6 بينما اذا اضفنا العمود K لوضع المواد المعفاة بحرف م ، والعمود B فيه مجموع العلامات بإستثناء المعفاة م: =IF(K6="م",0,(I6+H6+E6+D6)/5*J6) . جعفر 781.كشف السنة الأولى ثانوي علمي.xlsx.zip

شو السالفة ، نتائجنا ما تتفق انا اخذت المعادلة ، واشتغلت على طول: . وهاي المعادلة: Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8,Nz(DSum("[Travel2]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [Travel2]=" & [Travel2]),0),0) وهي Expr4: IIf([Travel2]=1 Or [Travel2]=2 Or [Travel2]=3 Or [Travel2]=6 Or [Travel2]=7 Or [Travel2]=8, Nz( DSum("[Travel2]","Tabil_Visitors","[Num_brnamge]=" & [Num_brnamge] & " And [Travel2]=" & [Travel2]) ,0) ,0) . ولكن ، استعمال الجمع غير صحيح ، لأنه ما عندك قيم علشان تجمعها ، وانما عندك خدمات تقوم بتعدادها (count او Dcount) جعفر

السلام عليكم اخي طاهر رجاء فتح موضوع خاص بك ، فهذا الموضوع قديم وتمت الاجابة عليه!! جعفر

السلام عليكم اخي طاهر رجاء فتح موضوع خاص بك ، فهذا الموضوع قديم وتمت الاجابة عليه!! جعفر

السلام عليكم لا ادري اذا قوانين المنتدى تسمح لك بعمل اكثر من حساب لشحص واحد ، كما هو الوضع معك radwan1991 و radwank64 !! المنتدى مليء بمواضيع تشبه طلبك ، فكل ما عليك عمله هو استخدام خاصية البحث للحصول على روابطها ، واليك بعض هذه المواضيع: https://www.officena.net/ib/topic/77097-استيعاب-سجلات-التقرير-كلها-فى-صفحة-واحدة-مهما-اختلف-عددها/?do=findComment&comment=494389 https://www.officena.net/ib/topic/36167-موضوع-مميز-الحل-الشافي-لتقارير-أكسس/ https://www.officena.net/ib/topic/45998-طباعة-عدد-سجلات-محدد-في-صفحات-التقرير-معدل/?do=findComment&comment=273465 جعفر

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

تفضل انا عملت تغيير في الجدول ، فعملت اسماء الخدمة عبارة عن رقم ، وفي النموذج ، يختار مربع السرد العمود الصحيح لإعطاء الاسم ، سواء بالعربي او الانجليزي ولكنك ستلاحظ ان الكود سيعمل الى ان تحصل على الخدمة السادسة بالمجان ، ولكن ماذا بعد ذلك؟ رجاء تجربة الكود لعدة زبائن والكود: Private Sub Name_employee1_AfterUpdate() Me.Amountofservice = Me.Name_employee1.Column(2) Me.ServiceName = Me.Name_employee1 'Me.Name_employee1.Column(1) Call Check_Qty End Sub Private Sub ServiceName_AfterUpdate() Me.Amountofservice = Me.ServiceName.Column(2) Me.Name_employee1 = Me.ServiceName 'Me.ServiceName.Column(3) Call Check_Qty End Sub Private Sub Check_Qty() If DCount("*", "Service", "[Nameemployee1]=" & Me.Name_employee1 & " And [CustomerNumber]=" & Me.CustomerNumber) = 5 Then Me.Amountofservice = 0 End If End Sub . جعفر 780.تجريي2.accdb.zip

غيّر Dcount الى Dsum جعفر

كان عندك ' زائدة في الاستعلام الاول ، لهذا السبب كنت تحصل على خطأ ، وتم تصحيح الاستعلام الثاني كذلك: . والنتائج . جعفر 779.QryVisitors.accdb.zip

يجب عدم استخدام Dlookup ، لأنها تعطي اول قيمة تلقاها في الجدول (كما قلت انت) والطريقة الصحيحة هي عمل استعلام يأخذ فيه جميع بيانات الجدول T_Caht ربطا بأسماء المستخدمين من الجدول user: . ومن هذه الجداول ، نرى ان بيانات الاستعلام صحيحة: . على هذا الاساس ، التنسيق الشرطي يصبح . والنتيجة: . جعفر 778.تنسيق شرطي.accdb.zip

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

في النموذج ، الحقل [xn3] فارغ

عفوا عفوا عفوا !! انا اعتذر عن هذا الخطأ تعديل اخير = iif([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8 ; nz(Dcount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & " And [Travel2]=" & [Travel2]);0) ; 0) يعني في سطر واحد يصبح الكود = iif([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8 ; nz(Dcount("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & " And [Travel2]=" & [Travel2]);0) ; 0) جعفر

نسخة الاكسس 2003 لم يكن فيها xlsx ويمكنك استخدام الامر الذي تستخدمه xls ، لأنه يعمل على جميع اصدارات الاكسس جعفر

حياك الله اخوي وضاح جعفر

وعليكم السلام الله يطول في عمرك ، لازم تشوف رأي الاكسس ، مو رأينا اذا هذه الاختيارات موجودة في هذا الامر كما يمكنك استخدام الامر docmd.TransferSpreadsheet .... جعفر

تفضل =Nz(DSum("[Travel2]";"Tabil_Visitors";"[Num_brnamge]='" & [Num_brnamge] & "' and ([Travel2]=1 or [Travel2]=2 or [Travel2]=3 or [Travel2]=6 or [Travel2]=7 or [Travel2]=8)");0)

التنسيق الشرطي ينطبق على جميع السجلات الظاهرة على الشاشة ، رجاء ارفاق هذه الجزئية من برنامجك حتى استطيع مساعدتك. جعفر

accdb للذين يستخدمون الاكسس 2007 فما فوق ، mdb للذين لا يزالون يستعملون 2000 - 2003 جعفر

الكود اعلاه يحسب على اساس القيمة 2 ، فاذا ما حصلت على النتيجة ، فيا تراجع الاستعلام ، او ترفق لنا هذه الجزئية من برنامجك جعفر

انت لم تستعمل استعلام تحديث (2) !! . بينما عند الضغط على زر التحديث ، يتغير شكل الاستعلام ، وعليه يكون هكذا: . جعفر 777.iep.accdb.zip