اذهب الي المحتوي
أوفيسنا

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

قام بنشر

الأخوه الكرام لدى ماكرو للطباعه ولكن يوجد به مشكله وهى عند استخدام زر طباعة الكل يقوم المكرو بتجهيز وطباعة كل مافي ورقة الطباعة المقصود طباعته وغير المقصود علما بانه يوجد بالماكرو خليه وهى ( c1 ) تشير الي عدد الشهادات المطلوب طباعتها اما زر طباعة ورقه واحده فلا يوجد به مشكله وهذا المكرو حصلت عليه من الأخ ايسم ابراهيم جزاه الله خير والمكرو هو


Sub ()

'
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, collate:=True
End Sub
Sub printall()
'
'ãÇßÑæprintall
'

Range("E1").Select
ActiveCell.FormulaR1C1 = "1"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, collate:=True
Do
ActiveCell = ActiveCell + 2
ActiveWindow.SelectedSheets.PrintOut
Loop Until ActiveCell.Value = Range("C1").Value
Range("a1").Select
End Sub

قام بنشر

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

وانت بخير والجميع بخير ان شاء الله

لم اتوقع اننا نتقابل مره اخرى فلك كل الشكر على مرورك ... والمشكله ببساطه الملف اللذى قمت انت بمساعدتى فيه وكان لك مجهود واضح ومشكور عليه في اتمامه به مشكله فى كود الطباعة وخصوصا في خانة ( اجمالى عدد الطلاب ) فعند وضع عدد الطلاب الفعلى يعمل بشكل جيد أما عندما اقوم بتحديد عدد مثل ( 20 ) شهاده في نفس الخانه يقوم بطباعة الملف بالكامل بل ويتعدى عدد الطلاب الفعلى ايضا ...

فهل من طريقه لطباعة عدد معين من الشهادات مثل ( 10 أو 20 أو اكثر من ذلك ) ؟ خصوصا انه بالتأكيد لبد من وجود طلاب لهم دور ثانى واريد طباعة شهاداتهم منفصله علي سبيل المثال ... ولك كل تحياتى واسف على ازعاجك مره اخرى .... أخوك / جلال محمد

مرفق الملف

_____000________.rar

قام بنشر

الأخ أيسم

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

فكرة رائعه*** ولك منى جزيل الشكر وجعله الله فى ميزان حسناتك .

فالموضوع مطروح فى المنتدى من يوم 6 / 10 / 2008 ولم ينظر اليه أحد... فلك منى كل الشكر على مساعدتك وكان الله فى عونك مادمت فى عون اخيك .

أخوك جلال محمد

قام بنشر

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

الأخ : stiffmillr

شكرا على مرورك

الأخ : جلال لا شكر على واجب فنحن إخوة وشكرا على دعواتك"" و لك مثل ما دعوت""

ما زلت تحت أمرك لو جدت لك مشكلة

أخوك : أيسم إبراهيم :wow: :wow:

20060506_1439494595.gif

قام بنشر

اخى الكريم ايسم

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

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

اخوك / جلال محمد

________0_______.rar

قام بنشر

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

الأخ : جلال

آسف على التأخيير في الرد ولكن أعدك أن أنفذ ما طلبت لكن يوم الجمعة لأن لدي ما يشغلني كثيرا هذه الأيام إلى اللقاء

أخوك : أيسم

:clapping: :clapping: :clapping:

http://www.officena.net/ib/style_emoticons/default/wow.gif

http://www.arabmoheet.net/forum/Members_Up..._1439494595.gif

  • أفضل إجابة
قام بنشر

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

أخ : جلال

تفضل ما طلبت بالملف الأول أرجو أن يكون كما تريد

و أي استفسار أو تعديل أنا تحت أمرك

أخوك : أيسم

بالمناسبة أحنا طلعنا جيران فأنا من ( بنها )

:clapping: :clapping: :clapping:

________0_______.rar

20060506_1439494595.gif

wow.gif

قام بنشر

اخى ايسم .. السلام عليكم .. حفظكم الله

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

  • 2 weeks later...
قام بنشر

اخى ايسم

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

اولا / والله لقد سعدت جدا لعودة المنتدى مره اخرى على العنوان الجديد النت بدون هذا الموقع ليس ممتع ولامفيد

