احمد بدره

تم التعديل الفرز ليكون من الأكبر للأصغر وتم تعديل رقم العمود إلى F بحيث لو أخر خانة كتبت فيها في العمود F طبعًا ولو حذفت منها أي لابد من التعديل حتى ولو ضغط دبل كليك بالماوي في العمود F بدءًا من 7 فإذا كان معادلة الجمع التي تريد وضعها في العمود g يبقى الوضع كما هو أما إذا كان معادلة الجمع في العمود H أو غيره فقم بتغير رقم العمود If Target.Column = 6 And Target.Row > 6 Then ورقم العمود هو الرقم الملون وأسفله خط تجربه فرز0.xlsm تجربه فرز0.xls

عذرًا أستاذmohamed abdelhalim على تأخر الرد لأنني منشغل جدًا وإليك التعديل المناسب ملحوظة إذا قل عدد الطلبة عن70 طالب فإن البرنامج يقوم بإخفاء الصفوف الفارغة في القائمة أتوماتيكيًا قوائم الفصول .xls

في صفحة حدث الورقة وطبعًا قلت قبل ذهاب كيفية الوصل إليه If Target.Column = 7 And Target.Row > 6 Then هذا الكود هو رقم العمود 7 ممكن تغييره إلى رقم العمود الذي تراه مناسب لك وفي الأسفل كود بعنوان فرز موجود به سطر MsgBox "تم الترتيب بنجاح" يمكن إلغاء عمل هذه الرسالة بالوقوف بالمؤشر في بداية سطر الكود ( يمكن الوقوف في أي مكان بالسطر والضغط على مفتاح Home) وجعل لغة الكتابة الإنجليزية والضغط على مفتاح ط ( مكانه فوق مفتاح Shfit) ليصبح السطر هكذا 'MsgBox "تم الترتيب بنجاح" فتلاحظ أن السطر تغير لون الكتابة إلى اللون الأخضر وهذا معناه أن هذا السطر لا يعمل وطبعًا ممكن حذف السطر نهائيًا ولا يؤثر في الماكرو وأنا كنت قد وضعته لأثبت لك أن الماكرو يعمل

تم عمل برنامج موجود بالمنتدى باسم قوائم فصول

تم عمل المطلوب قوائم الفصول معهد بلبيس.xls

كان عندي نفس المشكلة في ملف قمت بتحميله من على النت ولما أتت المشكلة قم بفتح مصنف جديد وقمت بعمل نسخ لأوراق العمل التي بالملف الذي به المشكلة وقمت أيضًا بسنخ وحدات الماكرو وقمت بحفظ المصنف الجديد بتسيق 1997-2003 أي xlsm وقم بعدها بغلق الملف الجديد وفتحته مرة أخرى ظهرت رسالة أنه يوجد ارتباط طبعًا ذهبت لقائمة بيانات واخترت تحرير الارتباطات وقمت بعمل قطع الارتباط وبذلك أصبح يعمل بدون أي مشكلة

تم تعديل بحيث يكون عندما يحدث أي تغيير في العمود G بدلاً من العمود H وطبعًا ابتداءًا من الخلية G7 إلى نهاية العمود المهم أنه عند إضافة أو حذف أي شيء في أحد الخلايا في العمود G يتم الترحيل وتم عمل ظهور رسالة تفيد بأنه قد تم الترتيب بنجاح مرسل ملفين الأول بتنسيق إصدار 97-2003 (ملف العمل يعمل مع كل إصدرات الأوفيس ) و ملف بتنسيق تمكين وحدات ماكرو ( يعمل فقط مع إصدرات الأوفيس ابتداءًا من إصدار 2007 والسبب في إرسالي ملفين أنه أحيانًا تأتي رسالة في شريط أحمر عند فتح ملف بتنسيق ( 97-2003 ) المفروض اختر تمكين وتحرير على أي حال للشخص الذي عند درايه بهذا . والسبب في ظهور تلك الرسالة أنه تم عمل وحدات ماكرو في هذا الملف على أجهزة أخرى تجربه فرز0.xlsm تجربه فرز.xlsx

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

هناك مشكلة في التحميل من العنوان المذكور

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

جرب المعادلات التي بالمرفق للرفع.rar

قم بإنقاص العدد الموجود في الخلية D1 بمقدار (1) إن لم تستطع ذلك بمعادلة اذهب لخلية أخرى واكتب المعادلة =(d1)-1 وقم بتغيير Range ("d1") إلى اسم الخلية الجديدة

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

أشكرك أستاذي سليم على مرورك وملاحقوائم.xlsظاتك وتم التعديل قوائم.xls

قم بتجربة هذا الكود =IF(A2="";"";IF(A2<=SMALL($A$2:$A$17;5);15;IF(A2<=SMALL($A$2:$A$17;9);21;30)))

أشكرك أستاذي سليم على انتباهي أن محرر الأكواد بكلمة سر فأنا لم أتعمد ولم أنتبه لهذا والملف تم إلغاء كلمة السر من محرر الأكواد قوائم.xls

تم التعديل بالغاء عمل السطر ' Target.ClearContents COMM.xlsm

أقدم لكم برنامج عمل قوائم فصول يصلح لكل المراحل يتم التعامل به بكل سهولة قوائم.xls

تفضل الكود المعدل المطلوب =IF(A2="";"";IF(A2<=SMALL($A$2:$A$17;5);15;21))

الملف يعمل بشكل جيد وليس به أي مشكلة ملاحظة الأرقام كانت مرتبة فلا تلاحظ أي شيء تذكر عند الضغط بالماوس دبل كليك أو كتابة أو حذف أي شيء في العمود H بدءًا من H7 أما بخصوص كيفية التطبيق على الملفات الأخرى قم بالذهاب إلى ورقة العمل من الأسفل واضغط كليك يمين تظهر قائمة اختر ( عرض تعليمات البرمجة ) يظهر حدث الورقة حدد الكل بالضغط على مفتاح كنترول + A ثم اختر نسخ اذهب لورق العمل في الملف الذي تريد التطبيق عليك كرر خطوات التي في الصورة يظهر حدث الورقة قم باللصق بالضغط على مفتاح كنترول + V وإليك الملف مرة أخرى تم التعديل عليه حتى يتم العمل بالأكواد في أي ملف آخر أو ورقة عمل أخرى تجربه فرز0.xls

تفضل المطلوب لا داعي لكتابة السنة إكسيل يقوم باستخراج السنة استحقاق الاجازة.rar

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

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

تم عمل المطلوب كما تريد عمل 4 ورقات عمل بعد الانتهاء من كتابة أو التعديل في الخليةH36سوف يتم ورقة العمل لورقة العمل( الفاتورة التي تليها) زر واحد اخفاء واظهار.zip

تفضل المطلوب بالنسبة لملف تم تعديل كود الترتيب وكتابة النوع أمام كل طالب حتى يتم الترتيب اسماء الذكور أولاً في كل فصل وبالنسبة للملف الثاني فكرته أنك تدخل البيانات ثم الضغط على زر ترحيل وهو يقوم بعمل قوائم كل فصل في صفحة وطبعًا به إحصائيات كل فصل ولكن يظهر الإحصاء في الصفحة التي نضع فيها البيانات إلا بعد الضغط على زر الترحيل برنامج قوائم الفصول.xls فوائم مدرسة 2018.xlsm