سلمان عبدالله قام بنشر يوليو 24, 2017 مشاركة قام بنشر يوليو 24, 2017 بسم الله الرحمن الرحيم اخواني اخواتي أعضاء هذا المنتدى الرائع السلام عليكم ورحمة الله وبركاتة جعل الله ما تقدمونه في موازين حسناتكم اخواني عندي مسالة حاولت عملها اكثر من مرة ولم اوفق لقلة خبرتي واتمنا من الله ثم من اساتذتنا الخبراء حلها كما في الصور المرفقة اعرض النماذج الفرعية التي في نموذج اسمة (ن_ادخال_العروض) بطريقة عرض ورقة بيانات وهذه الطريقة مناسبة لي من ناحية التصفية والفلترة والتحكم بالأعمدة وتحريكها حسب الحاجة لكن المشكلة ان زر الطباعة لا يظهر في هذه الحالة حتى اغير طريقة العرض الى نموذج. هل بالإمكان اظهار ازرار الطباعة في النموذج الفرعي وهو في وضع طريقة عرض ورقة بيانات المطلوب:- وضع زر طباعة اسفل النموذج الرئيسي المسمى (ن_ادخال_العروض) ويكون زر الطباعة يعمل بعد التصفية او بدون التصفية و يصدر مباشرة الى واتساب او وورد بشكل نصي بدون عرض تقرير اكسس ويعمل هذا الزر مع جميع النماذج الفرعية أعلاه حسب تصفية كل نموذج (لان هذه العروض يتم ارسالها واتساب بعد التصفية او بدون التصفية) و تقبل فائق احترامي,,, مثال على البرنامج 1.rar رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر يوليو 24, 2017 مشاركة قام بنشر يوليو 24, 2017 وعليكم السلام اخي سلمان اولا احب ان اشكرك على جميل عرضك للسؤال ، بالشرح المفصّل والصور ، وبأسم النموذج والزر وووو والآن الى اسألتك 13 ساعات مضت, سلمان عبدالله said: اعرض النماذج الفرعية التي في نموذج اسمة (ن_ادخال_العروض) بطريقة عرض ورقة بيانات وهذه الطريقة مناسبة لي من ناحية التصفية والفلترة والتحكم بالأعمدة وتحريكها حسب الحاجة لكن المشكلة ان زر الطباعة لا يظهر في هذه الحالة حتى اغير طريقة العرض الى نموذج. هل بالإمكان اظهار ازرار الطباعة في النموذج الفرعي وهو في وضع طريقة عرض ورقة بيانات المطلوب:- وضع زر طباعة اسفل النموذج الرئيسي المسمى (ن_ادخال_العروض) ويكون زر الطباعة يعمل بعد التصفية او بدون التصفية و يصدر مباشرة الى واتساب او وورد بشكل نصي بدون عرض تقرير اكسس ويعمل هذا الزر مع جميع النماذج الفرعية أعلاه حسب تصفية كل نموذج (لان هذه العروض يتم ارسالها واتساب بعد التصفية او بدون التصفية) 1. ازرار نموذج ورقة البيانات: من المعروف ان طريقة عرض ورقة البيانات لا تستطيع ان تجعل فيها ازرار ، ولكن مثل ما تفضّلت ، فيها ميزة التحكم بالاعمدة (الحقول) وتحريكها ، والتي لا توجد بالنموذج المستمر ، فإذا اردت ان تعمل كود لهذا النموذج ، فتستطيع ان تعمله بطرق اخرى غير الزر ، مثل حدث "النقر المزدوج" في حقل معين ، او كتابة رمز/رقم/حرف/كلمة في حقل وعمل الحدث على "بعد تحديث" الحقل ، الطريقة الاخرى اللي تستطيع ان تشغّل كود نموذج ورقة البيانات (في هذه الحالة سيكون النموذج نموذج فرعي) ، ولكن تعمل الزر في النموذج الرئيسي ، والذي سيستدعي كود نموذج ورقة البيانات الفرعي: في نموذج ورقة البيانات الفرعي ن_عروض_الاراضي_العام بدلا عن Private Sub ss_Click() اكتب Public Sub ss_Click() ومن اي نموذج/تقرير/وحدة نمطية في البرنامج ، نستطيع ان نناديها هكذا Call ن_عروض_الاراضي_العام.ss_Click . 2. تصدير النموذج بعد التصفية الى ملف وورد: انا عملت زر على النموذج الرئيسي "عروض - طباعة" ، ووضعت عليه هذا الكود: Private Sub ss_External_Click() 'Call ن_عروض_الاراضي_العام.ss_Click fltr = Replace(Me.ن_عروض_الاراضي_العام.Form.Filter, "[ن_عروض_الاراضي_العام].", "") fltr = Replace(fltr, "ن_عروض_الاراضي_العام.", "") DoCmd.OpenForm "ن_عروض_الاراضي_العام", acFormDS, , fltr, , acHidden DoCmd.OutputTo acOutputForm, "ن_عروض_الاراضي_العام", acFormatRTF, "c:\Temp\myDoc.rtf", True End Sub . اسمح لي ان اقترح عليك تغيير طريقة وضعك للنماذج الفرعية المتراكمة!! فاما ان تضعها عن طريق صفحات (وهو الاسهل) ولا يختلف كثيرا عن طريقة عملك ، ولكن سيكون لكل نموذج اسمه ، او تعمل كائن فارغ في النموذج الرئيسي (تعمل نموذج فرعي ، ثم تحذف اسم النموذج الفرعي من Source Object ، فيبقى كائن النموذج الفرعي فارغا) : . ثم عندما تريد ان تضع النموذج الفرعي ن_عروض_الاراضي_العام هناك ، تضع هذا الكود على الزر: Me.mySub.SourceObject = "ن_عروض_الاراضي_العام" . والميزة انه عندما تريد ان تنادي هذا النموذج الفرعي (او اي نموذج فرعي آخر) ، فلا تستعمل اسمه ، وانما تستعمل اسم mySub ، ويجعل النموذج الرئيسي يعمل بسرعة (لوجود نموذج فرعي واحد فقط فيه) ، وفي نفس الوقت نقل البيانات يكون اقل ، لأننا نتعامل مع نموذج فرعي واحد جعفر 694.مثال على البرنامج 1.accdb.zip 1 رابط هذا التعليق شارك More sharing options...
سلمان عبدالله قام بنشر يوليو 24, 2017 الكاتب مشاركة قام بنشر يوليو 24, 2017 مرحبا اخي العزيز/ جعفر اشكرك على الاهتمام والمساعدة وارجو ان تكمل معروفك معي وتتحملني للنهاية لاني لا املك الخبرة الكافية وكلي امل ان تواصل معي حتى استنير بخبراتك واقتراحاتك حتى نجد الحل الانسب اخي الكريم ياليت تفهمني اكثر او تقوم بعمل ما تراه مناسب لاني لم افهم ما قلت بالشكل الصحيح والمرفق الذي ارسلتة لم يعمل معي او اني لم افهمة.. بعد عمل التصفية قمت بالضغط على زر عروض-طباعة الذي قمت انت بعملة ضهرت لي هذه الرسالة - في الصورة الاولى وبعد الضغط على موافق على الرسالة فتح النموذج الفرعي غير مفلتر ولم تضهر الطباعة - في الصورة الثانية رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر يوليو 25, 2017 مشاركة قام بنشر يوليو 25, 2017 اعتذر عن هذا الخطأ جرب المرفق جعفر 694.مثال على البرنامج 1.accdb.zip رابط هذا التعليق شارك More sharing options...
سلمان عبدالله قام بنشر يوليو 26, 2017 الكاتب مشاركة قام بنشر يوليو 26, 2017 مرحبا اخي جعفر نفس المرفق السابق ياليت تفهمني ماذا عملت حتى اعرف المرفق التالي نفس المرفق السابق ياليت توضح اكثر وشكرا على طولة بالك وصبرك رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر يوليو 26, 2017 مشاركة قام بنشر يوليو 26, 2017 السلام عليكم اخي سلمان انا قبل ان اعمل تعديل على النموذج ، آخذ نسخة منه ، وبسبب عدم التوضيح مني ، انت تستخدم النموذج النسخة من ن_ادخال_العروض !! رجاء استخدام النموذج ن_ادخال_العروض ، لتحصل على: جعفر رابط هذا التعليق شارك More sharing options...
سلمان عبدالله قام بنشر يوليو 26, 2017 الكاتب مشاركة قام بنشر يوليو 26, 2017 السلام عليكم اخي جعفر تظهر عندي هذه الرسالة ولما افتحها تظهر رسالة الكود ما ني عارف ماذا تعني رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر يوليو 27, 2017 مشاركة قام بنشر يوليو 27, 2017 وعليكم السلام يجب عليك تغيير اسم المسار والمجلد ، الى مسار ومجلد موجود عندك في الجهاز ، هذه الرسالة تقول بأنك تريد حفظ الملف في مسار/مجلد غير موجود ، والمسار حسب الكود هو: c:\temp جعفر رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان