عادل حنفي

اخي ابو ايات

اخي يوسف

ارجو تجربة الملف الان

تحياتي

ساقية اللجان.rar

اخي يوسف

الكود التالي في حدث Worksheet_Change

With Columns(5).Rows(229).End(xlUp)

غيره الي

With Columns(5).Rows(250).End(xlUp

اخي ابو ايات

سيتم المراجعة

تحياتي

اخي يحياوي

بارك الله فيك اداة جميلة بالفعل

تحياتي

اخي الحبيب

هشام شلبي

اشكرك علي كلماتك التي اثلجت قلبي

بارك الله فيك

اخي يوسف عطا

في حدث Worksheet_Change

غير الجزء التالي

For i = 9 To 207

For ii = 10 To 207

الي الكودالتالي

For i = 9 To 208

For ii = 10 To 209

و سيعمل ان شاء الله و بخصوص عدم الاخفاء قم بحذف الكود التالي

Private Sub Worksheet_Deactivate()

Sheets("شيت طبع كشف الملاحظة").Visible = False

End Sub

تحياتي

اخي احمد

بارك الله فيك و سلمت يداك

هدية بالفعل رائعة

تحياتي

اخي الحبيب خبور

بارك الله فيك وازادك من علمه

خالص تحياتي و تقديري

اخي يوسف

حمدا لله علي السلامه

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

اخي ابو ايات

ارجو تجربة المرفق و اظهار الخطأ و رفع الملف مشيرا الي الخطأ ان وجد

تحياتي

ساقية اللجان.rar

و هذا تعديل اخر لاخفاء الصفوف الفارغة في كل من كشف ملاحظة كل من اللجان الفردية و الزوجية

ساقية اللجان.rar

السلام عليكم

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

تحياتي

ساقية اللجان.rar

السلام عليكم

و الله بعد هذاالجمع و هذه الكلمات

التي بالفعل اسعدتني فلا اجد اجمل منها للرد او للمشاركة معكم

فبالفعل اجمل شيئ ان تقدم شيئ و يكون لك دور و هذا هو المقابل

الغير مادي و بالعكس قد يكون المقابل مضاعف فالافادة للغير هذا مقابل و استفادتك انت

هذا مقابل اخر فكل مرة تشارك في موضوع مهما كان صغيرا فاكيد هناك استفادة مهما قلت

بارك الله فيكم جميعا

و كل عام و انتم بكل خير

اخي جرب هذا الكود

    Windows("2.xls").Activate

    ActiveWindow.Close

اخي بالنسبة للطباعة رجو ان يكون هذا هو المطلوب

اما باقي الطلبا ارجو التوضيح

قاعدة بيانات ادخال وبحثءءءءءءءءءءءءء.rar

هل هذا ما تقصده

ساقية اللجان.rar

اخي عبد الله

اشكرك علي كلماتك و مررك

بخصوص اللون الذي يقصده الاخ يسف هو خط شاذ يظهر بالملف بصورة غير عادية

و ليست الوان الجدول او الاشياء العادية

تحياتي

بخصوص ظهور اللون البني لا اعلم ما هو قد يكون الاوفس

عموما اي اخ فاضل يوضح هل يوجد اي شكل غير طبيعي علي الملف من عدمه و يخبرنا لمحاولة تصليح الاخطاء

الحمد لله

عموما ترحيل الماده صحيح يتم باختيار اسم المادة و لكنه يتم علي اساس الرقم

بالمرة راجع الملف التالي

ملحوظة

الترحيل يعمل علي شيت data فقط و لم يتم عمله لشيت data1

و سيتم ذلك بعد التاكد من النتائج

تحياتي

NewLast الساقية.rar

اخي yahiaoui

كل عام و انت بخير

هدية مقبوله

تحياتي

السلام عليكم

اخي khhanna

عذرا لم اري مشاركتك الا الان

ما تسال عنه لم يكن مقصودا و لم انتبه اليه الا بعد مشاركتك و بحثت في الملف و لم اجد تفسيرا للرد عليك

و لكن الامر تحت المتابعة و عند تو صلي لرد سارفعه مباشرة

تحياتي

اخي ابو ايات

ضع علامة صح في ال CheckBox1

ادخل حرف الحاء كما تريد في الخلايا التي تريدها

اضغط علي Do Job

سيتم عمل ما تريده عند اكتمال الملف و التاك من ان ادخال البيانات و النتائج صحيحة

تحياتي

السلام عليكم

اذن يجب تجربة الملف التالي

و ابداء الراي

NewLast2 الساقية.rar

اخي الحبيب ابو عبد الله

كل عام و انت و جميع افراد اسرتك الكريمة بكل خير

و حمدا لله علي السلامة

و مشكور علي الهدية

خالص تحياتي و تقديري

اخي ابو ايات

ان شاء الله بسيطه و سيتم عمل ذلك

اخي يوسف

تم تنفيذ طلبك بخصوص الاختيار ما بين توزيع البرنامج للاختيار و بين التوزيع اليدوي

و سيكون ذلك في النسخه الي سيتم رفعها في اقرب فرصة

اما الطلب الاخر لم افكر به بعد و سارد لاحقا عليك

تحياتي

السلام عليكم

اخي خبور

بارك الله فيك

و دائما تمتعنا باعمالك الرائعة

و كل عام و انت بخير

تحياتي

الملف ايضا تحت التجربة نرجوا ابداء الراي

New الساقية.rar