البحث في الموقع

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

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

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

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

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

مجهود رائع اخي وأستاذي العزيز لى استفسار بالنسبة لهذا الكود هل ممكن اضافة لة بحيث يحفظ عدة جداول مرتبطة بزر زيادة ونقصان مثل طباعة الكل في هذا الكود Sub hany() For I = 1 To [e1].Value [x1].Value = I ActiveWindow.SelectedSheets.PrintOut copies:=1, collate:=1 Next End Sub شكرا لجهودك اخى الكريم

السلام عليكم ورحمة الله أخي الكريم، هذا الكود يسمح بتغيير قيمة الخلية M1 بقيمة الخلية J6 إذا تم تغيير مضمون الخلية الموجودة في تقاطع السطر (ROW) رقم 7 والعمود (COLUMN) رقم 10 وأقصد بها الخلية J7 (الخلية التي تحوي رقم الجلوس). بالنسبة للكود يمكن أن يكون من الشكل: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells = Cells(7, 10) Then Range("M1") = Range("J6") End Sub أو Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells = ٌRange("J7") Then Range("M1") = Range("J6") End Sub أو Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells = [J7] Then [M1] = [J6] End Sub ملاحظات (نسيت أن أذكرها في الملفات المرفقة السابقة): 1- تم إضافة معادلات في العمود الأول من الشيت الأول Sheet1 تقوم بتغيير الرقم التسلسلي تلقائيا حسب مضمون الخلية في العمود B المقابلة لها في كل سطر (صف)... 2- تم إضافة معادلات في الخلايا الموجودة تحت زر "طباعة الكل" واحدة مضمونها 1 والأخرى القيمة الكبرى Max للعمود A من Sheet1 ومعادلة أخرى تحت زر "طباعة رقم الجلوس" تقوم بجلب الرقم التسلسلي من العمود A في Sheet1 حسب "رقم الجلوس" في الخلية J7 (وهذه المعادلات كلها مهمة فلا ينبغي مسحها) أخوك بن علية

السلام عليكم ورحمة الله أود معرفة كيفية طباعة تقرير حسب مجموعة اختيارات من معاينة أو طبع دون معاينة.. ومن هذه الخيارات إمكانية تحديد سجل حالي أو الكل أفيدوني جزاكم الله خير.. ملحوظة.. يوجد عمل مثل هذا اسمه PrintCurrentRecord ولكنه من قاعدين بيانات متربطبتين ببعضهما ولم استطع فهم الاكواد ، وبالأخص الكود الموجود في التقرير نفسه في حدث (عند الفتح) وهو كود بدايته: Me.RecordSource = "SELECT سؤال.zip

السلام عليكم و رحمة الله في المرفق حدد عدد النس المطلبة اختار اسم الفصل المطلوب ثم اضغط على طباعة يتم طباعة الكل مع التحية المصنف1.rar

طباعة الجداول والنماذج سجل أو الكل

السلام عليكم ورحمة الله وبركاته الاستاذ والاخ الحبيب ابو عمرو حفظكم الله سبحانه وتعالى ورزقكم خير الدنيا وخير الاخرة عمل رائع وجهد كبير جعله الله سبحانه وتعالى في ميزان حسناتك وفقك الله ورعاك استاذنا الفاضل عند تجربة الملف وجدت ملاحظات وربما تكون من الاوفس الذي في حاسوبي او يوجد خلل في النظام ارجو تجربة الملف مع ملاحظة الملاحظات التي اذكرها ادناه مع فائق الشكر والتقدير للعمل الرائع والممتاز : 1- عند البحث بالرقم او يالاسم فهو ممتاز لكن عندما اريد ان اطبع الخريج الذي يظهر بالفورم والذهاب الى كتاب التاييد او طباعة بيان الدرجات يتغير فقط رقم الجلوس ولا تتغير العبارات الاخرى سواء في التاييد او بيان الدرجات الا بعد ان اقوم بتحديث المعادلات . 2- عرض الكل لايظهر دائما وعندما يظهر فهو ممتاز للبحث بجزء من الاسم او بالاسم اذا كان بالامكان جعل هذا البحث اساسي دون اخفاءه فهو ممتاز ورائع 3- عند القيام بحذف بيانات الطالب لايقوم بالحذف وتظهر الرسالة التالية عند حذف بيانات خريج.rar بارك الله فيك ورزقك من حيث تحتسب ومن حيث لا تحتسب تقبل فائفق احترامي وتقديري

* الحل إذا كان الإطار لا يظهر كاملا: من إعدادات الصفحة تجعلي ارتفاع الصفحة بدلاً من 29.7 يكون 29 فقط * الحل لعدم عمل كليك خمسين مرة بسبب الهوامش: دائمًا في دمج المرسلات لا بد أن تجعلي هناك مساحة وفيرة لاحتواء الكتابات فمثلا اجعلي الهوامش 2 في أعلى وأسفل ويمين ويسار. وقومي بضغط تباعد الفقرات بين الكتابات. * بالنسبة لطباعة custom range فبالفعل هذا ما يحدث مع دمج المرسلات إذا تم تحديد عدد من الصفحات لا بد أن يطبع الجميع الحل الوحيد الذي أعرفه: هو من ملف الذي به البيانات تقومي بحذف اسماء أصحاب الشهادات التي لا تريدينها في الطباعة ثم من الشهادة الرئيسية تقومي بعمل دمج جديد ثم طباعة الكل وأسأل الله لنا ولكم التوفيق

السلام عليكم ورحمة الله وبركاته احببت ان اضيف على هذا الموضوع من اعدادي لحل احد اسئلة امتحانات الرخصة الدولية لاستخدام الحاسوب ICDL اتمنى ان تستفيدوا وتدعوا لي بضاهر القلب بالدعاء الصالح والسلام وهذه هي افضل طريقة لدمج المراسلات بالتفصيل استخدم هذا الملف كمستند اساسي في دمج المراسلات. اختيار من قائمة ادوات الامر دمج المراسلات فيظهر صندوق مساعد دمج المراسلات فنقوم بما يلي : 1. من الخيار الاول نضغط على الزر انشاء ونختار الامر رسائل نموذجية فيظهر صندوق نختار منه الاطار النشط افتح ملف (addrlist.doc) و هو عبارة عن مجموعة من المعلومات عن الموظفين و استخدمه كمصدر للبيانات. 2. ثم نضغط على الخيار الثاني ونختار الامر فتح مصدر البيانات 3. يظهر صندوق فتح ملف نختار من بحث في المكان المخصص لملفات الامتحانات وهو (Z:). ثم نقوم بتظليل ملف addrlist.doc ثم نضغط على المفتاح فتح 4. يظهر صندوق نختار منه تحرير المستند الاساسي ثم يختفي الصندوق ويظهر الملف من جديد ولكن تم اضافة شريط جديد على اشرطة الادوات هو شريط الدمج 1. ادمج الحقول الموجودة في ملف (addrlist) وقم بإضافتها في نهاية الملف على الجهة اليسرى ثم قم بعملية الدمج. نقف في نهاية الملف على الصفحة الثانية ثم نقف على جهة اليسار ثم نقوم بادارج حقول الدمج من شريط دمج المراسلات حيث نختار الحقل (الاسم) ثم نضغط على مفتاح Enter ثم نختار الحقل الثاني (الشركة) ثم Enter ثم نختار الحقل الثالث ثم نقوم بالحفظ وبذلك نكون قد جهزنا ملف الدمج بادراج الحقول في المكان المطلوب وتبقى عملية الدمج لمستند جديد . فنقوم بما يلي : اختيار من قائمة ادوات الامر دمج المراسلات فيظهر صندوق مساعد دمج المراسلات ثم من الاختيار الثالث نختار دمج فيظهر صندوق دمج نلاحظ وجود الخيار مستند جديد تحت قائمة الخيارات الدمج الى وهذا يعني ظهور ملف او مستند جديد يحتوي على الحقول المدمجة تحت كل صفحتين من الملف السابق ( لان الملف يحتوي على صفحتين ) ثم نضغط على الزر دمج فيظهر ملف جديد كما ذكرنا سابقاً 2. احفظ الملف الجديد تحت اسم (نموذج 4 دمج)؟ من قائمة ملف نختار حفظ بإسم ثم نقوم بحفظ الملف على المكان المخصص بإسم ( نموذج 4 دمج ) 3. اطبع الملف الاول على نسخة واحدة؟ نرجع الى الملف الاول ( .docنموذج 4) ثم من قائمة ملف نختار الامر طباعة فيظهر صندوق الطباعة ونحدد العدد المطلوب للنسخ او ارقام الصفحات المطلوبة للطباعة ثم نختار الامر موافق لتتم عملية الطباعة. وفي حالة الطلب طباعة الى ملف نضع اشارة عن الامر طباعة الى ملف ثم نختار الامر موافق فيظهر صندوق حفظ الملف ونختار الاسم والمكان المخصص للحفظ (Z) 4. قم بحفظ الملفات وقم بإغلاقها ؟ نضغط على مفتاح Shift باليد اليسرى ثم من قائمة ملف نختار الامر حفظ الكل او نتوجه لكل ملف على حدى ونخار حفظ من قائمة ملف. 5. اغلق تطبيق معالج النصوص. نضغط على مفتاح Shift باليد اليسرى ثم من قائمة ملف نختار الامر اغلاق الكل او نتوجه لكل ملف على حدى ونختار اغلاق من قائمة ملف ثم انهاء. والسلام عليكم ورحمة الله وبركاته ملاحظة : قمت بعملية نسخ للحل مع الصور ثم عملية اللصق ولم تظهر الصور واذا في هنالك طريقة اخرى اما لظهور الصور او ارفاق ملف الورد بالحل المفصل بالصور انا جاهز بس احكولي كيف !!!!!! مهند الشيشاني

