طباعة تلقائية للصفحة إلى آخر سطر تم كتابته

[حليم ناصر]

سلام عليكم

سادة الاعضاء كيف حالكم اتمنى ان تكونو في احسن حال ان شاء الله

      كيفية استخراج او طبع الورقة تلقائيا لاخر سطر تم كتابته

لدي ورقة بها جدول غير محدد الاسطر في بعض الاحيان اقوم بملئ من الجدول سطرين فقط واقوم باخراج الصفحة

ومرة اخرى املئ الجدول ب 50سطر وافوم باخراج الورقة لاخر سطر ومرة اخرى كذلك اقوم بملئ الجدول لاكثر من 150 سطر

واقوم باخراج الورقة الى اخر سطر  وهكذا  الشئ المشترك اني اقوم بتحديد حدود الورقة المراد اخراجها

طلبي هو عمل ماكرو يقوم باخراج او طبع الورقة تلقائيا لاخر سطر تم كتابته  مثلا اذا كان اخر سطر تم كتابته رقم 5 يقوم الماكرو بطباعة الورقة الى ذلك السطر فقط  ودون تدخل مني في تحديد حدود الورقة المراد طباعتها

اتمنى ان اجد عندكم جواب

وفي انتظار ردكم تقبلوا مني فائق التقدير والاحترام  وشكر

والسلام عليكم ورحمة الله تعالى وبركاته

 

 

طبع الورقة تلقائيا.xlsx

[أحمد يوسف]

وعليكم السلام

جرب هذا الرابط والموضوع لأستاذنا الكبير سليم حاصبيا

https://www.officena.net/ib/topic/86034-الطباعة-الذكية/?_fromLogout=1&_fromLogin=1

[حليم ناصر]

سلام عليكم

اشكرك اخي يوسف على هذا الرد

ما اوده هو ماكرو يقوم بطبع الورقة مهما كانت صفحاتها  صفحة او اثنين اواكثر المهم ان يقوم بالطباعة الى اخر سطر تم كتابته بمجرذ الظغط على زر الطباعة

وشكرا مرة اخرى

 

[نبيل عبد الهادي]

تم عمل نطاق طباعة ديناميكي للصفوف والاعمدة يتغير تلقائيا  مع اضافة اي بيانات جديد ... جرب اضافة اي بيانات جديده خارج حدود الطباعة ولاحظ 

طبع الورقة تلقائيا (1).xlsm

[حليم ناصر]

سلام عليكم

اخي نبيل اشكرك على هذا الرد

جربت الكود الفكرة رائعة لكن النطاق  من حيث الاعمدة هي المشكلة حيث نطاق  الاعمدة منحصرة من العمود A الى العمود D اي لو اكتب رقم عن طريق الخطا في العمود S فلا يحسب في النطاق

كما ان نطاق الاسطر فهو عند اخر سطر تم كتابته في العمود D

ارى ان الحل  اقترب ان شاء الله

مرة اخري اشكرك وجزاك الله خيرا

والسلام عليكم ورحمة الله تعالى وبركاته