اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

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

اساتذتي في هذا الصرح العملاق

المطلوب كما هو واضح في العنوان

في الملف المرفق يوجد المطلوب

الموضوع له تكلمة وفكرته جميلة

ان شاء الله ينال اعجابكم

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

طابعة لكل ورقة.zip

قام بنشر

اخي العزيز انا حاولت ان اجده .. ولم اجد له الحل ..

الا من خلال التالي :

 

اضافه هذا لسطر في اخر كود الطباعه وتختار الطابعه انت

   ActiveWindow.SelectedSheets.PrintPreview

 

 

مثال انا اسخدمه :

Range("a1:d25").Select
     ActiveSheet.PageSetup.PrintArea = "$A$1:$d$" & Range("d25").Row
   With ActiveSheet.PageSetup
        .PrintTitleRows = "$25:$6"
    End With
    ActiveWindow.SelectedSheets.PrintPreview

 

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

 

 

 

ارجوا ان تستفيد منه

قام بنشر

لا أخي الكريم الله يبارك فيك

طلبي هو انه يوجد لدي طابعتين 

ويوجد في ملف أكسل ورقتين عمل 

الذي أريده هو عند النقر على زر ماكرو طباعة في الورقة أن تطبع النطاق على الطابعة التي في الكود

وفي الورقة الأخرى أيضا عند النقر على طباعة ان تطبع النطاق على الطابعة الثانية التي هي في الكود الثاني

يعني زرين أمر وورقتين عمل وطابعتين

أرجو الله ان وصلت الفكرة والمطلوب

وشكراً

قام بنشر

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

في هذا الرابط يوجد طريقة لتغير الطابعة الافتراضية في اكسل ووضع اسم الطابعة التي تريد الطباعة عليها وبعدها ارجاع الافتراضي للطابعة الاولي

الكود صحيح برمجيا ولكن عند اضافة اسم الطابعة في المكان المحدد لاياخذ الامر وكأنه لايوجد كود برمجي

الرابط

http://www.excelforum.com/excel-general/543436-excel-macro-change-printer.html

وشكرا

ارجو الدخول والمساهمة في عرض الحل

قام بنشر

السلام عليكم

يااساتذتي الكرام

هذه الفكرة يلي تكلمت عنها رائعة جدا

ان تقوم بتخصيص طابعة لكل ورقة عمل

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

يكون التغير اتوماتيك عند التقلب بين ورق العمل

الكود في الرابط بالمشاركة السابقة صحيح وممتاز لكن لم اعرف ان اقوم بادخال التسمية للطابعة في الكود

قام بنشر (معدل)

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

الاخ العزيز حمل الملف المرفق واعتقد بان الاخوة ا ما يقصرون في اكمال الباقي من حيث تحديد رقم المنفذ لكل طابعة port No

print.rar

تم تعديل بواسطه الميساني

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information