سامر محمود

تسلم ايدك اخي الكريم @kkhalifa1960

معلش اخي @kkhalifa1960 بتعبك معايا واكيد المرة القادمة هسمي الجداول والحقول انجليزي لانه اكيد كلامكم صح بس ده كان مشروع قديم وكنت شغال عليه بقالي فترة ده النموذج بنفس مسميات الحقول والجدول serching.rar

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

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

استاذي العزيز @kkhalifa1960 واحشني جدا والله ووحشاني ابداعاتك بشكرك علي كرم الرد بس هو انا قصدي علي مربع التحرير والسرد يعني لما اكتب مثلا كلمة تظهر الاصناف اللي فيها الكلمة دي او علي الاقل لو كتبت اول كلمة في الصنف يظهر الاصناف المطلوبة فقط serching.rar

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

شرف ليا اخي @Foksh Dim s As String Dim coode As Integer s = InputBox("ادخل رقم الموظف", "ابدا البحث من فضلك") If s <> "" Then ' محاولة تحويل القيمة المدخلة إلى عدد صحيح If IsNumeric(s) Then coode = CInt(s) ' تطبيق الفلتر باستخدام القيمة الرقمية Me.Filter = "[coode] = " & coode Me.FilterOn = True Else MsgBox "الرجاء إدخال رقم موظف صالح.", vbExclamation, "خطأ" End If Else MsgBox "الرجاء إدخال رقم الموظف.", vbExclamation, "خطأ" End If

تم حل المشكلة الحمد الله اخ @ابو البشر

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

On Error Resume Next Dim s s = InputBox("ادخل الرقم القومي المكون من14رقم", "ابدا البحث من فضلك") DoCmd.GoToControl "IDNumber" DoCmd.FindRecord s الاخوة الخبراء الافاضل من فضلكم محتاج تعديل علي الكود السابق انه يجيب سجلات الموظف حسب البحث بالرقم القومي لان الكود ده بيجيب بس اول سجل بيشوفه اكون شاكر لحضراتكم جدا

طبعا مش جديد عليك والله دايما ضهر وسند وقت الحاجة تسلم يا اخي @Foksh

الاخوة الكرام الخبراء الافاضل السلام عليكم ورحمة الله وبركاته من فضلكم انا عملت حاجة صغيرة للحضور والانصراف اليومي انا بس عايز اعمل تقرير يقولي كام موظف اتاخروا عن الساعة 9:30ص كام مرة في الشهر لكل موظف ويطبف اللائحة بتاعت التاخير لوحده يعني مثلا اول مرة يكون انذار بعد كده ربع يوم اكون شاكر فضلكم جدا علي المساعدة Att - Copy.rar

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

الاخوة الخبراء الافاضل @ابوخليل @Foksh انا بشكركم بكل تاكيد والاكيد ان رايكم صح بدون شك لكن للاسف قضي الامر وتم الانهاء علي الوضع الحالي والوقت عندي ضيق جدا جدا للتعديل الكامل انا عملت لحضراتكم محاولة في عمل نموذج التحويل بين المخازن بس قابلني مشكلتين الاولي كومبو المخازن لما بغير واحد التاني بيكون مثله الثانية هي المشكلة الاكبر هى اني عايز انقص الرصيد من المخزن المحول منه ويتم اضافته في المخزن المحول اليه اكون شاكر ليكم علي المساعدة الكريمة Transfer (1).accdb

تحياتي اخر الكريم @Foksh والاخ الاكبر @ابوخليل علي مساعدتكم الكريمة