Bluemind

بعد اذن الاخوان هذي هي الداله واذا لم يتحقق الشرط فان القيمه ترجع الى الصفر =IF(A1>=50,A1*10,IF(A2>=50,A2*10,IF(A3>=50,A3*50,0)))

اخوي اتبع الخطوات الموجوده في الصور المرفقه

اخوي من الوحدات النمطيه اعمل جديد او New ثم من قائمه ادوات او Tools روح على References ثم دور على جمله تبدأ ب missing او الجمله هذي OFFOWC.DLL شيل علامه الصح و اوكي و ان شاء الله تتصلح

اخوي حل مقترح لك ليش ما تعمل جدول لكل شهر !!!! اي 12 جدول بعدد الشهور والله انا قريت موضوعك الاول بس ما فيه فايده من عمل ترقيم خاص لكل شهر. ارجوا انك ما تزعل من كلامي هذا مجرد راي و مقترح. بالتوفيق

تفضل اخوي مثل ماتفضل اخوي essam rabea معا ان مافيه داعي ترك الوصف في الجدول مثل ماهو لان ما فيه اي فايده. NAME.rar

اخوي ارفق قاعده البيانات

اخوي ابو يوسف المسأله مو مافيه احد مايعرف، المسأله مافيه احد فاضي يبدأ تصمميم المشروع من الصفر . كل واحد عنده مشاغله الخاصه و ارتباطته. كل ما طلبه منك هو البدأ في تصميم البرنامج من حيث الجداول على الاقل. ووضع تصور للبرنامج انت ابدأ البرنامج من حيث تصورك له ، لانك انت الي طالبه وتعرف المهام الي يؤديها. منها تتعلم وتنشأ لك برنامج المنتدى يقوم بمساعده المستخدميين في مشاكل الاكسس. وا نا على استعداد لمساعدتك فيه قدر المستطاع. بالتوفيق

اخوي مثل ما قلتلك في الكود اكتب الرقم الي انت تبغاه وهو رايح يعطيك هوه مثال الكود السابق Const conMaxRecords As Long = 10000 استبدل 10000 بالرقم المطلوب مثلا انت تبغى 500 رايح ينشاء لك 500 رقم مع العلم ان تشغيل الكود السابق من نفس الوحده النمطيه وذالك بالضغط على Ctrl+G

اخوي شوف المرفق هذا الي فهمت من سؤالك AmanaH_v1.0.rar

اخوي شوف رابط المشاركه هذي ممكن ينفعك http://www.officena.net/ib/index.php?showtopic=22709 او ارفق قاعده بياناتك

اخوي نفس الحكايه للنموذج او التقرير اذهب الى الحقل و في القيمه الافتراضيه تستطيع كتابه التاريخ او اي قيمه تبغاها

اخوي من الجدول اذهب الى حقل التاريخ وفي القيمه الافتراضيه لهذا الحقل اكتب ()Nowهذا يجعل القيمه الافتراضيه للحقل تكون تاريخ اليوم الحالي

اخوي ارفق قاعده بياناتك مع ان الشرح غير مفهوم لي!!!

طبعا هذا الملف مع الكود وضعته على مركز تحميل http://www.4shared.com/file/44652554/e99efecd/Missing.html

اخوي ماعاش الي يتعبك هذا كود يكتب الارقام الي تبغاها طبعا انا وضعت 10000 رقم Function MakeData() غير Missing الى اسم قاعده البيانات الحاليه'. Dim Missing As Database Dim lng As Long غير Checksnumbers الى اسم الجدول المراد تعبئته' Dim Checksnumbers As DAO.Recordset 'اكتب رقم الاعداد المراد تعبئتها في الجدول' Const conMaxRecords As Long = 10000 غير Missing الى اسم قاعده البيانات الحاليه'. Set Missing = DBEngine(0)(0) غير Missing الى اسم قاعده البيانات الحاليه و Checksnumbers الى اسم الجدول'. Set rs = Missing.OpenRecordset("Checksnumbers", dbOpenDynaset, dbAppendOnly) With rs For lng = 1 To conMaxRecords .AddNew 'ضع اسم الحقل الموجود في الجدول المراد تعبئته بالاعداد' !Checknumber = lng .Update Next End With rs.Close Set rs = Nothing غير Missing الى اسم قاعده البيانات الحاليه'. Set Missing = Nothing MakeData = "Records created." End Function بعد الانهاء من الكود اضغط على Ctrl +G اما بنسبه للمرفقات ، المنتدى لا يقبل الى ملفات وورد او ملفات مضغوطه تحميل الملف مباشره غير مقبول في المنتدى

اخوي ابسط حل عملتلك جدولين الاول تدخل فيه ارقام الشيكات كامله من مثلا 1 الى 10 في الثاني ارقام الشيكات التي استعملتها او المدخله مثلا 2,4,6,8,10 سوف تكون النتيجه "الشيكات المفقوده" 1,3,5,7,9 سوف تحصل على النتيجه في الاستعلام او ارفق قاعده بياناتك للتطبيق عليها Missing.rar

اخوي هذا شي طبيعي انه يطلعلك بالناقص حاول قلب التاريخيين!! في الرياضيات لا يمكنك طرح الكبير من الصغير اي 1-2 =-1 "من تاريخ" هذا هو الصغير الى تاريخ هذا هو الكبير انت كتبت في اول حقل الي فيه المشكله من تاريخ وضعت 19/4/2008 وفي الى تاريخ 19/12/2007 هذي تطلع بالسالب لكن لو عكست التواريخ مثل باقي الحقول سوف تظهر النتيجه بدون سالب

اخوي المرفق لا يعمل ارجوا كتابه محتويات هذه الرسائل على الاقل او تحميلها على شكل صور او برينت سكرين

اخوي من خصائص الجدول اذهب الى حقل "رقم الشهر" و روح على تنسيق او Format تحت و اكتب mm ثم حفظ و استعرض الجدول

اخوي جرب الحل هذا من نفس الصفحه هذي الي تطلعلك منها هذي الرساله روح على File وبعدين اضغط على add this site to trust zone

اخوي اول شي "S.N Leather" شيل النقطه الي بين حرف N و S وكذالك شيل المسافه التي بين حرف N و حرف L ثاني خطأ هو اسم قاعده البيانات S.NLEATER شي النقطه بين حرف N وحرف S و لا تشيل اخر نقطهNLEATHER.mdb حاول اعاده تسميه المجلد و اسم قاعده البيانات بدون نقاط و مسافات حاول ان يكون كاتالي: f:\narouz\S_N_Leather\S_NLEATHER.mdb

اخوي ياليت تضع هنا مسار قاعده البيانات اي اذهب الى الجهاز الي ما تشتغل عليه القاعده ثم تتبع المسار وقم بنسخه مثال: H:\narouz\Accounting.New\Database.mdb قم بنسخه و اضافته هنا

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

اخوي سؤال بسيط هل قمت بنقل قاعده البيانات عن طريق الايميل؟؟!!!

اخوي انت من وين تروح لقاعده البيانات؟؟ عن طريق صفحه انترنت او من الانترانت او من وين؟؟!!! و ياليت تعطيني domain الشبكه عندكم.