لى طلب عندكم كود طباعة

[عبدالعزيز راشد]

 

ابى كود طباعة ورقة2 وانا فى ورقة 1

بدون حدث بمعنى بدون الذهاب الى ورقة2 والرجوع

لان الورقة 2 لايمكن ظهورها

للمستخدم عندى

 

[احمدزمان]

    Sheets("ورقة2").PrintOut

ابي تعذرني اذا قصرت

[عبدالعزيز راشد]

الله يوفقك ومشكور على سرعه الاجابة

وعساء الله لايقصر با ايامك على الطاعه 

بس كان ودى لايطلع فى الحدث

صورة صفحة الطباعة

اذا ممكن

واسف على كثرالاسئلة

وعندى طلب ثانى

اذا ممكن طريقه الباسورد فى visual basic

وان شاء الله فى ميزان اعمالك

[احمد فضيله]

الاخ الحبيب الاستاذ / احمد

جزاك الله كل خير

[ضاحي الغريب]

الله يوفقك ومشكور على سرعه الاجابة

وعساء الله لايقصر با ايامك على الطاعه 

بس كان ودى لايطلع فى الحدث

صورة صفحة الطباعة

اذا ممكن

واسف على كثرالاسئلة

وعندى طلب ثانى

اذا ممكن طريقه الباسورد فى visual basic

وان شاء الله فى ميزان اعمالك

أخي الكريم / عبدالعزيز راشد

وبعد اذن اخي الحبيب استاذي / احمد زمان  (باركـ الله فيه وجزاه خيرا)

بالنسبة لوضع باس ورد علي محرر الفيجوال VBA

اتبع مافي الصورة التالية

 

وبالنسبة لطباعة الصفحة بدون الانتقال وبدون معاينة  (طباعة مباشرة )

اولا قم بتعريف اسم لنطاق الطباعة وليكن مثلا (Print_Aria)

وضع الكود التالي في موديل

وخصص له اختصار في الصفحة التي تريدها

Sub Print_Out()
With [Print_Aria]
.PrintOut
End With
End Sub

[عبدالعزيز راشد]

يسعدنى ويشرفنى مرورك

يااخي ضاحى

بس كان ودى تكون طبقتها

لاانى حاولات ولم تضبط معى

 

 

[ضاحي الغريب]

 

يسعدنى ويشرفنى مرورك

يااخي ضاحى

بس كان ودى تكون طبقتها

لاانى حاولات ولم تضبط معى

 

تفضل التطبيق بمثال بالمرفقات

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

PRINT.rar

[احمدزمان]

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

اخي ضاحي

جزاك الله خيرا (اسعفتني لضيق وقتي)

[احمدزمان]

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

 

بس كان ودى لايطلع فى الحدث

صورة صفحة الطباعة

اذا ممكن

 

 

وانا كان ودي - تفهمني ماهي صورة صفحة الطباعة

 

 

 

 

 

 

[عبدالعزيز راشد]

وفقك الله وأثابك ونفع بك

الله يعطيك العافية

[ضاحي الغريب]

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

اخي ضاحي

جزاك الله خيرا (اسعفتني لضيق وقتي)

أخي الحبيب الأستاذ / احمد زمان

بارك الله فيك وجزاك خيرا

ويتقبل الله ومنكم الصالحات

تقبل تحياتي

[ضاحي الغريب]

 

وفقك الله وأثابك ونفع بك

الله يعطيك العافية

 

بارك الله فيك

وجزاك خيرا