بسم الله الرحمن الرحيم
اقدم لكم اليوم طريقتين لحل مشكلتين اساسيتين تقابلنا عند طباعة الفورم
اولا الطباعة العرضية لا توجد landscape
ثانيا اختيار الطابعة لا يوجد اعدادات لليوزر فورم لاختيار الطابعة المراد الطباعة عن طريقها

المثال المرفق به حل :-
أولا حل مشكلة الطباعة العرضية عن طريق اخذ صورة من الفورم ووضعها داخل مصنف جديد وطباعتها كما نحدد داخل الكود طباعة طولية او عرضية
ثانيا حل مشكلة نوع الطابعة تستطيع اختيار اي طابعة كما تشاء
ثالثا طباعة عرضية مع اختيار نوع الطابعة
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
قد تصادفكم بعض المشاكل داخل الاكواد مع بعض اصدارات الاوفيس
اذا ظهر خطأ في الكود
ActiveSheet.PasteSpecial Format:="Bitmap"
استبدله بـ
ActiveSheet.Paste
تحياتي
ياسر العربي
