محمد أبو يوسف

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

السلام عليكم كل الشكر والتقدير لخبرائنا واخواننا بالموقع مرفق ملف اكسيل عبارة عن شيت علاوة دورية للعاملين ورقة بها بيانات العاملين وورقة بها صورة بالضغط عليها يتم تشغيل ماكرو الترحيل الماكرو يقوم بترحيل المرتب الحالى الى المرتب السابق + جعل قيمة العلاوة الدورية = صفر المطلوب : التعديل على كود الترحيل ليكون عند الترحيل : المرتب المجرد = المرتب المجرد + العلاوة الدورية وجزاكم الله عنا خير الجزاء العلاوة الدورية.xls

السلام عليكم نشكر كل من مر على هذا المنشور ونشكر كل من أراد المساعدة ولم يستطع لظروفه

ترحيل بيانات بنفس التنسيق السلام عليكم وبارك الله فى خبراءنا راجعت مشاركات الترحيل للزملاء وحلها بواسطة السادة الخبراء عندى ملف أريد الترحيل منه لصفحات أخرى داخل الملف 1- الترحيل يكون بنفس التنسيق وعرض الأعمدة وأرتفاع الصفوف وكأنها النسخة الأصلية 2- مسح البيانات من الصفحات الموجودة قبل الإضافة أو التحديث بخلاف نموذج القوائم و نموذج البيانات 3- لو هناك إمكانية لنسخ اللوجو بأعلى الصفحة بحاول أتعلم بالإجتهاد وبالأمثلة المطروحة .. لذا نشكركم على الشرح داخل الكود للتعلم وجزاكم الله خيراً اللوجو فى ورقة البيانات الاولى مرتبط بماكرو عند الضغط عليه بيرحل البيانات طبقاً لاسماء الشركات ولكن محتاج تحسين الملف بمسح البيانات القديمة قبل اضافة بيانات جديدة او عند تحديثها والترحيل بالتنسيق طبقاً للاعمدة والصفوف مرفق مثال بعد الإجتهاد ترحيل.xlsm

السلام عليكم بما أننا فى حضرة خبراءنا ، وبما أن الموضوع شيك بالنسبة إليه أريد قاعدة بيانات صغيرة على إصدار قديم بها إستعلام ونموذج به معرف خاص به ID وذلك لحاجتى لمعرفة هذه المعلومة وخاصة لو أحببت عمل نموذج فرعي من نموذج رئيسي بحيث يكون النموذج الرعي يظهر فقط السجلات المرتبطة بالنموذج الرئيسي أو منحي قاعدة بيانات مسبقة بها هذه المعلومات للأستفادة منها ، داعياً الله أن يزيدكم من فضله. جزاكم الله خيراً

حلول رائعة ونقاش مثمر.. زادكم الله من علمه استشرت الموقع سابقاً بخصوص إجبار المستخدم على ادخال الأسم كامل وقد أشار عليه بعض الخبراء بالموقع لاني احب التعليم ولكني ضعيف الإمكانيات بالتالي بالجدول الموجود به الأسم .. اذهب الى الخصائص بالأسفل وفى خانة VALIDATION RULE أكتب معادلة لعدد الحروف المطلوبة كتابتها فما أكثر وعلى سبيل المثال أريد عدد الحروف المطلوبة 12 حرف فما أكثر فكانت المعادلة LEN([NAME])>11 وفى خانة التحقق من الصحة أكتب للمستخدم.. "فضلاً أدخل الأسم رباعي" بالنسبة لتكرار البيانات فقد أفاد عليه خبراء الموقع بكتابة الكود التالي لعدم تكرار البيانات وهو به بيانات الحقول الخاص بقاعدة البيانات الخاصة بي ولكن للعلم بالشئ Private Sub VisitDate_AfterUpdate() Dim rst As Recordset Set rst = Me.RecordsetClone rst.MoveFirst Do Until rst.EOF If rst!StartPeriod = Me!StartPeriod And rst!ClinicName = Me!ClinicName And rst!InvoiceNumber = Me!InvoiceNumber And rst!VisitDate = Me!VisitDate Then MsgBox "الروشتة تم إدخالها سابقاً.. برجاء مراجعة الإدخال ", vbMsgBoxRtlReading, "الروشتة مكررة" DoCmd.GoToControl "StartPeriod" Me.InvoiceNumber = "" Me.VisitDate = "" '''Me.Undo '''DoCmd.CancelEvent Exit Do End If rst.MoveNext Loop rst.Close End Sub شكراً لطيب سعة صدركم