ثانيا / ارجو منك ان ترسل رد على الملف الذى ارسلته من قبل ولك جزيل الشكر

اخوك / جلال

  • 2 weeks later...
قام بنشر

اخى ايسم

السلام عليكم

اخى ايسم ( من لن يحتمل التعلم ساعةبقي في ذل الجهل أبدا ) .. وانا عندى استعداد انتظرك شهور مادمت الحمد الله بخير فقد زاد قلقى عليه فوالله انى احبك في الله ولك جذيل الشكر ويكفينى انك لم تنسى طلبى جعله الله في ميزان حسناتك ان شاء الله

اخى ايسم ( إذا قصرت يدك عن المكافأة فليصل لسانك بالشكر ) فشكرا لك الف شكر

اخوك / جلال

قام بنشر

أخ جلال

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

أحبك الله الذي أحببتني فيه

لا يصدر هذا الكلام الجميل إلا من أنسان ر ائع مثلك ..... كافأك الله بالطيب

إلى اللقاء

أخوك أيسم

http://www.officena.net/ib/style_emoticons...tyle_emoticons/ efault/wow.gif

قام بنشر

السلام عليكم

الفكرة طيبة والمشروع متكامل ولكن رأيت أن الشهادات تبدأ ( إلزاماً ) برقم واحد , فهل ممكن أن أحدد الرقم الذي أريد أن تبدأ منه الطباعة وشكراً .

قام بنشر

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

أخ وائل ممكن ما تريد

اذهب إلى الخلية E2 في نتيجة الكيمياء و حدد الرقم الذي تريد طباعة شهادته ثم انقر الزر ( اطبع ورقة واحدة )

يتم طباعة الشهادة التي اخترت

جرب و انا تحت أمرك

أخوك : أيسم

قام بنشر

أرجو المعذرة للتدخل

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

أعجبني عمل الكنترول للأخ جلال

وأعجبني التعديل من الأح أيسم

ولكن الأجمل من ذلك وذلك هو روح التعاون والأخوة بين الأثنين

شكرا لكما

قام بنشر

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

الأخ وائل شكرا لك على الملاحظه والشكر كل الشكر للأخ ايسم فله دور كبير فى خروج هذا العمل بهذا الشكل واسف لعدم تواجدى فى هذه الفتره لوجود عطل عندى فى النت

والى الأخ وائل يمكن تحديد رقم عن طريق القائمه النسدله التى بها الأسماء وكذلك عن طريق الخليه E2 كما تفضل الأخ ايسم

كما اشكر الأخ amhateb لمروره وكلماته الجميله اما عن روح التعاون فهذا الموقع تسوده هذه الروح وصفه مميزه به وشكرا للجميع

اخوكم / جلال

  • 2 weeks later...
قام بنشر

شكراً على الرد ولكن قصدي هو إذا أردت أن أطبع أكثر من شهادة فهل يلزم أن تبدأ بالرقم ( 1 ) , فلو أردت أن تبدأ الطباعة من الرقم 20 مثلاً فماذا أصنع . وعفواً على التأخر في الأطلاع على الموضوع وذلك لأسباب خاصة ودمتم . أخوك

  • 5 weeks later...
قام بنشر (معدل)

هذا الموضوع جميل وخاصة شيت نصف العام

حاولت تنفيذه بالمدرسة بعد اضافة ارقام الجلوس واعمال السنة ولكنه يحتاج تعديل في ترتيب المواد حسب الشيت الجديد

شكرا للمعد وشكرا للمصحح جلال وأيسم

تم تعديل بواسطه amhateb
  • 3 weeks later...
قام بنشر

السلام عليكم جميعا

عمل ممتاز وجميل من الاخ ايسم وكل من لديه فكرة جميل ولكن ما نريده من المتخصصين فى الاكسيل هو

شرح افكارة وطريقة عمل هذا الشيت لكى نتعلم ولا ناخذ العمل الجاهز ونعدل عليه فلن نتعلم اذا والهدف هو نتعلم كيف ننفذ

هذا العمل بانفسنا ثم نتناقش فى حالة وجود مشاكل او استفسار وشكرا لكم واتمنى الرد وعمل ملف الشيت مشروح كيفيه عمله

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