علي رعد قام بنشر نوفمبر 23, 2012 قام بنشر نوفمبر 23, 2012 تحياتي للجميع والله اشتقنا الى الاساتذة العباقرة لدي معضلة اتمنى حلها فانا اقوم بتصميم شيت لادارة المدرسة وفي شيت الاساتذة عرضت بعض من الاساتذة واريد زر امر بجانب كل استاذ يظهر لي ساعاته كما في الشيت التي سميتها الشكل النهائي فعند الضعط على اسم الاستاذ احمد ادريس على سبيل المثال تظهر ساعاته بحسب ايام الاسبوع اتمنى منكم مساعدتي وانتم اهلاً لذلك تحياتي school.rar
طارق محمود قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 السلام عليكم أخي العزيز لاداعي للزر فقط ضع الماوس علي أي من الخلايا الصفراء التي بها أسماء الأساتذة تفضل المرفق school2.rar 1
علي رعد قام بنشر نوفمبر 25, 2012 الكاتب قام بنشر نوفمبر 25, 2012 الله على الابداع سلمت يداك مشرفنا العزيز طارق لكن لو تكرمت اتمنى منك شرح ما فعلت ولك جزيل الشكر والتقدير
عبدالله باقشير قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 السلام عليكم بارك الله فيك اخي الحبيب طارق فكرة ولا اروع جزاك الله خيرا تقبل تحياتي وشكري
علي رعد قام بنشر نوفمبر 25, 2012 الكاتب قام بنشر نوفمبر 25, 2012 هل وضعت هذا الكود فقط : Private Sub Worksheet_Selectionchange(ByVal Target As Range) If Intersect(Target, [A2:A9]) Is Nothing Then Exit Sub Sheet7.[F5] = Target.Value End Sub السطر الاول فهمته وهو يعني بحال كان الخلايا من A2:A9 فارغة فلا تفعل شيء لكن السطر الثاني محتاج الى شرح لو تكرمت وكنت بحاجة الى زر امر ليتثنى لي تسليم كل استاذ برنامجه الاسبوعي اما الان فيظهر لي جميع الاساتذة الموجودين وساعات الاستاذ المحدد بالاشارة الصفراء فما العمل
طارق محمود قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 السلام عليكم أخي العزيز أولا تفضل المرفق مضاف به زر لطباعة الجدول ثانيا الشرح يعتمد علي عدة خطوات أولا : الكود يحدد إن كان الماوس يشير إلي خلية غير أي من الخلايا الصفراء التي بها أسماء الأساتذة وفي هذه الحالة فلا يفعل شيئا أما إن كان يشير إلي أي منها فسيجعل الخلية F5 في الشيت السابع (الذي اسمه : الشكل الذي اريده عند الضغط) الخلية التي تحمل إسم الأستاذ ، سيجعلها تساوي قيمة نفس الخلية التي تقف عليها بالماوس أي تساوي إسم الأستاذ المراد جدوله ثانيا: الشيت السابع نفسه (الذي اسمه : الشكل الذي اريده عند الضغط) تم عمل مجموعة من المعادلات به تجعل جدول الأستاذ يأتي أوتماتيكيا لهذا الشيت ، يمكنك مراجعتها والسؤال فيما تشاء ثالثا: نرجع مرة أخري لورقة "الاساتذة" : أضفت لها صورة (أي صورة عندك بالكمبيوتر ، طبعا يكون حجمها أصغر مايمكن) وتجعل هذه الصورة تحمل شكل الخلايا المراد صورتها من الشيت السابع (الذي اسمه : الشكل الذي اريده عند الضغط) وهكذا باختصار كلما أشرت بالماوس علي إحدي الخلايا تحمل إسم الأستاذة تتغير تلقائيا قيمة الخلية F5 في الشيت السابع لتحمل إسم الأستاذ المراد فيتغير تلقائيا محتويات الجدول بالشيت السابع ومن ثم يتغير شكل الصورة التي تنقل الجدول منه أرجو أن أكون وفقت بالشرح تفضل المرفق school3.rar
طارق محمود قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 السلام عليكم بارك الله فيك اخي الحبيب طارق فكرة ولا اروع جزاك الله خيرا تقبل تحياتي وشكري أخي الحبيب وأستاذي الجليل / عبدالله باقشير مرورك وتعليقك شرف عظيم فمابالك بأن يعجبك عملي والله إنها لمكافأة كبيرة جزاكم الله خيرا وبارك الله فيك وفي وقتك وأعمالك
علي رعد قام بنشر نوفمبر 25, 2012 الكاتب قام بنشر نوفمبر 25, 2012 مشكور اخي الكريم طارق على اسهابك الجميل في الشرح لدي تعقيبين فقط:انا لا اريد زر للطباعة لانه في هذه الحالة يظهر لي اسماء جميع الاساتذة بمن فيهم الاسم المحدد بواسطة الماوس اريد فقط الاسم المحدد فحبذاً لو يظهر بورقة اخرى منفصلة فهذا برنامج الاستاذ الاسبوعي فليس مرغوب عند طباعته ان يشمل باقي اسماء الاساتذة. 2- اريد الاستفسار عن هذا الكود الذي تفضلت به: =IF(ISERROR(L9),"",OFFSET(INDIRECT($A9&"!"&L$6),L9-2,0))
احمد غانم قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 عمل اكثر من رائع استاذ طارق و لتعميم الفائده عندي سؤال بعد اذن الأستاذ علي رعد: و هو كيفية اظهار اسماء باقي الأساتذه و الأيام مثلا يوم (الجمه) و هل يؤثر في عمل الكود ترتيب اسماء الأيام (اسماء الشيتات)؟
طارق محمود قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 مشكور اخي الكريم طارق على اسهابك الجميل في الشرح لدي تعقيبين فقط:انا لا اريد زر للطباعة لانه في هذه الحالة يظهر لي اسماء جميع الاساتذة بمن فيهم الاسم المحدد بواسطة الماوس اريد فقط الاسم المحدد فحبذاً لو يظهر بورقة اخرى منفصلة فهذا برنامج الاستاذ الاسبوعي فليس مرغوب عند طباعته ان يشمل باقي اسماء الاساتذة. 2- اريد الاستفسار عن هذا الكود الذي تفضلت به: =IF(ISERROR(L9),"",OFFSET(INDIRECT($A9&"!"&L$6),L9-2,0)) أخي الكريم أولا الطباعة محددة المساحة فقط بمساحة الصورة ، فلن تطبع إلا الأستاذ المقصود - جرب ثانيا المعادلة [b]=[/b][b]IF(ISERROR(L9),"",OFFSET(INDIRECT($A9&"!"&L$6),L9-2,0))[/b] أحب أن أشرحها بإسهاب أيضا إذا أعدنا صياغة المعادلة كالتالي =IF(X,"",Y) حيث X = ISERROR(L9) و Y=OFFSET(Z,L9-2,0) حيث Z=INDIRECT($A9&"!"&L$6) فيكون معني المعادلة أساسا إذا تحقق الشرط (X) فضع "" أي فارغ وإلا ضع Y حيث الشرط (X) أن يكون هناك خطأ بالخلية L9 أي (لايكون الأستاذ موجودا في هذه الحصة بذلك اليوم) ولنشرح المعامل Z قبل الـ Y المعامل Z يساوي مافي العنوان المحدد بمحتوي الخلية A9 مضافا إليه (!) مع مافي الخلية L6 أي أنه =الاثنين!F1 يعني يكافيء كتابة عنوان الخلية F1 بالورقة الاثنين المعامل Y يساوي مافي العنوان المحدد بإزاحة عن الخلية Z مقدارها (L9-2) صف ، 0 أعمدة بإختصار أن هذه المعادلة لن تعمل إلا إذا كانت L9 لاتحتوي خطأ وطبعا إذا كانت L9 لاتحتوي خطأ فستكون محتوية علي رقم الصف الذي به إسم الأستاذ بالعمود المحدد بالورقة المذكورة
علي رعد قام بنشر نوفمبر 25, 2012 الكاتب قام بنشر نوفمبر 25, 2012 كلمة مبدع اخينا الكريم الاستاذ طارق قد لا تعطيك حقك بالفعل استفدت منك الكثير وقل ربي زدني علماً شكراً على رحابة صدرك واستجابتك لطلبي ولاستفساراتي فانا لا زلت ابحث على تطوير نفسي من وراء خبراتكم التي تفوقني بسنوات ضوئية وبالنهاية لك مني اجمل التحيات دمتم في امان الله والسلام عليكم
طارق محمود قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 السلام عليكم أخي الكريم الحمد لله أن تم الأمر كما تريد وانك قد فهمت الحيلة في الملف ولك جزيل الشكر علي كلماتك الطيبة وإن شاء الله نراك قريبا مع المشرفين وفريق الموقع تمد يد العون لمن يطلب المساعدة
احمد غانم قام بنشر نوفمبر 25, 2012 قام بنشر نوفمبر 25, 2012 عمل اكثر من رائع استاذ طارق و لتعميم الفائده عندي سؤال بعد اذن الأستاذ علي رعد: و هو كيفية اظهار اسماء باقي الأساتذه و الأيام مثلا يوم (الجمه) و هل يؤثر في عمل الكود ترتيب اسماء الأيام (اسماء الشيتات)؟
طارق محمود قام بنشر نوفمبر 26, 2012 قام بنشر نوفمبر 26, 2012 ولتعميم الفائده عندي سؤال بعد اذن الأستاذ علي رعد: وهو كيفية اظهار اسماء باقي الأساتذه و الأيام مثلا يوم (الجمعه) وهل يؤثر في عمل الكود ترتيب اسماء الأيام (اسماء الشيتات)؟ السلام عليكم أخي أحمد ، حفظك الله عفوا لم أنتبه لمشاركتك السابقة السؤال جيد وبه شقين، الشق الأول وضعت له شيت بآخر الملف يحتوي علي كافة أسماء الأساتذة (77 إسم) وكذلك أضفت بالخلية A11 محدد بيانات لينتقي المستخدم إسم الأستاذ من هذا الشيت الأخير وأضفت كود ليتحسس التغير بهذه الخلية (A11) ليكون له نفس تأثي الكود الآخر وبالنسبة للأيام مثل الجمعة أو الأحد: إذا لم يكن الملف به شيت يحمل نفس الإسم فسيتكون خطأ بمعادلات الخلايا المساعدة بالشيت السابع التي تبدأ بـ L9 ولن يؤثر علي الناتج - راجع شرح هذه الجزئية بالمشاركة #7 الشق الثاني هل يؤثر في عمل الكود ترتيب اسماء الأيام لا لايؤثر ذلك لأنها مرتبطة بالمعادلات التي تعتمد علي محتوي لخلية بالعمود A بالشيت السابع تفضل المرفق school4.rar
احمد غانم قام بنشر نوفمبر 26, 2012 قام بنشر نوفمبر 26, 2012 اخ طارق السلام عليكم لك جزيل شكري و إمتناني بارك الله اعمالك القيمة و جهودك الدائمه مع دعائي بدوام النجاح و التوفيق
طارق محمود قام بنشر نوفمبر 26, 2012 قام بنشر نوفمبر 26, 2012 أخي / jo11 أخي / أحمــــد غانـــم شكرا لكما للمرور العطر والكلمات الطيبة والشكر موصول لكل من شارك او حتي قرأ ولم يشارك
محمود رواس قام بنشر نوفمبر 26, 2012 قام بنشر نوفمبر 26, 2012 ماشاء الله تبارك الله ماهذا الابداع يا استاذ طارق محمود ، ندعوا الله ان يزيدك من علمه وفضله ، ارجوا ان تسدي لنا بعض النصائح لنصل لجزء بسيط من ما وصلت اليه من العلم والمعرفه . وشكراً ،،،،
أبو محمد عباس قام بنشر نوفمبر 26, 2012 قام بنشر نوفمبر 26, 2012 السلام عليكم ورحمة الله وبركاته الاستاذ طارق حفظك الله ورعاك اعمالك رائعة ومتقنه نسال الله سبحانه وتعالى ان يديم نعمه عليك ويبارك في رزقك ودمتم برعاية الله وحفظه
طارق محمود قام بنشر نوفمبر 26, 2012 قام بنشر نوفمبر 26, 2012 أخي / محمود رواس أخي / عباس السماوي شكرا لكما للمرور العطر والكلمات الطيبة والدعاء ولكما مثله وأكثر بإذن الله أخي / محمود النصيحة الأهم الصبر والمثابة وإن شاء الله تصل لأكثر مما تتمني ونصيحة أخري : قراءة المواضيع التي يسأل صاحبها عن مسألة أو مشكلة مرت عليك أو قريبة من مجال عملك أي تكون ملم بتفاصيل الموضوع ، وتدرس جيدا كل الحلول التي طرحها المشاركين وأن تسأل ماتشاء في أي وقت
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.