كل الشكر والتقدير الحمد لله أستفتدت كتير من الكود ومن الشرح جزاكم الله خيراً

الكود ممتاز جداً محتاج أتعلم مكوناته وماذا يرمز إلي بتبسيط حتى إذا أحببت تغير أسماء الصفحات أو زيادة عدد الصفوف أكون على دراية بماذا أفعل جزيل الشكر

السلام عليكم جزاكم الله خيراً حل رائع لكن لو أمكن نقل البيانات من عمود الإجمالي لعمود السابق وليس من عمود الحالي للسابق جزيل الشكر لخبراءنا

السلام عليكم بحثت داخل المنتدى ولم اجد موضوع مطابق لموضوعي عندى بيانات شهرية والمطلوب ايجاد معادلة أو ما شابه للقيام بالوظيفة التالية: ورقة العمل عندى بها ثلاثة أعمدة سابق وحالي وجملة مطلوب شهريا ترحيل الاجمالي ليكون السابق والحالي قيمته صفر للكتابه عليه دون المساس بالمعادلات ودون المساس بورقة الأجمالي شكراً للاهتمام والمساعدة ترحيل بيانات من الاجمالي الى السابق.xls

جزاكم الله خيراً فعلاً كده تمام

السلام عليكم حل ممتاز لبداية الفترة يوم 1 أو 26 من الشهر جزاكم الله خيراً أستاذ / جمال أوفسينا.mdb بالنسبة للشرط الثاني مطلوب التاريخ لا يكون قبل 4 أشهر من تاريخ اليوم 120 يوم ولا يتعدى تاريخ اليوم <=Date() and >=Date()-120 فكيف يكتب الشرطان معاً هل ممكن تكتب هكذا (Day([StartDate])=26 Or Day([StartDate])=1) And (<=Date() And >=Date()-120) جربتها ولا يوجد مشكلة حتى الأن فهل هذه الصيغة صحيحية وجزاكم الله خيراً أوفسينا.mdb جزيل الشكر لأسرة الموقع وخبراءنا الكرام ودمتم بخير

السلام عليكم وكل عام وأنتم بخير الموضوع عبارة عن : عندي حقل تاريخ فى جدول وكل ما أوده هو عند إدخال التاريخ للفترة يجب أن يكون يوم الإدخال 1 أو 26 بمعنى 1/5/2020 أو 26/5/2020 لا يقبل أى أرقام أيام أخرى وجزاكم الله خيراً مرفق قاعدة البيانات ومرفق قاعد التحقق من الصحة ليوم 26 Day([StartDate])=26 قاعدة البيانات بها جدول وحيد لسهولة الوصول وسؤال إضافي لو أمكن هل يمكن وضع قاعدة تحقق أخرى معها مثال يكون التاريخ مقيد بفترة مثال <Date() And >=Date()-120 أوفسينا.mdb

السللام عليكم جزيل الشكر والعرفان بالجميل سعادة المكرم "أبو خليل " تم حل المشكلة ببساطة شديدة ، وجزاكم الله خيراً

السلام عليكم ورحمة الله وبركات تم تصميم قاعدة بيانات كمثال عبارة عن نموذج مرتبط بإستعلام عند وضع أسم العميل يظهر مبلغة المطلوب وضع فلتر يظهر جميع العملاء عند كتابة "الجميع" بمعنى أن أختار أسم معين أو أختار الجميع "ALL" جزاكم الله خيراً وشكراً لتفاعلكم ووقتكم الثمين مثال.mdb