khairi ali قام بنشر ديسمبر 18, 2020 مشاركة قام بنشر ديسمبر 18, 2020 أخواني الكرام في هذا المنتدى التعليمي الكبير أبارك لكم مجهوداتكم الجبارة لتقديم المساعدة في الملف المرفق أريد تحويل معادلة التسلسل لإلى كود كذلك معادلة عد الطلبة الناجحون والراسبون والغائبون تحويل المعادلة إلى كود.xlsx رابط هذا التعليق شارك More sharing options...
أفضل إجابة سليم حاصبيا قام بنشر ديسمبر 18, 2020 أفضل إجابة مشاركة قام بنشر ديسمبر 18, 2020 جرب هذا الكود Option Explicit Sub auto_formula() Dim Mx% With Sheets("النتيجة") Mx = .Cells(Rows.Count, "B").End(3).Row .Range("A10").Resize(Mx - 9).Value = _ Evaluate("Row(1:" & Mx - 9 & ")") With .Range("AK10").Resize(Mx - 9, 3) .Formula = _ "=IF($AJ10=AK$7,COUNTIF($AJ10:$AJ$10,$AJ10),"""")" .Value = .Value End With End With End Sub 3 1 رابط هذا التعليق شارك More sharing options...
khairi ali قام بنشر ديسمبر 19, 2020 الكاتب مشاركة قام بنشر ديسمبر 19, 2020 صباح الخير أعتدر على التاخير في الرد بارك الله فيك أستاذ سليم أن شاء الله في ميزان حسناتك رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان