نجوم المشاركات

جرب هذا الملف Classeur11 salim.rar

قمت بتغيير أسماء الملفات كما قالوا لكن عند تشغيل أكسيس يتم توليدها من جديد إصلاح هذه المشكلة بنفسي لحل هذه المشكلة، اتبع الخطوتين التاليتين:1. قم بإغلاق جميع مثيلات برنامج Microsoft Office Access 2010.2. أعد تسمية ملفات المعالج المناسبة الموجودة على المسار c:\Program Files\Microsoft Office\Office14\ACCWIZ\ اسم الملف الأصلي التسمية باسم: Acwzmain.accde Acwzmain.old Acwzlib.accde Acwzlib.old Acwztool.accde Acwztool.old

اخي الكريم راجع هذا الرابط قد يفيدك https://support.microsoft.com/ar-sa/help/2581301/acc2010-you-receive-an-error-in-microsoft-access-using-the-built-in-wi

من عمل البرامج ؟ ھو بیعرف ما ھو السبب ... حسب فھمي هذه الرسالة متعلقة بالامان في البرامج اذا تريد ارفق او ارسل القاعدة لكي نعرف المزيد عنه تقبل تحياتي

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

جرب هذا الملف (يتم فصل الارقام اينما وجدت في أول النص او وسطه او اخره) فصل الارقام عن النص salim.rar

معرفة رقم آخر صف سترشدك لذلك نفترض أنك عرفت رقم آخر صف ووضعته في متغير باسم lastRow ق بالإشارة إلى الخلية بالشكل التالي Range("A" & lastRow). >>>> وعلى حسب الصورة المرفقة ستكون ترجمة ذلك الجزء هو A11

السلام عليكم جرب هذا المرفق لكن اخي الكريم عندي ملاحظات صغيرة 1- انت وضعت الكود في حدث بعد الخروج وهذا يعطي مشكلة عند استعراض الفواتير فمثلا انت تراجع فاتورة كتبت من ستة الاشهر والمواد التي فيها قد انتهت في المستودع فاذا مر المؤشر على الكمية فستحدث عندك المشكلة انا افضل حدث بعد التحديث في هذه الحالة وعند الضفط على زر اضافة اتأكد أيضا ان البيانات كلها صحيحة مرة اخرى 2- محاسبيا احيانا قد تضطر الى اخراج مواد من المستودع واستخدامها في التصنيع قبل وصول فاتورة الادخال لسبب ما لذلك برأيي يجب ان تكتفي بالتحذير ان الكمية لا تكفي في المستودع تحياتي لك End4.rar

الف الف شكر استاذى جعله الله بميزان حسناتك

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

مشاركة مع استاذنا @ابوخليل و @عبد الفتاح كيرة ھذا جيد اذن اليك هذا الكود بعد تحديث للحقل الاسم في نموذج Private Sub namst_AfterUpdate() Dim MyName MyName = Split(Me.namst, " ") If DLookup("[namm]", "TblMalomat", "[namm]='" & MyName(0) & "'") <> "" Then Me.sex = DLookup("[sex]", "TblMalomat", "[namm]='" & MyName(0) & "'") Else MsgBox (" الاسم " & " ( " & MyName(0) & " ) " & " ليس موجودا في الجدول المعلومات ") End If End Sub اذن اكتب احد الاسماء الموجودة في جدول المعلومات لكن ملاحظة يجب ان يكون هناك فراغ اي مسافة بين الاسماء ------------ واذا تريد تعمل كلها بدفعة واحدة بواسطة استعلام تحديث اليك هذا اولا اليك هذا فانكشن الصقها في وحدة نمطية Public Function BoyGirl(MyName) Dim MySex MyName = Split(MyName, " ") If DLookup("[namm]", "TblMalomat", "[namm]='" & MyName(0) & "'") <> "" Then MySex = DLookup("[sex]", "TblMalomat", "[namm]='" & MyName(0) & "'") End If BoyGirl = MySex End Function وفي استعلام التحديث اضف حقل الجنس وفي سطر تحديث اكتب اسم الفانكشن و بين قوسين اسم الحقل الاسماء BoyGirl([tel1]![namst]) فقط عليك ان تعمل تشغيل الاستعلام مرة واحدة فقط اتفضل اليك قاعدتك بعد التعديل الجنس --.rar

السلام عليكم سامحوني لضيق وقتي لم اقرا ان كانت المشكلة تم حلها ام لا لكن واجهتني المشكلة وحللتها على هذا الشكل في الاستعلام

مرفق الحل 1----تم معالجة الامر في الصفحة (يومية تسجيل) 2----اكتب فقط التاريخ المطلوب في الخلية D4 (الخلية الصفراء) في الصفحة /تقرير وفاتورة/ (و اكسل يقوم بجميع العمليات الحسابية ) (حتى و لو كان الشهر 30 يوماً او 28) اذ كتبت اي تاريخ فإن اكسل يضيف اليه اوتوماتيكياً 15 يوم يشرط الا يتجاوز ذلك اخر الشهر في الجدول في حال عدم وجود التاريخ المطلوب في صفحة (يومية تسجيل) لا تحصل على نتائج الخلايا التي تحتوي على معادلات محمية / ضد التغيير و ليس ضد المسح/ (لعدم العبث يها عن طريق الخطأ) المصنف1 SALIM.rar