تمام
يعني لازم نعمل جدول اخر وبيكون مصدر النموذج لكي نحفظ البيانات فيه
وبواسطة رقم التشغيل في الجدول الاول راح نستدعي البيانات الى جدول الجديد اي نموذج
ان شاء الله اليوم او غدا راح اعمل لك من جديد
للعلم انا فتحت الملفات الاولى على جهاز اخر وشغلت تمام
لكن على كل شي راح اعملك من جديد باذن الله
تحياتي لك
انتظرني
السلام عليكم ورحمة الله وبركاته
اخي العزيز @Rebaz Bahram
كلنا نريد ان نستخدم اللغة الام لكن لان هذا المنتدى هو منتدى تعليمي لذا لازم نستخدم اللغة العربية لكي يستفيد جميع الاعضاء ويفهم الجميع
تحياتي لك
شو رأيك اذا نتغير كودك بدل " + " و "-" نستخدم "*"
اي يعني الكود بيتغير عند نقصان الى هذا
Text10.Left = Text10.Left * 0.9
وعند تزايد الى هذا
Text10.Left = Text10.Left * 1.1
واليك ملفك القي نظرتا اليه
move.rar
شوف كودك الخطأ من وين
Select Case Frame19
Case 1
Text10.Left = Text1.Left + 100
Case 2
Text10.Top = Text1.Top + 100
Case 3
End Select
Text10.Width = Text1.Width + 100
End Select
الخطأ من هذا السطر
Text10.Left = Text1.Left + 100
Text10.Left كتبت تيكست 10
وبعدين كتبت Text1.Left تيكس 1
غيرها الى 10
تحياتي
السلام عليكم
في محرر فيجوال كود فتح التقرير
اضف هذا الشرط
"[رقم_الوثيقة]=" & Me.رقم_الوثيقة
اي الكود سيكون كالتالي
DoCmd.OpenReport stDocName, acPreview, , "[رقم_الوثيقة]=" & Me.رقم_الوثيقة
تحياتي
بدل ان تكتب الكود كم مرات وهو نفس الكود
تكدر تكتب الكود مرة واحدة وبعد في اي حالة تريد تكدر تستخدمه
مثلا كتبت هذا الكود الاسفل في حدث الحالي وتريد ان تستخدم نفس الكود في حدث اخر
بدل ان تكتبه من جديد في حدث اخر تقدر في حدث مثلا بعد تحديث ان تكتب هذا فقط
Form_Current
تحياتي
ما هو المتبقي
هل هو متبقي دينار او كمية
اذا هو دينار اي سعر اي العملة
ما اظن ان العملية في مشاركتي بيكون خطأ
واذا تقول خطأ
ممكن تفهمني اي تشرح لي العمل
ما هو العمل وماتريد بالضبط
تحياتي
حسب فهمي للبرامج مش لازم النتيجة بيطلع 14 بل بيطلع 38
شوف
الحقل expr1 يجب ان يكون هكذا
Expr1: Sum([Qote_item])*Sum([item_prais])
والحقل Expr2 بيكون هكذا
Expr2: Sum([item_prais])*Sum([QOTE_ITEM])+([add_prais]-[descon_combny])-([mdfoo_ada])
والنتيجة بيطلع هكذا
واليك ملفك القي نظرتا اليه
واحتمال انا بيكون غلطان لكن شوف النتائج
تحياتي
برنامج واليد.rar