sabry fahmy

@kkhalifa1960 شكرا اخي الكريم لمجهودك العظيم وبارك الله فيك سوف استحدم البرنامج وقريبا اوافيك بالنتيجة المبهرة

احتساب كسر الشهر يحاسب شهر كامل وشكرا جدا علي اهتمامك يا غالي

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

الاخ المحترم ابوخليل شكرا لمساهماتك واعدك ساتبع ملاحظات حضرتك واضعها في الحسبان

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

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

استاذ /M.Abd Allah لك مجهودك انا اريد اتسعلام عن عدد المراكب الموجودة فعليا وهي التي سجل لها تاريخ تعاقد ثم تاريخ طلوع ثم تاريخ نزول وبذك الاستعلام عن المتواجدون حاليا ياتي (الطلوع - النزول ) هي فكرة حضرتك ممتازة لكن ينقصها الفلترة علي حقل النزول بحيث لا يظهر الا الحقل الفارغ فقط لانه دلاله ان المركب موجودة ولم تنزل

مرفق قاعدة بيانات بها مشكلة ابحث عن حل لها قاعدة البيانات هذه لمركز صيانة المراكب يقوم المركز (القزق) بالتعاقد مع المراكب (تاريخ التعاقد) لمدة معينة بالايام (مدة التعاقد ) وعندما ياتي دورها في الصعود من البحر الي المركز (تاريخ الطلوع ) وبعد قضائها المدة المتعاقد عليها يتم النزول الي البحر (تاريخ النزول ) المشكلة اريد عند الاستعلام عن المراكب المتواجدة بالمركز = المركب التي سجل لها تاريخ طلوع وعند النزول تخصم من المركب التي طلعت قاعدة بينات القزق - Copy.rar

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

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

السلام عليكم ورحمة الله وبركاته وبها نبدأ في الخلية 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