أبو إيمان

برجاء التوضيح أكثر

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

جزاك الله خيرا أستاذنا الفاضل والكود يعمل اخي كومندوز

Dim I As Integer For I = Range("F2") To Range("G2") If I <= Range("G2") Then Range("I2") = I ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True End If Next I Range("I2").Select End Sub أخي الفاضل في هذا الكود تم تعريف متغير من التوع الرقم الصحيح واسمه i وبعدها تم عمل حلقة تكرارية لقيمة هذا المتغيير بالقيم الموجودة داخل الخلايا F2") و("G2 وبعدها تم وضع شرط وفيه يتم تنفيذ عملية الطباعة مادامت قيمة المتغير اقل من القيمة الموجودة بالخلية g2 وبعدها يتم النزول لنهاية الحلقة التكرارية ليت تنفيذها من جديد حتى تصل قيمة المتغير إلى القيمة النهائية والموجودة بالخلية g2 أخى الفاضل هذا على حد فهمى وأرجو أن أكون وفقت في الشرح واعتذر لأستاذي الفاضل / رجب جاويش أننى قمت بالشرح قبل موافقته

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

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

دائما من السباقين استاذنا / رجب جاويش

الاستاذ الفاضل / دغيدي الشكر لله أولا ثم الشكر لك والأساتذة الأفاضل الذين نتعلم منهم الكثير والكثير الأستاذ/ عباس فكرة جميلة وجزاكم الله خيرا

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

بعد إذن الأستاذ الكبير الاستاذ دغيدي إليك المرفق التالي ولكنه يعتمد على العمود b فقط ويمكن ان نستفيد أكثر من أستاذنا الفاضل 01.rar

السلام عليكم هل هذا ما تقصد 1.rar

ألف مبروك وجزاكم الله خيرا وتستحق أكثر من ذلك وتمنياتى لك بمزيد من التقدم

بعد إذن الأساتذة الأفاضل الاستاذ وحيد إليك جزء مما طلبت وهو أن الكشف يحتوى على 25 طالب والعدد بالمدرسة 5000 لكن ماذا تقصد أخي بأن عدد المجموعة الواحدة يصل إلى 500 تجهيز السري مجموعات2.rar

بسم الله والصلاة والسلام على رسول الله أخى الفاضل إليك المرفق وهو ليس من تنفيذي وهو تقريبا من تصميم العلامة خبور تجهيز السري مجموعات.rar

السلام عليكم أخي الفاضل أين درجة نهاية الترم الخاصة بالأنشطة شيت كنترول اخر العام.rar

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

بسم الله والصلاة والسلام على رسول الله بعد إذن الاساتذة الافاضل إليك تنفيذ مبدئي لما هو مطلوب وسوف تجده في شهادات الصف الأول لحين توضيح بعض النقاط في المرفق والله ولي التوفيق شيت كنترول اخر العام2.rar

جزاك الله خيرا أستاذ محمود ووفقك إلى ما يحب ويرضى

استاذي محمود المقصود هو وضع الأسماء وبيناتهم في صفحة وجدول التغيب في صفحة أخرى

الأستاذ وليد تحية طيبة وبعد يمكنك الدخول على هذا الرابط يمكن أن يفيدك http://www.officena.net/ib/index.php?showtopic=44728

للرفع

بارك الله لك أستاذ أحمد وبارك لجميع اعضاء المنتدى الكرام

السلام عليكم أنا MR_eldeeb سابقا وحاليا أبو إيمان بالرغم من أن الديب هذا لقب عائلتي

أخي الفاضل ممكن إفادتي بالرسالة التي تظهر لك (هذا من شأنه أن يعلمنى شئاً )

يمكن إضافة كود بسيط يقوم باظهار الصفحة ( الشيت المطلوب ) ثم الانتقال لها والله الموفق وإليك المرفق ولعلي أكون وفقت في فهم السؤال وتوضيح الاجابة للإظهار.rar