dah_med

السلام عليكم ورحمة الله أخي ابن علية عليك أن يتسع صدرك لغيرك حتى يكون عطاك متواصل بإن الله وليكن جهد في سبيل الله أما الطريقة الخبورية فكلنا يشهد لإخينا خير خبور بالتمكن من زمام الإكسال والبرمجة إذا كنت من الجزائر فإمتحان البكالوريا يجري حسب الشعب فليس من المعقول أن نجعل نصف من شعبة الآداب والفسفة نصف من شعبة التسيير والإقتصاد فتلك مواضعها مختلف عن الأخري أي كل شعبة تبد في قاعة من التلميذ الأول في الشعبة إلى أن تنتهي الشعبة وهكذا كذلك لجنة التلميذ تتغير عندما تتغير الشعبة أرجو أن ترجع إلى المرفق الأول حتى تفهم قصدي أرجو أن يتسع صدرك إلي حتى أستطيع أن تفهمني أخوك محمد من الجزائر

السلام عليكم ورحمة الله وبركاته أخي بن علية جزاك الله خيرا على هذا المجهود لكن النموذج يصلح في الطور الإبتداي والمتوسط حيث لا توجد الشعب أما في البكالوريا فيجب أن تبدأ الشعبة في قاعة لوحدها ولو كان فيها تلميذ واحد أي من الرقم واحد فالنموذجك يخلط الشعب في قاعة واحدة وهذا ليس مسموح به في الإمتحانات كما أرجو أن تكون الطريقة خبورية كما يقولون أهل المنتدى أي بالمكرو ترحيل وليس بالمعدلات وجزاك الله كل خير أخوك محمد

السلام عليكم رورحمة الله وبركاته أرجو المساعدة في هذا العمل المطلوب هو كود ترحيل من الورقة(base)إلى الورقة (sal) علما أن القاعة لا تتجاوز 25 تلميذ ويكون الترحيل من الشعبة الأولى من واحد إلى نهاية الشعبة تم تليها الشعبة الثانية من واحد إلى نهاية الشعبة وهكذا إلى نهاية جميع الشعب وكذا ترحيل لجنة التلميذ ومركز الإجراء ورمز المركز في الخانة المخصص لذالك أخوكم محمد مركز إجراء بكالوريا .rar

السلام عليكم ورحمة الله حاول أخي أن تضع مثالا مرفقا حتى يتسنى لنا مساعدتك حاول وستصل إنشاء الله أخوك محمد

السلام عليكم ورحمة الله هناك طريقة أسهل إفتح خيارات إكسل من زر أوفس(شعار أوفيس) تم أشر على إظهار علامة تبويب المطور في الشريط تم إذهب إلى المطور الذي سوف يطهر في الشريط وحدد أمان الماكرو ثم أشر على تمكين كافة وحدات الماكرو أخوكم محمد

وعليكم السلام ورحمة الله وبركاته أخي أبوهاجر مرحبا بك من جديد بين إخوانك وعودة ميمونة وحافلة بالعطاء أخوك محمد

السلام عليكم ورحمة الله وبركاته أخي وأستاذي خبور جزاك الله عنا كل خير وغفر الله لك ولولديك ولم علمك والله لو كنت قريبا من لقبلة رأسك عرفانا لك أخوك محمد

السلام عليكم أخي بن علية لم أفهم ماذا أضف للملف ما الفائدة من إضافت عمود للمادة التي بها فرض واحد أريد أن أرحل نقاط المادة من دفتر التنقيط إلى ورقة الفصل الأول حسب المادة والقسم وجزاكم اله خيرا

السلام عليكم ورحمة الله إخواني أعضاء منتدنا الغالي مواصلة في مشروعنا درجات الطلاب أدرج لكم هذا المرفق لمساعدتي على ترحيل درجات الطلاب حسب المادة والقسم وجزاكم الله خيرا مشروع كشوف الطلاب_3 .rar

السلام عليكم ورحمة الله أخي خير جزاك الله خيرا أخوك محمد

السلام عليكم ورحمة الله وبركاته جزاك الله كل خير أخي أبو عبدالله أخوك محمد

السلام عليكم ورحمة الله أخي خير لقد غيرت في النموذج حيث أضفت ثلاثة أعمدة لكل مادة وتراجعت عن فكرتي التي بنيتها على أن أجعل ورقة للفصل الأول للنقاط التلميذ وورقة ثانية لحساب معدلاته وقد غيرت في الكود حسب فهمي لكن هناك رسالة تنبيه عند الترحيل مفادها " توجد خلايا فارغة" وجزاك الله خيرا أخي مسبقا مشروع كشوف الطلاب.rar

