monm قام بنشر أغسطس 2, 2017 مشاركة قام بنشر أغسطس 2, 2017 لجعل حقل يجمع تلقائى بناءا على قيمة اضعها انا فى البداية وهو يكمل عليها Dnmax معادلة رابط هذا التعليق شارك More sharing options...
محمدنجار قام بنشر أغسطس 2, 2017 مشاركة قام بنشر أغسطس 2, 2017 7 ساعات مضت, monm said: لجعل حقل يجمع تلقائى بناءا على قيمة اضعها انا فى البداية وهو يكمل عليها Dnmax معادلة :: وضح اكثر مالمطلوب رجاءا مع وضع مثال ان امكن اما دالة العد التلقائي فتكون بنيتها هكذا DCount("[Fld]";"Tbl";"Condition") رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 2, 2017 الكاتب مشاركة قام بنشر أغسطس 2, 2017 استاذنا الكريم المرفق المطلوب فيه حقل السنة فى النموذج الفرعى يتم كتابة السنة الاولى فقط ثم يتم التسلسل تلقائيا مثل حقل المسلسل وكذلك خانة المجموع لا تعمل رغم أن المعادلة صحيحة dgree.rar رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 2, 2017 مشاركة قام بنشر أغسطس 2, 2017 (معدل) هناك نفس السؤال سئل سلمان الشهراني اتفضل قبل قليل انا رديت عليه تم تعديل أغسطس 2, 2017 بواسطه Shivan Rekany 1 رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 2, 2017 الكاتب مشاركة قام بنشر أغسطس 2, 2017 استاذى الفاضل اود أن اكتب انا بيدى اول رقم ثم يتولى هو الترقيم التلقائى اما فى المعادلة التى كتبتها فأول رقم ثابت وهو 99 رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 3, 2017 الكاتب مشاركة قام بنشر أغسطس 3, 2017 نرجوا الرد للأهمية رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 4, 2017 الكاتب مشاركة قام بنشر أغسطس 4, 2017 فى هذه المعادلة يبدأ العد من الرقم 100 ولكن المطلوب أن اكتب انا فى حقل السنة اول سنة اريد ان أبدأ بها ثم عليه هو تكملة التسلسل بعد ذلك =NZ(Dmax("[ID]","Tbl1"),99)+1 رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 4, 2017 الكاتب مشاركة قام بنشر أغسطس 4, 2017 ارجو الرد يا اخوانى رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 4, 2017 مشاركة قام بنشر أغسطس 4, 2017 2 ساعات مضت, monm said: ارجو الرد يا اخوانى اتفضل اليك هذا الكود Private Sub Form_Current() On Error Resume Next If Len(Me.year1 & "") < 1 And Len([Forms]![main]![Glose] & "") <> 0 Then Me.year1 = Nz(DMax("[year1]", "id", "[Glose]=" & [Forms]![main]![Glose]), " ") + 1 Else Exit Sub End Sub للعلم انا غيرت اسم الحقل للسنة من year الى year1 لانھ ھو اسم محجوز وانا غیرت نوعیتھ من تیکست الێ نمبر و انا ح«فت مفتاح اساسی لحقل ای دی لجدول ای دی ... لان في هذه الحالية لا يمكنك ان تكتب رقم مرتين اليك قاعدة بعد تعديل واسف على التاخير dgree.rar رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 5, 2017 الكاتب مشاركة قام بنشر أغسطس 5, 2017 مشكور استاذنا الكبير المعادلة تمام شغالة بس فى عيب فى الكود أثر على الترقيم للتسلسل ولم يكتب تسلسل الارقام فماذا حدث رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 5, 2017 مشاركة قام بنشر أغسطس 5, 2017 9 ساعات مضت, monm said: مشكور استاذنا الكبير المعادلة تمام شغالة بس فى عيب فى الكود أثر على الترقيم للتسلسل ولم يكتب تسلسل الارقام فماذا حدث الترقیم هو من نوع نمبر اذا تريد ان يكتب الترقيم تلقائي غير نوع الحقل من نمبر الى ترقيم تلقائي رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 6, 2017 الكاتب مشاركة قام بنشر أغسطس 6, 2017 الترقيم التلقائى غير مجدى لأن كل حالة يجب أن تبدأ من رقم واحد لذلك الترقيم التلقائى سوف يستمر فى الترقيم لجميع الحالات السؤال ما الذى حدث أثر على كود التسلسل وجعله لا يعمل ؟ رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 6, 2017 مشاركة قام بنشر أغسطس 6, 2017 3 ساعات مضت, monm said: الترقيم التلقائى غير مجدى لأن كل حالة يجب أن تبدأ من رقم واحد لذلك الترقيم التلقائى سوف يستمر فى الترقيم لجميع الحالات السؤال ما الذى حدث أثر على كود التسلسل وجعله لا يعمل ؟ اتفضل اليك هذا السطر بدل من القبل Private Sub Form_Current() On Error Resume Next If Len(Me.year1 & "") < 1 And Len([Forms]![main]![Glose] & "") <> 0 Then Me.year1 = Nz(DMax("[year1]", "id", "[Glose]=" & [Forms]![main]![Glose]), " ") + 1 Else Exit Sub If Len(Me.id & "") = 0 Then Me.id = Nz(DMax("[id]", "id", "[Glose]=" & [Forms]![main]![Glose]), 0) + 1 Else Exit Sub End Sub وهذا تعديل على الملف dgree (1).rar رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 6, 2017 الكاتب مشاركة قام بنشر أغسطس 6, 2017 شكرا جزيلا تجاوبك معى لعدالارقام Lenوهل من شرح لهذا الكود لأنى اعلم أن دالة وفى العمود نشكر هذا المنتدى ورجاله العظام والذين يساعدون فى نشر العلم وتعلم العرب الاستخدام الامثل للحاسب الالى رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 6, 2017 مشاركة قام بنشر أغسطس 6, 2017 4 دقائق مضت, monm said: شكرا جزيلا تجاوبك معى لا داعي نحن نشكرك 4 دقائق مضت, monm said: لعدالارقام Lenوهل من شرح لهذا الكود لأنى اعلم أن دالة لين هو دالة لتعداد المسافات الحروف انا استخدمت هذه الدالة بدل ان استخدم اذا يكون الحقل فارغ اي نول 6 دقائق مضت, monm said: وفى العمود نشكر هذا المنتدى ورجاله العظام والذين يساعدون فى نشر العلم كلهم يشكروا كل اعضاء المنتدى .. نحن نعلم انتم تعلمون لكن نحن ايضا نتعلم من اخطاءكم وافكاركم 7 دقائق مضت, monm said: وتعلم العرب الاستخدام الامثل للحاسب الالى ليس العرب بل من يعلم اللغة العربية !! رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان