محمد ابو البـراء

بارك الله فيك أخي الكريم أبو اميرة

كنت سافعل ذلك منذ البداية

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

وكان من المفروض ان تكون هناك ورقة الدرجات

فلهذا اقتصرت فقط على وضع الكود دون التنفيذ

لاننى لم استطع التجربة بشكل سليم..

أخي بارك الله فيك لم افهم طلبك جيدا؟!

هل تريد تحويل الرقم المجموع الى شي أخي ام ماذا تريد؟!

اتمنى ان ترسل ملف جديد

وضع انت فيه النتيجة التى تريد ان تظهر يدوياً لافهم مقصودك

تفضل أخي لعل هذا ما فهمته

ترحيل خلايا1.rar

وعليكم السلام

لا

لا تغيري شي

لانه سيرحل العواميد كما هي وفيها 0 في عواميد اعمال السنة  ويمكن اخفاء هذه العواميد بعد الترحيل

والدتي اول طريقة هي تغير المعادلات الموجودة في درجات كل مادة في الصف 8 من وقة الشيت

وتحويل الارقام بدلا ما هي مضروبة في 40% الى 50%

والمضروب في 10% الى 0

ثم نضع في درجة عمود اعمال السنة لكل المادة 0

ثم نقوم باخفاء هذه العواميد ( عواميد اعمال السنة )

اتمنى ان تكون وصلت الفكرة

ولعله القريب العاجل يوم او يومين يخرج هذا الشيت والتعديل عليه بسيط بإذن الله

ولكن اتمنى ان تتاكدى من هذا الشيت شيت الانتظام

الاستاذة الفاضلة //نو الهدى على

اعلم ما اخبرتي به

وهذا الشيت يصلح

ولكن يحتاج جهد كبير لاخراج النتيجة سليمة..

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

هذا هو أخر تعديل

بتاريخ الاثنين 14/4/2014

http://www.gulfup.com/?RROpXa

======

تنبيه

لسهولة الوصول للمشاركة جعلت المشاركة كموضوع محلول

واتمنى المتابعة من حين لاخر

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

لحين صدور الاصدار الخامس_ بإذن الله _ بعد الانتهاء من الامتحانات والتفرغ لتكون نسخة نهائية بمميزات جديدة وبدون اخطاء

شيت النقل للتعليم الفني 20 مادة تضاف للمجموع + 2 مادة لا تضاف للمجموع _الاصدار الرابع-الاثنين _14-4-2014.rar

في الحسبان أخي الحبيب وليد وجزاكم الله خيراً..

وشاكر لك تعبك معى وامدادي بالافكار

فجزاك الله خيراً على كرمك

وحعله الله في ميزان حسناتك..

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

مرحبا بالاستاذ الفاضل// أبو اميرة

كما اشكر الاستاذ // جلال محمد على محاولته

ولكن هذه الطريقة لن تصلح في الشهادات لان الدوائر الحمراء لم تتغير مع تغير الشهادات

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

وهي توضع في حدث الصفحة

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Dim shp As Shape, d As Integer
    For Each shp In ActiveSheet.Shapes
      If shp.AutoShapeType = msoShapeOval Then shp.Delete: d = d + 1
    Next shp
Dim c As Range
Dim MyRng As Range, V As Shape
Dim x As Integer, G As Integer, r As Integer
'================================================
G = 1      '    عمود رقم الجلوس
r = 13       '    صف الدرجات
Set MyRng = Range("D14:n44")  ' نطاق الخلايا الذي تريد اضافة الدوائر فيها
'================================================
x = ActiveWindow.Zoom
Application.ScreenUpdating = False
ActiveWindow.Zoom = 100
For Each c In MyRng
    If Cells(c.Row, G) = 0 Or Cells(c.Row, G) = "" Then GoTo 1
    If IsNumeric(Cells(r, c.Column)) And Not IsEmpty(Cells(r, c.Column)) And (c.Value < Cells(r, c.Column) Or c.Value = "غ" Or c.Value = "غـ") And c.Value <> "" Then
    Set V = ActiveSheet.Shapes.AddShape(msoShapeOval, c.Left + 1, c.Top + 1, c.Width - 2, c.Height - 2)
        V.Fill.Visible = msoFalse
        V.Line.ForeColor.SchemeColor = 10
        V.Line.Weight = 3
        d = d + 1
    End If
1 Next
ActiveWindow.Zoom = x
Application.ScreenUpdating = True
End Sub

جزاكم الله خيراً أخي الحبيب // وليد فتحي

والحمد لله على كل حال

واما بالنسبة للترتيب

هذا الامر لم ارد عليه لاني اعتبرته من الامور التى تقع تحت التنظيم والشكل الجمالي للعمل

