وعليكم السلام ورحمة الله وبركاته
أخي بن علية جزاك الله خيرا على المساعدة
أما عن سبب غيابي عن منتدنا الحبيب هي كثرة الإنشغالات زد على ذلك بطء الأنترنت في الجزائر
أما بخصوص تغيير الأعمدة فاستعملت حلقة تكرار أخرى خاصة بعمود الإختبار وهي
For N = 1 To 1
( NN = Choose(N, 7
( Feuil13.Cells(CC, NN) = MyR.Cells(MyC, C + N + 3
Next
فهل يمكن أن نستغي عن تسمية النطاقين وتعويضهما برمجيا
كما أريد ترحيل خلية المجموع (c,46) وخلية المعدل الفصلي (c,47 ) وخلية الإجازات (c,48)
وجزاكم الله خيرا مسبقا
أخوكم محمد
GESTION DES NOTE MOYEN.rar