yasayd

شٌكراً أخي ,,, إن شاء الله سأجرب ذلك

شكراً أخي لتجاوبك النتيجة : - upload foto

للرف ع

السلام عليكم كما هو مشار إليه في العنوان عندما أعمل VBA فإن Application.ActivePrinter تعمل بسهولة في أكسل 2007 بينما نفسها لا تعمل عندما أستخدمها مع أكسل 2010 وظيفتها تفعل طابعة محددة مسبقاً لطباعة ورقة العمل يتم كتابتها كالمثال التالي : - Application.ActivePrinter = "HP LaserJet 4 local on LPT1:" حيث أن ( HP LaserJet 4 local ) هو إسم الطابعة و ( : on LPT1 ) هو المنفذ الذي تعمل عليه الطابعة في جهازك * حتى إذا قمت بتسجيل ماكرو في أكسل 2007 والذهاب إلى طباعة ثم إختيار الطابعة فإن هذا الكود سيظهركما هو مكتوب في المثال السابق بينما إذا قمت بنفس العمل وسجلت ما كرو في أكسل 2010 وذهبت إلى طباعة ثم أخترت إحدى الطابعات وضغطت على أمر طباعة فإن هذا الكود لن يظهر إطلاقاً وفقط سيظهر أنك أخترت طباعة الصفحات من كذا إلى كذا في ورقة العمل المطلوب : هل هنالك طريقة ما لتفعيل الكود Application.ActivePrinter وجعله يؤدي وظيفته ؟ أم هل هنالك كود آخر يؤدي نفس الوظيفة ؟ * ألتمس منكم العذر فإني مُبتدئ في الأكسل ولم أدرسه ولم آخذ فيه أي دورات بل دخلت على النت شاهدت بعض الدروس في اليوتيوب لذا ربما تكون تعابيري ليست دقيقة فلست من أهل هذا التخصص .

للرفع

image uploading تم اإطلاع على الملفات المُرفقة , وهي تعمل بإمتياز حتماً سأستفيد منها بطريقة ما للمهمة التي أنشُدُها كنت أرغب في زر يقوم مُباشرة بأختيار الطابعة وتنفيذ أمر الطباعة فوراً لا أحتاج كُل مرةٍ أضغط على الزر ثم تخرج لي قائمة الطابعات ثم أختار الطابعة ثم أضغط طباعة أحتاج الأمر ( مُباشر ) : بمجرد أضغط الزر ( رقم 1 ) يقوم بالطباعة على الطابعة HP : وعند الضغط على الزر ( رقم 2 ) يقوم بالطباعة على الطابعة Canon أحتاج هذا الأمر حيث أن اللي حاصل أن لدينا في المكتب طابعتين واحدة ( Dot Matrix ) وتُستخدم لطباعة الفواتير والنماذج التي بها نسخ كربونية أما الطابعة الأخرى فهي طابعة ليزر لطباعة الخطابات وما أشبه على ورق A4 إللي حاصل أننا نفتح أمر الطباعة ونقوم بتبديل الطابعة يدوياً ثم نقوم بالطباعة ثم نرجع نفتح أمر الطباعة ونختار الطابعة المناسبة للغرض التالي المراد طباعته وبعض الأخوة الموظفين ( تركيزهم مشتت ) وبالفعل الأمر مربك ولا تتذكر إلى أين أستقريت في الأختيار السابق حتى تباشر في طباعة الأمر اللاحق . أرجو أن يكون شرحي ليس مُلتبساً - ( بس حبيت أحطكم في الصورة )

windows 7 screenshot ربما هذه تنفع

ألف ألف شُكر أخي عبدالله الصاري لإستجابتك السريعة بالرد على هذا الإستفسار ووضع الحلول إن شاء الله سأبادر فوراً بتحميل الملفين المرفقين - ومن ثم كتابة النتيجة .... واجهتني المشكلة التالية - دائما لما احمل ملف اكسل من النت لا أجد الماكرو المرتبط بالأزرار

السلام عليكم لقد عملت ( زر ) في ورقة العمل مهمته طباعة الصفحات ( من : إلى : ) حسب الإختيار المحدد مسبقاً من قِبلي . لكن أرغب في عمل زر ثاني يقوم بطباعة أوراق العمل في طابعة أخرى من ضمن الطابعات المرتبطة أو المعرفة بجهاز ( البي سي ) مثال : عندي طابعة ( HP ) وطابعة أخرى ( Canon ) هل أستطيع عمل زرين ( ماكرو ) داخل ورقة العمل الزر الأول يطبع على طابعة HP والزر الثاني يطبع على طابعة Canon ؟ وشكراً لكم ,