hh88

هل يمكن عمل ذلك من خلال مربعين نص وزر تنفيذ بحيث يكون مربع النص الاول للكلمه المراد تغيرها ومربع النص الثاني للكلمة الجديدة الله يوفقك اخي الكريم

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

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

الف شكر اخي العزيز لكن كيف اقدر أحط شرط ثاني على حقل ثاني في نفس التقرير

أشكرك اخي الكريم ولكن اريد طريقة الاكواد الله يسعدك

السلام عليكم ورحمة الله وبركاتة اساتذتي الكرام اريد كود لترتيب عرض بيانات تقرير لحقلين بحيث لدي (حقل تاريخ) ان يتم ترتيبه من الاحدث الى الأقدم واذا وجد اكثر من سجل لنفس التاريخ ان يتنقل ترتيب السجل حسب (حقل الوقت) من الوقت الأكبر الى الأصغر امل اني وصلت المطلوب ولكم فائق الشكر

الف شكر اخي العزيز الله يجزاك كل حير ويسعدك

السلام عليكم ورحمة الله وبركاتة كيف احفظ ناتج التحويل لتاريخ ام القرى بنفس الجدول بحقا جديد UmAlQura ام تحويل القرى.rar

مرفق قاعد البيانات الله يسعدك Dcoun.rar حاولت ولم يضبط مع اخي ابو ياسين Dcoun.rar

السلام عليكم ورحمة الله وبركاتة اخواني عندي مشكلة في ظهور التاريخ بالهجري حيث انه يفرق يوم اضافي مثال اذا كان التاريخ الصحيح في الجهاز هو 1439/07/11 الاكسس يظهر 1439/07/12 مالحل في مثل هذه الحالة وشكرا

استاذي الكريم حاولت اطبق الكود ولم يضبط , هل يتم وضعه في نموذج الفورم بعد التحديث ؟ مع العلم ان اسم مربع النص التوضيحي هو : x ومربع التسمية : RF وتقبل تحياتي

السلام عليكم ورحمة الله وبركاتة هل يوجد معيار يتم وضعه في الاستعلام بحيث يقوم بإظهار السجلات المُضافة اليوم او السجلات التي تم إضافتها بالامس وكم جزيل الشكر

السلام عليكم ورحمة الله وبركاتة هل يوجد طريقة بكود معين ان يخفي مربع النص ومربع التسمية من الظهور في النموذج عند عدم وجود بيانات كرقم مثلا في مربع النص بحيث لايظهر مربع النص ومربع التسمية في النموذج فقط تظهر عند وجود رقم في مربع النص حاولت اطبق هذا الكود ولاكن لم ينجح if me.text = 0 then me.text1.visible = true ارجو اني وصلت المعلومة

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

السلام عليكم ورحمة الله وبركاتة أسعد الله اوقاتكم بكل خير عندي نموذج رئيسي كمدخل بيانات وعندي نموذج اخر لعرض جميع المدخلات هل من طريقة عند الضغط على زر (نسخ البيانات) في فروم الكاستمر أن يقوم بنسخ البيانات السجل المحدد ووضعها في المدخلات في الفورم الاخر لكي يتم التعديل عليها حاولت اجرب هذا الكود ولكن لم يضبط وشكراً Forms![المراجعين].SetFocus DoCmd.GoToRecord acDataForm, "المراجعين", acNewRec Me.Parent.RecordsetClone.FindFirst "[المسلسل]=" & Me.المسلسل Me.Parent.Bookmark = Me.Parent.RecordsetClone.Bookmark Forms![custmer].SetFocus DoCmd.close

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

شكرًا استاذي العزيز جعفر تم التعديل بارك الله فيك

السلام عليكم ورحمة الله وبركاتة استاذي العزيز جعفر حاولت مجموع الوقت من نوع السرعة إلى الترقية المقترحة ولكن النتائج لاتظهر كما بالمرفق ماذا تتوقع المشكلة 816.حساب1 الترقية المقترحة.rar

الف الف مليون شكر استاذي العزيز شفان الله يبارك فيك ويسعدك ويكتب لك الأجر على ماتقدمه

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

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

الف شكر استاذي الكريم ابا خليل الله يعطيك العافية

السلام عليكم ورحمة الله وبركاتة اساتذتي الكرام كيف اضيف شرط على الكود الزمن بحيث يكون اذا كان ناتج مربع النص يساوي 1 يكون الوميض احمر واذا كان ناتج مربع النص يساوي 2 يكون الوميض ازرق الكود ادناه لايعمل بشكل صحيح بشرطين داحل مربع نص واحد Private Sub Form_Timer() ' اذا كان ناتج مربع النص هو 1 يكون الوميض احمر ' If Me![txtbox] = "1" Then Me.txtbox.BackColor = (IIf(Me.txtbox.BackColor = vbRed, vbWhite, vbRed)) Else Me.txtbox.ForeColor = RGB(0, 0, 0) Me.txtbox.BackColor = RGB(255, 255, 255) End If 'اذا كان ناتج مربع النص هو 2 يكون الوميض ازرق ' If Me![txtbox] = "2" Then Me.txtbox.BackColor = (IIf(Me.txtbox.BackColor = vbBlue, vbWhite, vbBlue)) Else Me.txtbox.ForeColor = RGB(0, 0, 0) Me.txtbox.BackColor = RGB(255, 255, 255) End If end sub

الف شكر استاذي العزيز شفان

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