اخي وعزيزي الاستاذ العزيز ياسر الحافظ (ابوالحارث)
شكراً لك وللاستاذ الكبير خبير ومشرف الاكسس المبدع الاستاذ نارت
لقد قال كلام لا اجده فيني واخجلني بهذا الاطراء
ابواحمد
اخي ميلاد
جرب المرفق حيث وضعت لك شرح مفترض لبيانات تم اخذها كوبي من البرنامج المتخيل
كما قمت بإستحداث ورقة في الملف A ليتم إدراج البيانات المنسوخة (مهم إدراج مع إزاحة الى الاسفل وليس لصق )
وطريقة ذلك
في الورقة المدخلات ضع المؤشر في الخلية A3 ثم كليك يمين واختر إدراج خلايا منسوخة (Insert Copied Cells) في هذه الورقة يوجد زر للفرز اضغط عليه اولاً قبل الانتقال الى الورقة ORF inv. transit sheet
دور زر الفرز ومسح الفواتير المكررة (يتم مسح القديم الغير محدث) كما يجب ان تلتزم بتسلسل الفواتير
يوجد زر في الملف A في الورقة ORF inv. transit sheet لتحديث البيانات كما سيتم مسح البيانات في هذه الصفحة بعد التحديث لذا ستجدها خاليه ما عدا الترويسه
جرب حسب الشرح واعلمني بالنتيجة
ان شاء الله يفي بالمطلوب
ابواحمد
عبدالله المجرب - أوفيسنا.rar
الاستاذ هشام
اعتقد هناك دالة مشابهه لعمل هذه الدالة من اعداد الاستاذ ابو تامر كما ذكر اخونا الزير
وقد قمت بتجربتها ووضعتها في المرفق للتجربة
كما ان موضوع هذه الدالة مكرر في المشاركة 96
ابواحمد
المساعدة.rar
لماذا تضعه في كود الفورم وهو موجود أصلاً؟؟؟؟؟
=AND(COUNTIF($P$14:$P$1000;Kh_Father_Name(B15))>1;COUNTIF($F$14:$F$1000;F15)>1)
هذه هي المعادلة وتتكون من شرطين
الشرط الاول تكرار اسم الاب لاكتر من مرة وتم استخدام دالة معرفة بواسطة المستخدم وهي دالة الاستاذ خبور خير( Kh_Father_Name)
الشرط الثاني تكرار تاريخ الميلاد اكثر من مرة
فإذا تحقق الشرطين تتلون الخلية باللون الذي اخترناه
ان شاء الله اكون وفقت في الشرح
ابواحمد
تم تغيير هذا الجزء من كود الفورم
Do Until ActiveSheet.Cells(III, "B").Text = ""
If Me.ComboBox1.Text = ActiveSheet.Cells(III, "B").Text Then
لتعمل الفورم مع ورقة العمل النشطة
ابواحمد
جرب المرفق في ورقة نهائي تم اضافة معادلة تنسيق شرطي تلون التوائم
كما تم اضافة دالة الاستاذ خبور لفصل اسم ولي الامر (في خانة اسم ولي الامر) في ورقة نهائي
في ورقة نهائي جرب إضافة اسماء متشابهة لتوائم وتواريخ ميلاد واحدة ولاحظ الفرق
ابواحمد
2سجل الصف الاول 2012 -2).rar
استاذي الفاضل نارت
لقد اجزلت لي المدح بخصال قد لا اجدها فيني
واعجزت يدي عن كتابة رد شكر على هذا الرد الطيب
فلا اجد سوى ان اقتبس هذه الابيات التي قيلت في شكر المعلم وانت خير معلم انت وباقي الاخوة المشرفين والخبراء المعتمدين والاعضاء الفاعلين ومن يجد في نفسة المقدرة على مساعدة الاخرين فلا يبخل بها
قد خضت في بحر العروض مرتبا أحلى الكلام ومن جميل الأحرف
علي أحــــاول أن أقـــــــدم شكـــــرنا لمعـــــلم ضاء الطـــــريق لنقتفي
أثر العــــــــلوم برفعــــــــةٍ وتقدمٍ ونعيشُ في عزٍ وظــــــــلٍ وارف
ووجدت انـــي عـــــــــاجزٌ ومقيدٌ وتحطمت بالموجِ كــــــلُ مجادفي
من كان أنشد ألـــــف ألف قصيدةٍ وجد الكــــــلام بـــحقهم لا لن يفي
ابواحمد
اخي نورانوار
انا جربت فورم البحث في ورقتي العمل والفورم يعمل بكفاءة
ولتجربة ذلك
قم بمسح جميع البيانات في الورقة نهائى مع الابقاء على عدد محدد من البيانات ولنقل 10 اسماء ثم قم بالبحث ستجد الفورم يبحث عن بيانات هولاء العشرة فقط
اما بخصوص التوائم
هل يتم كتابة اسم الاب للتوائمين بشكل متشابه
مثل
محمد احمد صالح ادريس
خالد احمد صالح ادريس
والله اعلم
ابواحمد