السلام عليكم لقد قمت بعمل كود الطباعة ورقة واحدة وكذلك طباعة الكل ولكني الآن مشغول عندما اعود إن شاء الله سأقوم بعمل الباقي لأني مشغول جدا الان شيت كنترول.rar

السلام عليكم بعد اذن اخي بن علية حفظه الله استخدمت نفس كود طباعة الشهادات مع بعض التغييرات ويمكنك تغيير اعدادات نموذج الطباعة من هذه الجزئية في الكود '*********************************************** '*********************************************** ' اسم ورقة جميع الايصالات Const ShName As String = "جميع الايصالات" ' رقم اول صف للايصال Const FirstRow As Integer = 7 ' عدد صفوف الايصال Const CountRow As Integer = 30 ' رقم اول عمود للايصال Const FirstColumn As Integer = 2 'عدد اعمدة الشهادة التي تريد اظهارها في الطباعة Const CountColumn As Integer = 15 ' خلية تسلسل الايصالات Const Range_Index As String = "A7" ' خلية عدد كل الايصالات Const CountAll As String = "J3" '************************************************ '************************************************ شاهد المرفق طباعة الكل.rar

اخواني الكرام لقد تمكنت من عمل 90% من البرنامج ارجو ان تساعدوني في الباقي المطلوب فضلاً وليس امراً.: 1- اريد ان احجب زر صلاحيات المستخدمين بحيث لا تضهر إلى للمدير لاني لم اتمكن من تحديد هذا الزر للمدير فقط بحيث إذا ادخل كلمة المرور الخاصه بالمدير يتم تفعيل الزر( فقط للمدير). اسم المستخدم الخاص بالمدير هو : group1 كلمة المرور : aass 2- اريد اسم المستخدم يضهر في النماذج وفي التقارير . 3- اريد البحث يعمل بشكل صحيح ( رقم العميل او اسم العميل). 4- في زر الطباعة تضهر رساله للمستخدم يدخل الفتره التي سجل فيها العميل يعني يقوله اطبع العملاء الي سجلو من تاريخ كذا إلى تاريخ كذا ولازم يحدد هل هو يريد طباعة الذين قامو بالسداد او الذين لم يقومو بالسداد او الكل كالتالي(تم السداد او لم يتم السداد او الكل ).هو الان شغال معاي زي الحلاوه بس هذا ماينفع انا اريدها قائمه منسدله بدل من الإدخال اليدوي . 5- اريد التاريخ والوقت تعمل بشكل صحيح (الان متوقفه مادري اش السبب). 6-وإذا امكن اريد ان اعرف كمبرمج للبرنامج هذا بطريقه لايعلم بها المستخدم بعرف متى دخل البرنامج ومتى خرج . 7- اريد ان اجعل التاريخ في إدخال بيانات العملا نموذج (TVV ) تلقائي يعني لايقوم المستخدم بإدخاله يدوي مجرد يضغط على إضافه يطلعله تاريخ اليوم ألي ادخل فيه البيانات ويتسجل في الجدول . وارجو المساعده ولو بسؤال واحد بس ونا متاكد ان هذه الاسئله سوف تقوم بمساعدة الكثير من المبتدائين في الاكسس ارجو من الخبراء المساعده وشكراُ 2_______________.rar

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

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

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

