khairi ali قام بنشر ديسمبر 18, 2020 قام بنشر ديسمبر 18, 2020 أخواني الكرام في هذا المنتدى التعليمي الكبير أبارك لكم مجهوداتكم الجبارة لتقديم المساعدة في الملف المرفق أريد تحويل معادلة التسلسل لإلى كود كذلك معادلة عد الطلبة الناجحون والراسبون والغائبون تحويل المعادلة إلى كود.xlsx
أفضل إجابة سليم حاصبيا قام بنشر ديسمبر 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
khairi ali قام بنشر ديسمبر 19, 2020 الكاتب قام بنشر ديسمبر 19, 2020 صباح الخير أعتدر على التاخير في الرد بارك الله فيك أستاذ سليم أن شاء الله في ميزان حسناتك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.