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

هذا الرابط فيه الكود للعمل الذي تريده http://stackoverflow.com/a/3133849 ولكن ما رايك في برنامج جاهز ، تقوم بادخال قواعد البيانات ، وهو يقوم بالعمل http://www.peterssoftware.com/cal.htm جعفر

السلام عليكم فى المنتدى الكثير من الامثلة المميزة المصممة على أكسس 2003 و نظام 32 بيت وعند تشغيلها تظهر الكثير من رسائل الخطأ منها : There is no object in this Control the code must be updated for 64 bit use Declare Functions مما يمنعنا من الاستفادة القصوى من هذه الامثلة التى صممها خبراء فى الأكسس فطلبى هو هل هناك طريقة لتشغيل هذه الأمثلة على اوفيس 2013 نظام 64 بيت بشكل طبيعى أم لا جزاكم الله خير

ملحوظه اخي الفاضل للعلم الفرغات قبل الرقم وليست في الوسط لانها منقوله من قاعد بيانات sql

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

السلام عليكم اخي محمد هاي سهلة ، والمرفق فيه طلبك (مع ملاحظة اني لاحظت خطأ في الكود في قراءة الملفات ذات اكثر من 3 حروف لصيغة الملف ، مثل docx و accdb و xlsx ، والملفات بدون صيغة) ، وتم تعديله في المرفق بدلا عن FileCopy File_Path_Name, Me.pate & "\" & File_Name استخدم FileCopy File_Path_Name, Me.pate & "\Alt_" & Me.id_m & "_" & i & "." & FileExt ولكن اسمح لي ان اعرض بعض التغيير: ايش رايك بدلا عن Alt_6_1.jpg Alt_6_2.doc ايش رايك في ، بحيث تحتفظ بإسم الملف ايضا Alt_6_1_Router_config.jpg Alt_6_2_Read_Router_config_Manual.doc وايش رايك في انه يوجد لكل سنه ملفاتها؟؟ جعفر 207.3.m.salama.accdb.zip

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

الأخ الكريمأبو عبدالإله السلام عليكم ضع المعادلة التالية فى الخلية P5 واسحبها نزولا =IFERROR(SUMPRODUCT(--($B$5:$B$13=O5)*($L$5:$L$13))/SUMPRODUCT(--($B$5:$B$13=O5));"")

جرب المرفق ده compact_repair.rar

الأخ الكريمmedo6704 السلام عليكم يرحى تغيير اسم الظهور الى اللغة العربية وفقا لتعليمات المنتدى جري المرفق التالى لعله يفى بالغرض abo_abary_example.zip

اكتب هذه المعادلة في M5 واسحب نزولاً =IF(COUNTIF($B$5:B5,B5)>1,"",SUMIFS($L$5:$L$13,$B$5:$B$13,B5)/COUNTIF($B$5:$B$13,B5))

العمود N هو عمود مساعد النتيجة المطلوبة موجودة في العمودين O و P أرجو أن يكون هذا هو الحل 1المتوسط.rar

تفضل انظر في هذا الرابط: . جعفر

وعليكم السلام ورحمة الله وبركاته محاولتك صحيح لكن تطبيقها خاطئ تفضل التطبيق الصحيح وشوف هل هو المطلوب أم لا يمكنك الان البحث فى كافة الحقول بدون تحديد الحقل من القائمة المنسدلة تعديل بسيط على فكرتك db1.rar وعليكم السلام ورحمة الله وبركاته محاولتك صحيح لكن تطبيقها خاطئ تفضل التطبيق الصحيح وشوف هل هو المطلوب أم لا يمكنك الان البحث فى كافة الحقول بدون تحديد الحقل من القائمة المنسدلة تعديل بسيط على فكرتك db1.rar

السلام عليكم ورحمة الله وبركاته أخى الكريم حاولت إضافة "" وللأسف لم أفلح ، إنتظر الرد من أحد خبراء المنتدى فأنا لا زلت أحد المبتدئين. أخوك عيد مصطفى

اليك الكود يا اخي Dim oldfile, NewFile, CopyMyDB oldfile = Application.CurrentProject.Path & "\new\new.accdb" NewFile = Me.yy CopyMyDB = "cmd.exe /C copy " & """" & oldfile & """" & " " & """" & NewFile & """" Shell CopyMyDB, 0 حيث NewFile مسار النسخة الاحتياطية ( مكانها الجديد) و oldfile مسار قاعدة البيانات المراد نسخها وشكرا