السلام عليكم
كل عام وانتم بخير
اعلم ان المشكلة قديمة وقد تم حلها من قبل وهى تصفية قيم مربع تحرير وسرد بناء على قيم اخرى
ولكن هذا الامر يتم فى النموذج العادى بشكل سلس وشهل وما فى اى مشكلة
لكن هذة المرة اريد تطبيق على نموذج على شكل datasheet منضم فى نموذج فرعى وكان الامر ليس سهلا لن وجدت ان الشرط يتغير عندما اغير السطر الذى اقف فيه وبالتالى يؤثر على النتائج السابقة ولذلك ارجو من اساتذتى ان يساعدونى فى حل هذة المشكلة
وشكرا مقدما
مرفق صورة مع المثال
off.rar
جزاك الله الف خير لقد اشتغل الكود الحمد لله لكن عملت فيه تعديل يظهر كالتالى لانه لم يعمل بدون التعديل فرجاء توضيح السبب لو تكرمت 🙂
Public Function Frm1_or_Frm2() As String
If CurrentProject.AllForms("issue").IsLoaded = True Then
Frm1_or_Frm2 = [Forms]![Issue]![QNo].Value
ElseIf CurrentProject.AllForms("quud").IsLoaded = True Then
Frm1_or_Frm2 = [Forms]![Quud]![QNo].Value
ElseIf CurrentProject.AllForms("recepit").IsLoaded = True Then
Frm1_or_Frm2 = [Forms]![Recepit]![QNo].Value
Else
Frm1_or_Frm2 = ""
End If
End Function
اضفت . value
السلام عليكم اخوانى هل ممكن عند وضع شرط فى استعلام ان يتغير هذا الشرط بتغيير النموذج المفتوح كمثال :
على فرض ان عندنا نموذجين يحتويان على نفس العناصر واسمهما Frm1 و Frm2
فلو عندنا استعلام وفيه شرط اسف الحقل type
اريد ان تكون كالتالى : اذا كان النموذج المفعل ( او المفتوح حاليا ) frm1 يبقى الشرط [type]![frm1]![forms]
واذا كان النموذج المفعل ( المفتوح حاليا ) هو frm2 يصبح الشرط [type]![frm2]![forms]
وشكرا مقدما وكل عام وحضراتكم بخير
والحل .. يوجد حدث في الحقل المذكور ( ماكروا ) فقط احذفه
شكرا لنصيحتك اخى الكريم
وشكرا ايضا للرد بالحل لكن للاسف الجربت الطريقة ومازالت المشكلة قائمة كما ان المشكلة تخص تقريبا كل الفورمز الموجودة فى البرنامج
الاعتذار ليس عيبا ولن ينقص منى ابدا انا اخطأت وادركت انى اخطأ واعترف كلاماتى غير لائقة باعتذر عن اى لفظ خرج منى جرح او نال من احد
ارجو ان يلتمس الجميع منى العذر وان يتقبلو اسفى واولهم المهندس قاسم
اسف جدا
السلام عليكم ورحمة الله وبركاته
عندى مشكلة عند عمل تعديل لاى نص موجود فى الفورم وهى ان لو حبيت اغير حرف فى جملة بيمسح كل الكلام اللى فى الحقل بالكامل كمثال :
لو الحقل مكتوب فيه ١٢٣٤٦
وحبيت استبدل ال ٦ دى برقم ٥ بيحذف كل الكلام او مثال اخر لو فرضت انى جملة زى السلامعليكم
كما تشاهد فانا نسيت عمدا ان اضع مسافة بين الكلمتين فلو حبيت اعدل واحط مسافة بيلفى كلمة السلام عليكم كلها
وشكرا مقدما
السلام عليكم جميعا اساتذتى الافاضل
كان عندى سؤال اتمنى ان اجد اجابته وهو انى اريد عمل تقرير المركز المالى (الميزانية العمومية ) بالشكل الموضح فى الصورة وذلك عن طريق الاكسس
وجزاكم الله خيرا