31-10-12, 06:11 PM
للاسف لم أجد حل برمجيا
وجدت هذا الكود لاكن لم يعمل معي جرب ربما يعمل لديك
ِA4
إذا كان لديك طابعتين يمكنك تغيير الطابعة الافتراضية برمجيا
وجدت هذا الكود لاكن لم يعمل معي جرب ربما يعمل لديك
كود :
Printer.PaperSize = vbPRPSA5
Printer.Height = 8000
Printer.Width = 15000ِA4
كود :
Printer.PaperSize = vbPRPSA4إذا كان لديك طابعتين يمكنك تغيير الطابعة الافتراضية برمجيا
The most difficult part of developing a program is understanding the problem.
----8<------------------------------------------------------------------------------------
The second most difficult part is deciding how you're going to solve the problem.
----8<------------------------------------------------------------------------------------
----8<------------------------------------------------------------------------------------
The second most difficult part is deciding how you're going to solve the problem.
----8<------------------------------------------------------------------------------------