sabry fahmy

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

شكرا لحضرتك اكفيت ووفيت بارك الله فيك

السلام عليكم ورحمة الله وبركاته وبها نبدأ في الخلية e5 عامود غرامة التاخير اريد عمل دالة ان يتم جمع الثلاث خلايا d5+f5+(e5) اذا كانت الخلية h5 فارغة اي لايتم اضافة غرامة طالما تم السداد اما اذا كانت تحتوي علي مبلغ اي تم السداد لا تجمع الخلية e5 الشرح يكون هنا في الموضوع وليس داخل الملف شرح المطلوب داخل الشيت الايجارات.xlsm

اريد عند عمل فلترة لعمود التاريخ حسب المدة المطلوب حسابها (مدة بين تاريخين )وبعد الفلترة يتم نسخ العمود (اشتراك صاحب عمل ) او عمود (اشتراك عامل ) حسب القائمة المنسدلة بالخلية k1 يتم النسخ الي العمود المسمي (A) بالون الاخضر وذلك عن طريق ماكرو او كود برنامج التسويات.xls

في هذا الملف يوجد فورم ادخال اريد ربطة بخلايا معينة في الشيت الخلايا باللون الاصفر وبعد الادخال تظهر النتائج للخلايا الملونة باللون الاخضر المصنف1.xlsm

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

هذا شيت اكسيل اريد تحويله الي اكسس بنفس الداتا Search++kod @sabry.xlsm

ما هي المشكلة عندما اقوم بتعديل علي TABLE ARRAY لا تعمل الدالة اريد ان اعدل علي الدالة بحيث تبحث في كامل الشيت

شكرا جزيلا استاذ محمد صالح lionheart شكرا جزيلا لحضرتك

هذا كود من عمل استاذنا المبدع عبد الله بقشير اريد فقط تعدل علي الكود بحيث يزيد جدول ( adta ) اعمدة (مظلله باللون الاصفر ) وكذلك البحث (مظلل باللون الاصفر ايضا) Search++ - Copy.xlsm

حسين مامون شكرا اخي الكريم بارك الله فيك

محي الدين ابو البشر مشكور اخي الحبيب

ما الخطا الذي في هذا الكود ..... تـــم رفع الملف يومية الاشتراكات - Copy.xlsm

محي الدين ابو البشر شكرا جزيلا استاذ محي ولكن الكود عند الترحيل وبدء ترحيل جديد يحذف الترحيل السابق علما باني الفورم بة 4 تيكست بوكس عند الترحيل املاء تكيست بوكس واحد فقط او اثنين علي الاكثر

معي نموذج ترحيل يقوم بالترحيل في اعمدة مختلفة وهذا هو الكود المستخدم Dim LastRow As Long LastRow=ThisWorkbook.Sheets("DETABEZ").Range("A1000000").End(xlUp).Row LastRow = LastRow + 1 With ThisWorkbook.Sheets("DETABEZ") .Range("D" & LastRow)= TextBox1.Value .Range("I" & LastRow)= TextBox2.Value .Range("B" & LastRow)= TextBox3.Value .Range("C" & LastRow)= TextBox4.Value End With End Function اريد تعديل الكود بحيث يرحل الي اول خلية في العمود الفارغ وهذا هو شيت العمل 12222222.xlsx

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

هذا ملف عمل فية نموزج طباعة وشيت بينات المطلوب كود استدعاء البينات من الشيت 1 الي النموزج الموجود في الشيت 2 وتم اقتباس كود من احد الاخوة من ملف مشابه ولكن للاسف لا يعمل 252523333.xlsm

ASUS2020 شكرا جزيلا لمجهود حضرتك

هذا شيت اكسيل يقوم بعمليات حسابية عن طريق اكثر من معادله هل استطيع تحويل كل الشيت الي فورم واخفاء الشيت نهائيا والتعامل من خلال الفورم فقط تم تحديث رفع الملف بالفورم حساب اشتراكات تامينات المراكب.xlsm

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

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

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

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

شكرا جزيلا استاذ اشرف وبارك الله فيك وان شاء الله الملف يفي بالغرض

للرفع