بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
البحث في الموقع
Showing results for tags 'راائعة المحترم ياسر خليل'.
تم العثور علي 1 نتيجه
-
رائعه المحترم ياسر خليل كود لتحويل درجات الطلاب لمستويات ( تقديرات ) .. تصلح للترم الاول Option Explicit ' هذا الكود من روائع المحترم ياسر خليل 'الهدف من الكود هو تحويل درجات الطلاب الى مستويات ( تقديرات ) 'تم عمل هذا الكود بتاريخ 12/1/2017 Function Level(Mark As Variant, OutOf As Long) As String If IsNumeric(Mark) Then Mark = Mark / OutOf Select Case Mark Case Is <= 0 Level = "" Case Is < 0.5 Level = "دون المستوى" Case Is < 0.65 Level = "مقبول" Case Is < 0.75 Level = "جيد" Case Is < 0.85 Level = "جيد جداً" Case Is <= 1 Level = "ممتاز" Case Else Level = "" End Select Else Select Case Mark Case "غ" Level = "غ" Case "صفر" Level = "دون المستوى" Case "واحد" Level = "دون المستوى" Case "اثنان" Level = "دون المستوى" Case "ثلاثة" Level = "دون المستوى" Case Else Level = "" End Select End If End Function ======================================= Level UDF Using Select Case YasserKhalil ExcelLover.rar جزاه الله عنا كل خير