بمعنى انك ستلاحظ ان غالب الصفحات في الشيت مضبوطة على وضع 500 طالب كحد اقصي ثم اقوم باخفاء باقي الصفوف

حتى ولو كانت المعادلات تدل على اكثر من 500

وفي هذه الصفحة نسيت ان اخفي الصفوف بعد الــــ 500

فاتمنى ان تكون وصلت الفكرة

جزاك الله خيراً أخي الحبيب // وليد فتحي

واحبك الله الذي احببتنا من اجله

ثم

ولا يهمك أخي الحبيب

ولكن

لم تعطني وجهة نظرك  لردي على التعليقات التى وجهتها انت في المشاركة رقم 6

هل انا مصيب فيها

ام

وهمت انا فيها؟!!

الاستاذ الحبيب والاخ الغالي // وليد فتحي

بارك الله فيك أخي الحبيب

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

ثم

لماذا لم تكمل التعليقات القيمة ؟!!!

والتى اراها مفيدة جدا لاستكمال العمل بشكل رائع!!!

أخي الحبيب // جلال الجمال

جزاك الله خيراً على دعائك

وشكراً على مروركم العطر..

بارك الله فيك أخي الحبيب // جلال الجمال

على هذا المجهود الرائع

جعله الله في ميزان حسناتك

واه لو كان هناك شي من الترتيب وترقيم الارشفة  (اقصد عنوان الموضوع ) لكان هذا العمل اكثر افادة

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

والدي الحبيب // أبو انتصار

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

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

هو مرورك الكريم

ودعائك العضيم

فلا تبخل علينا بالسلام من وقت الى حين

بجد كنت وحشني وكنت بفكر ابعتلك السلام

ولكن الحمد لله اطمانت عليك..

استاذ // nasersaeed

في صفحة كشوف المناداه عند تغيير عدد اللجنه تعطي رسائل خطأ

ممكن ترسل صورة لهذه الرسالة

ولي سؤال؟َ!

ما هي الطريقة التى تغير حضرتكم بها اللجنة ؟!

والدتى الفاضلة// أم عبد الله

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

وجزاكم الله خيراً على تشجيعاتكم لي الدائمة

ثم

والدتي الكريمة هناك تعديلات بسيطة  تم تنفيذها على الملف وساقوم برفعها ولكن انا في انتظار باقي التعليقات

حتى وان وجد اي شئ يتم تعديله بالمرة

ثم

بعتذر لك وللجميع وانتم تعلمون ان هذا العمل شاق والله

وتم عمله في ظروف غير مناسبة جدا

وجاء في وقت ضيق

وعلى غير عادتي في التاني في عمله واخراجه بالشكل الذي يليق به

ثم

انتم تعلمون الاكسيل وما فيه

فاغرب شي ان هناك مشكلات باسباب ربما يراها البعض بسيطة ولكنها تسبب مشاكل

كتثبيت خلية او حرف تم كتابته خطأ ...الخ

وانا احاول ان اخرج الملف بدون اي مشاكل وان كانت صغيرة

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

الاستاذ الحبيب والاخ الغالي // وليد فتحي

بارك الله فيك أخي الحبيب

وجزاك الله خيراً على تقييمك

واسال الله ان يجعل المودة بيننا دائماً قائمة أخي الحبيب

ثم اكرر شكري لاهتمامك بهذا الشيت

وان دل على شي فيدل على على حرصك على الاخرين فبارك الله فيك

وهذه بعض الردود على النقاط التى اثرتها من أخ لاخيه

1 )

بالنسبة لـــ

صفحة بيانات المدرسة

صفحة جدول الامتحانات

صفحة ارقام الجلوس

صفحة الشيت

صفحة شهادات اخر العام

هذه الامور لا اشكالية فيها

طبعا انا اوافقك الراي

فانت تريد بعض من الشكل الجمالى يتبعه شغل افضل وكمال العمل

وهذا ما انظر انا اليه دائما

بل هناك افكار اخرى تدور في عقلي اتمنى تنفيذها

ولكن الوقت والظروف عاملان اساسيان في منعي من ذلك

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

2 )

صفحة له دور ثان بنهاية الصفحة أنت تحدد مواد الرسوب اتمني ان تراجع المعادلة الخاصة بمواد الرسوب وهي

=IF(OR(E16="";AF15="");"";IF(OR(AF15="غ";AF15<$AF$14);"راسب";"ناجح"))

اخي الحبيب

باختصار

انا اتعامل مع  الصف رقم 15 وليس 16 في هذه الورقة

لان هذه الورقة ورقة الدور الثاني

وسيتم تكملة  درجات  الدور الثاني فيها

ومعنى المعادلة

اذا لم يكن هناك اسم في خلية الطالب في الصف 16 فاجعل الخلية فارغة

( وهذا ما احتاجه فقط من الصف رقم 16 )

ثم  يبدا الشغل على الصف 15

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

وهاتين الحالتين ستتما  في الصف 15 وليس في الصف 16

وهما درجة الطالب في الدور الثاني اقل من الدرجة الصغرى او غياب الطالب

 وهي ستتم بعد وضع درجات الدور الثاني في الصف 15

واتمنى ان تراجع هذا جيدا وان كنت مخطا :صوبنى صوبك الله للخير

3 )

صفحة نتيجة الدور الثاني عمود حالة الطالب يوجد به هذه المعادلة

=IF(E9="";"";IF('له دور ثان'!HB15="";'له دور ثان'!HB16;'له دور ثان'!HB15)

ليه محدد لو خلية المادة الثانية هي لو فارغة تبقي خلية حالة الطالب فارغة ( ملحوظة :- انا ليس لدي علم بقوانين التعليم الصناعي

أخي الحبيب شكرا على هذه الملحوظة الدقيقة

ولكن  

لو دققت جيدا في المعادلات التى تسبق هذه المعادلة _ أي معادلات المواد _

ستجد ان هذه المعادلة تشبههم في الطريقة

وهذا الشرط في المواد لابد منه

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

وهي الان لا اشكالية فيها

لان الخلية التى تسبق خلية حالة الطالب لم يُكتب فيها أي شي

فهذا الشرط اصبح تحصيل حاصل وطبعا مسحه افضل

واخيراً جزاك الله خيراً وفي انتظار المزيد من التعليقات

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

احب اولاً اشكر

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

والاستاذ // ناصر سيد

على مرورهم العطر

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

واستغل هذه الفرصة للاستاذين الكريمين

واتمنى ان يتم استبدال اسم الظهور الى اللغة العربية لسهولة التواصل بيننا كما ان هذا الامر من اساسيات قوانين المنتدى

استاذي الفاضل وأخي الحبيب // اسامة عطاالله

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

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

فجعل الله اعمالكم في ميزان حسناتك

وفي انتظار التجربة

بارك الله فيك

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

تم تعديل هذه الاصدار

وانزال الاصدار الرابع به اخر التحديثات

بتاريخ السبت 12/4/2014

على الرابط التالي

http://www.officena.net/ib/index.php?showtopic=53147#entry333619

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

تم تعديل هذه الاصدار

وانزال الاصدار الرابع به اخر التحديثات

بتاريخ السبت 12/4/2014

على الرابط التالي

http://www.officena.net/ib/index.php?showtopic=53147#entry333619

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

تم تعديل هذه الاصدار

وانزال الاصدار الرابع به اخر التحديثات

بتاريخ السبت 12/4/2014

على الرابط التالي

http://www.officena.net/ib/index.php?showtopic=53147#entry333619

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

تم تعديل هذه الاصدار

وانزال الاصدار الرابع به اخر التحديثات

بتاريخ السبت 12/4/2014

على الرابط التالي

http://www.officena.net/ib/index.php?showtopic=53147#entry333619

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

بعد الحمد لله والصلاة والسلام على رسول الله

وبعد

وبعد نزول الاصدارالثالث وقيام بعض التعديلات عليه

وطلب بعض الاخوة جزاهم الله خيراً بطلب بعض التعديلات

قررت مستعينا بالله ان انزل الاصدار الرابع

اهم المميزات الاصدار الرابع

1 ) تعديل بعض الاخطاء البسيطة التي كانت في احد الورقات

2 ) بناءأً على طلب الاخوة اضفت ورقة شهادات للدور الثاني

والان اترككم للتصفح وانا في انتظار ارائكم والسلام عليكم ورحمة الله وبركاته

للعلم جميع المعلومات عن هذه المرحلة وما يخصها من درجات والقرارات الوزارية ماخوذة من الاستاذ //ahmed alimer فله الشكر

كما اشكر كل من ساهم في امدادي ببعض المعلومات ومنهم

الوالدة الفاضلة // أم عبد الله

الاستاذ الفاضل // اسامة عطاالله

الاستاذ الفاضل // حسين شاكر

وعند وجود اي أخطاء ارجو الابلاغ لتعديلها

واتمنى لمن هو مهتم بهذا الشيت ان يتابع اخر مشاركات لهذا الموضوع من حين لاخر

فربما نجد اخطاء ويتم تعديلها..

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

شيت النقل للتعليم الفني 20 مادة تضاف للمجموع + 2 مادة لا تضاف للمجموع _الاصدار الرابع-السبت _12-4-2014.rar