السلام عليكم ورحمة الله اخي cat101 لقد غيرت لك في الكود حسب فهمي لأنك لم توضح جيدا ما تريد لقد غيرت في الكود لكي يستدعي لك الناجحون وكذلك أصحاب الدور الثاني حسب اختيارك في القائمة المنسدلة في ورقة واحدة وهي:نصف العام أخوك محمد كنترولي.rar

السلام عليكم أخي خبور لقد أ0حببت الإكسل من خلال اعمالك الرائعة فالشىء الممتع في الإكسل هي خاصية البرمجة بالفيجول بسيك رغم اني حاصل على تقني سامي في البرمجة بلغة دالفي إلا أني من خلال أعمالك الرائعة وحبي للإكسل مند بداية تعليم يدفعني للتعلم لغة البرمجة بالفوجول بسيك فأرجو أن تصبر معنا وأعلم أننا نحبك في الله وندعو لك وننشر أعملك وأعمال أعضاء هذا المنتدى في بلدتنا فجزا اله الجميع خيرا وسدد خطاهم لما يحب ويرضى

السلام عليكم أخي cat101 بعد إذن أستاذي خبور غير فقط الرقم 6 في الكود التالي:If .Cells(R, 6) = Range("E4") Then أي إحسب أين أين يقع العمود المراد الإستدعاء منه في قاعدة البيانات ثم كتب العدد ففي الملف الخاص بي فالعمود:F يقع المكان6 والأفضل أخي إرفاق الملف حتي يكون العمل أكثر دقة ومعذرة ثانية لأستاذي خبور خير أخوك محمد

جزاك الله خيرا أخي سالم فهلا تكرمت ونزعت حمايةvb أخوك محمد

السلام عليكم للرفع

السلام عليكم أخي خالد القدس خزاك الله كل خير عن الموقع لقد سجلت فيه وأنشأت موقع لمدرستنا لكن المشكلة في كيفية تفعيل الموقع تظهر رسالة مفادها أنه لم يتم العتور على الموقع فارجو إن تكرمت أن تشرح عملية إنشاء الموقع بالتفصيل الممل وجزاك الله عنا خير أخوك محمد

السلام عليكم أخي خبور أحتاج في الإمتحان أن أوزع التلاميد على أفواج فهل يمكن عمل ماكرو ثاني لإستدعاء التلاميذ حسب الأفواج ويكون مثلا من 1 إلى 25 بحيث أتحكم في الفوج حسب حجم القاعة وجزاكم الله خيرا أخوك محمد

السلام عليكم أخي كمال جزاك الله خيرا على المرفق وعلى الرابط

السلام عليكم أخي الكريم taksmdz جزاك الله خيرا على الملاحظة فقد نبهتني إلى الخطأ وهو أن القائمة المنسدلة كانت خلافا لما في العمودF وذلك هو السبب الذي أدى لعدم إستدعاء المستويات الأخري فجزاك الله خيرا أما طلبك فيحققه كود أستاذنا الحبيب خبور خير If .Cells(R, 6) = Range("E4") And .Cells(R, 7) = Range("F4") Then بشرط أن تجعل العمودF للقسم والعمود G للصف وتستدعي الأقسام في الورقة Liste في الخلية:E4 تكتب القسم وفي الخلية:G4 تكتب الصف وجزا الله الجميع خيرا أخوكم محمد

السلام عليكم أخي خير إن الكود يعمل مع مستوى واحد فقط أي مع 4م1 أما معا المستويات الأخرى فلا يستدعيها جرب متلا 3 م 1 من القائمة المنسدلة وجزاك الله خير أخوك محمد

السلام عليكم ورحمة الله أستاذي خبور وقد غيرت في الكود الذي وضعته أنت حسب فهمي لكن هناك رسالة تنبيه عند الترحيل مفادها " توجد خلايا فارغة" الملف في مرفقات المشاركة27 أخوك محمد

السلام عليكم ورحمة الله أستاذي خبور جزاك الله كل خير ومعذرة عن التأخر في الرد لأني كنت بعيدا عن المنزل أخوك محمد

السلام عليكم ورحمة الله تعالى وبركاته أخي الكريم مصطفى جزاك الله كل خير على الرد وجميع إخوننا في المنتدى الذين يبذلون ما في وسعهم لمساعدة الآخرين لكن المرفق لا يظهر