بسم الله الرحمن الرحيم استاذنا علي السحيب تحياتى لك شكرا لك على تشجيعكم الكريم لنا ومروركم الاكرم للمتابعة لى رجاء فى ( برنامج طباعة الشهادات المدرسية للمرحلة الابتدائية ) يشتكى بعض الاعضاء من ظهور رسالة خطأ (error 9) عند استخدام زرى ( طباعة الناجحين ) و ( طباعة الكل ) وهما يعملان على جهازى بدون مشاكل ارجو التكرم بتجربتهما والتحقق من ذلك رابط الموضوع : http://www.officena.net/ib/index.php?showt...13972&st=15 تحياتى واحترامتى لشخصكم الكريم

الأستاذ / علي السلام عليكم ورحمة الله وبركاته جزاك الله خيرا ... وبعد --- طريقة طباعة الشهادة عرضية نظرا لكثرة البيانات المطلوبة .. رجاء أن نحذف خانتي نسبة الطالب وبيان ونجعلهم أسفل الشهادة .. حتى تكون الطباعة طولية --- رجاء أن تضيف خانة بجوار المسلسل باسم رقم اللجنة وتحتها سنكتب مثلا 1 & 1 & 1 وبعد أن ينتهى عدد اللجنة نكتب أرقام اللجنة التالية 2 &2 & وهكذا ... المطلوب طباعة كل لجنة على حدة ... بها المسلسل ثابت في كل لجنة من 1 الى 20 مثلا واسم الطالب ورقم جلوسه ونسمي هذه الورقة الموجود بها المسلسل واسم الطالب ورقم الجلوس ب( كشف المناداه ) --- إذا تغير عدد المواد بالزيادة أو النقص فكيف نتصرف ؟ --- مرسل صورة من رقم الجلوس .. رجاء استرجاع بيانات الاسم ورقم الجلوس ورقم اللجنة وصفحة طباعته 3 بطاقات لرقم الجلوس وفيها يتم طباعة طالب واحد أو الكل ولك خالص الشكر والنقدير وإن شاء الله من الله كل خير Book1.rar

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

بسم الله الرحمن الرحيم الاخت أمينة بعد التحية لماذا الاصرار على الطباعة من خلال الورد يمكن عمل ذلك من خلال الاكسل وبنفس التنسيق انظرى المرفق : حتى الانتهاء من التعديلات يتم عمل معاينة قبل الطباعة بدلا من الطباعة المباشرة لمشاهدة شكل الشهادات . 1 - يمكن تعديل تنسيق الشهادة كما تريدين اذا كان هناك بعض الاختلافات . 2 - يمكنك اختيار الرقم الطلابى من المكان المشار اليه فتتعدل بيانات الشهادة ثم طباعتها بالضغط على "طباعة شهادة واحدة" ذات اللون الازرق . 3 - يمكنك طباعة كل الشهادات مره واحدة بالضغط على "طباعة الكل" ذات اللون الاحمر . بعد التعرف على الارشادات احزفى العلامات الارشادية مح تحياتى _______.rar

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

السلام عليكم اخي في المرفق تم العمل على اساس ان ناحية الطباعة في كل الأوراق هي واحدة "B1:D29" يمكنك طباعة الكل او ورقة محددة حسب اسم الورقة Book1skyblu.rar