jalal030 قام بنشر نوفمبر 3, 2011 مشاركة قام بنشر نوفمبر 3, 2011 السلام عليكم ورحمة الله وبركاته نرجو من حضراتكم تزويدنا بكود تفقيط العلامات رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر نوفمبر 4, 2011 مشاركة قام بنشر نوفمبر 4, 2011 السلام عليكم اخي الفاضل كل عام وانت بخير نرجو منك التوضيح بارك الله فيك رابط هذا التعليق شارك More sharing options...
jalal030 قام بنشر نوفمبر 4, 2011 الكاتب مشاركة قام بنشر نوفمبر 4, 2011 السلام عليكم ورحمة الله وبركاته نرجو من حضراتكم تزويدنا بكود تفقيط العلامات السلام عليكم المقصود الدرجات وتحويلها من رقم الى كتابه رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 5, 2011 مشاركة قام بنشر نوفمبر 5, 2011 تفضل اخى وجرب المرفق كل عام وانت بخير عيد سعيد ELFAR.rar رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر نوفمبر 5, 2011 مشاركة قام بنشر نوفمبر 5, 2011 تفضل اخى وجرب المرفق كل عام وانت بخير عيد سعيد بارك الله لك أخي جمال وكل عام أنت ومن تحب بكل خير فكرة رائعة استخدام كود التفقيط العام لتفقيط الدرجات ولكن المشكلة أن تفقيط المال يكون بصيغة مثلا: خمسة وأربعون جنيهاً وخمسون قرشاً فيوجد وحدة للعدد الصحيح ووحدة للكسر أما الدرجات فليس لها وحدة في الكسر ويقال فقط: خمس وأربعون درجة ونصف ...... واستكمالاً لمشوارك أضع بين أيديكم هذا الملف لتفقيط الدرجات وبصفتي معلم للغة العربية ستجد أيضاً أنه موافق لقواعد العدد في اللغة العربية بإذن الله ............ وكل عام وجميع الإخوة بكل خير تفقيط الدرجات.rar 2 رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر نوفمبر 5, 2011 مشاركة قام بنشر نوفمبر 5, 2011 اخى فى الله mas123 كل عام وانت والاسرة الكريمة بافضل خال وكل عام وانت بخير مرورك فى الموضوع شرفنا وحل جميل ورائع معلش اخوك مدرس دراسات جزيت خيرا رابط هذا التعليق شارك More sharing options...
ياسر الحافظ قام بنشر نوفمبر 5, 2011 مشاركة قام بنشر نوفمبر 5, 2011 الاخ العزيز المبدع دائمـــــــــــــا الاستاذ " جمال الفار " الاستاذ مدير قسم الويب المميز " محمد صالح " جزاكم الله كل الخير ........... وكل عام والجميع بخير وسلام وفقكم الله ابو الحارث رابط هذا التعليق شارك More sharing options...
jalal030 قام بنشر نوفمبر 5, 2011 الكاتب مشاركة قام بنشر نوفمبر 5, 2011 السلام عليكم ورحمة الله وبركاته نرجو من حضراتكم تزويدنا بكود تفقيط العلامات السلام عليكم المقصود الدرجات وتحويلها من رقم الى كتابه رابط هذا التعليق شارك More sharing options...
jalal030 قام بنشر نوفمبر 5, 2011 الكاتب مشاركة قام بنشر نوفمبر 5, 2011 اشكركم من صميم قلبي كل عام وانتم بخير رابط هذا التعليق شارك More sharing options...
حالة قام بنشر أبريل 23, 2016 مشاركة قام بنشر أبريل 23, 2016 رائع لكن به عيب صغير : الطالب الذي درجته صفر يكتب في الخلية ( فقط درجة ) والطالب الذي لا درجة له يكتب في الخلية ( فقط درجة ) ليت أحدكم مشكورا يعدله بحيث يكتب أمام الطالب الذي درجته صفر يكتب أمامه ( صفر ) والطالب الذي خليته بدون رقم لايكتب شي يعني يتركها فراغ شاهد المرفق... مع خالص شكري مقدماً أو إن وجد كود جاهز لهذا الغرض ..أقصد درجات دراسية 1437.rar رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر أبريل 23, 2016 مشاركة قام بنشر أبريل 23, 2016 أخي الكريم إليك رابط الموضوع التالي فيه دالة الأستاذ الكبير محمد صالح وفيها حل لمشكلتك باستخدام المعادلة العادية دون المساس بالدالة المعرفة الرابط من هنا رابط هذا التعليق شارك More sharing options...
قصي قام بنشر أبريل 23, 2016 مشاركة قام بنشر أبريل 23, 2016 جزاكم الله خيرا شكرا استاذ ياسر Function N2T(D As Double) As String M = Int(D / 100) H = Int(D / 10) - (M * 10) A = Int(D - (M * 100 + H * 10)) K = D - (M * 100 + H * 10 + A) N2T = Num((M), 3) & IIf(M > 0 And (A > 0 Or H > 0), " و ", "") & Num((A), 1) & IIf(A > 0 And H > 1, " و ", " ") & Num((H), 2) N2T = Replace(N2T, "اثنتانِ عشرة", "اثنتا عشرة") N2T = Replace(N2T, "ثمانمائة", "ثمنمائة") N2T = Replace(N2T, "ثلاثمائة", "ثلثمائة") N2T = Replace(N2T, "و عشرة", "و عشر") N2T = IIf(N2T = " عشرة", "عشر", N2T) N2T = IIf(N2T = "مائتانِ ", "مائتا", N2T) N2T = "فقط " & N2T & IIf(H = 0 And A = 2, "درجتانِ", IIf((H = 1 And A = 0) Or ((H = 0 And A > 2)), " درجاتٍ", IIf(H = 0 And A = 0, " درجةٍ", " درجةً"))) & IIf(K > 0, " و نصفٌ", "") N2T = Replace(N2T, " ", " ") N2T = Replace(N2T, "إحدى درجةً", "درجةٌ") N2T = Replace(N2T, "اثنتانِ درجتانِ", "درجتانِ") End Function Function Num(N As Integer, T As Integer) As String M = "مائة" H = "ونَ" Select Case N Case Is = 1 Num = IIf(T = 3, M, IIf(T = 2, "عشرة", "إحدى")) Case Is = 2 Num = IIf(T = 3, "مائتانِ", IIf(T = 2, "عشرونَ", "اثنتانِ")) Case Is >= 3 Num = IIf(T = 3, NN(N) & M, IIf(T = 2, NN(N) & H, NN(N))) End Select End Function Function NN(N As Integer) As String Select Case N Case Is = 3 NN = "ثلاث" Case Is = 4 NN = "أربع" Case Is = 5 NN = "خمس" Case Is = 6 NN = "ست" Case Is = 7 NN = "سبع" Case Is = 8 NN = "ثمان" Case Is = 9 NN = "تسع" End Select End Function =IFERROR(IF(B2="","",IF(B2=0,"صفر",n2t(B2))),"") استخدام الدالة المعرفة : كما هو الحال في الدوال العادية في الإكسيل يمكن استخدام الدالة ببساطة في أي خلية ، بفرض أن الدرجة مكتوبة في الخلية B2 ، وتريد تفقيط الدرجة في الخلية C3 على سبيل المثال ، قم بوضع المعادلة بالشكل التالي : رابط هذا التعليق شارك More sharing options...
حالة قام بنشر أبريل 24, 2016 مشاركة قام بنشر أبريل 24, 2016 (معدل) عفوا ... تهتُ ... الكود الطويل أضعه كمودل في صفحة الفيجول بيسك لملف الأكسل ؟ الكود الصغير السطر الذي بعده أين أضعه ؟ مع الشكر تم تعديل أبريل 24, 2016 بواسطه حالة رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر أبريل 25, 2016 مشاركة قام بنشر أبريل 25, 2016 الكود الطويل اسمه دالة معرفة وتوضع في موديول عادي .. اضغط Alt + F11 ومن قائمة Insert اختر Module ثم أدرج الكود فيه يرجى الإطلاع على الرابط التالي لمعرفة البدايات في التعامل مع محرر الأكواد من هنا أما بالنسبة للكود الصغير هذا ليس بكود إنما اسمها معادلة يتم وضعها في الخلية المطلوبة ، وإذا لم تعمل معك المعادلة قم باستبدال الفاصلة العادية بفاصلة منقوطة تقبل تحياتي رابط هذا التعليق شارك More sharing options...
حالة قام بنشر مايو 1, 2016 مشاركة قام بنشر مايو 1, 2016 جزاك الله خيرا أخي ياسر وجزاك الله خيرا أخي قصي ، المعذرة على التأخر في الرد . سأجرب :) رابط هذا التعليق شارك More sharing options...
أبو أيمن ياسر قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 في ٣/١١/٢٠١١ at 23:08, jalal030 said: السلام عليكم ورحمة الله وبركاته نرجو من حضراتكم تزويدنا بكود تفقيط العلامات السلام عليكم هل ممكن نحصل على ملف اكسل جاهز مفقط لا يحتوي على كلمة فقط درجة يكون للارقام بس رابط هذا التعليق شارك More sharing options...
أبو أيمن ياسر قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 من فضلكم اريد ملف اكسل مفقط بدون كلمة فقط درجة رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 (معدل) تفضل الحل بمعادلتين مختلفتين داخل الملف ELFAR.xlsm تم تعديل يناير 27, 2019 بواسطه ali mohamed ali 1 رابط هذا التعليق شارك More sharing options...
أبو أيمن ياسر قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 في ٣/١١/٢٠١١ at 23:08, jalal030 said: السلام عليكم ورحمة الله وبركاته نرجو من حضراتكم تزويدنا بكود تفقيط العلامات السلام عليكم هل ممكن نحصل على ملف اكسل جاهز مفقط لا يحتوي على كلمة فقط درجة يكون للارقام بس اشكرك أخي لكن المعادلة الثانية في الملف لم تعمل وكانت صياغتها صحيحة رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 اخى الكريم كما ترى المعادلتين يعملان بكل كفاءة اذا كان هناك مشكلة فمن عندك حاول تحلها 1 رابط هذا التعليق شارك More sharing options...
أبو أيمن ياسر قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 في ٣/١١/٢٠١١ at 23:08, jalal030 said: السلام عليكم ورحمة الله وبركاته نرجو من حضراتكم تزويدنا بكود تفقيط العلامات السلام عليكم هل ممكن نحصل على ملف اكسل جاهز مفقط لا يحتوي على كلمة فقط درجة يكون للارقام بس أشكرك أخي أنا مبتدئ لذلك طول بالك علي رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر يناير 27, 2019 مشاركة قام بنشر يناير 27, 2019 الملف الذى ارسلنه اليك سابقا بالفعل به كل ما تريد 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.