جمال احمد قام بنشر يونيو 4, 2020 مشاركة قام بنشر يونيو 4, 2020 اريد من الزملاء الاعزاء المساعدة فى عمل كود طباعة لجميع الشهادات مرة واحدة من فضلك طالما حجم الملف صغير , فلابد من رفعه بدون ضغط .وذلك تجنباً لعدم اهدار وقت الأساتذة , وبما انك تريد الحل والإجابة بالأكواد فكان عليك لزاما رفع الملف بإمتداد XLSM بيان ناجح 6.xlsm 1 رابط هذا التعليق شارك More sharing options...
الرائد77 قام بنشر يونيو 4, 2020 مشاركة قام بنشر يونيو 4, 2020 Sub Printg() Application.Calculation = xlAutomatic For J = [Y2] To [Y1] If J <= [Y1] Then ActiveSheet.PrintOut Copies:=1, Collate:=True End If Next End Sub بيان ناجح 6.xls 3 رابط هذا التعليق شارك More sharing options...
الرائد77 قام بنشر يونيو 4, 2020 مشاركة قام بنشر يونيو 4, 2020 نفس ملفك المررفق. ضع الكود في موديل جديد. 1 رابط هذا التعليق شارك More sharing options...
جمال احمد قام بنشر يونيو 6, 2020 الكاتب مشاركة قام بنشر يونيو 6, 2020 تم العمل ولكن بدون نتيجة تفضل ارجو المعذرة اما اريد كود لطباعة جميع التلاميذ وشهاداتهم مرة واحدة اريد كود لطباعة العدد الكلي للتلاميذ وهذا الكود يطبع اول تلميذ فقط ويكرر شهادته رابط هذا التعليق شارك More sharing options...
أفضل إجابة بن علية حاجي قام بنشر يونيو 8, 2020 أفضل إجابة مشاركة قام بنشر يونيو 8, 2020 السلام عليكم تم تصويب الكود حسب الطلب... بن علية حاجي بيان ناجح 6.xlsm 7 رابط هذا التعليق شارك More sharing options...
جمال احمد قام بنشر يونيو 9, 2020 الكاتب مشاركة قام بنشر يونيو 9, 2020 والله مش لاقى كلام اشكر بية الاستاذ العظيم على مجهوده بارك الله فيك دا المطلوب وشكرى للجميع رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان