أبوبسمله

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

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

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

جزاك الله خيرا د جسنين @SEMO.Pa3x 💐 استاذى العزيز @أبو إبراهيم الغامدي راجع هذا الروابط لعله ما تريد الى ان يشاركنا د حسنين https://stackoverflow.com/questions/29729391/regular-expression-arabic-characters-and-numbers-only https://en.wikipedia.org/wiki/Arabic_script_in_Unicode بارك الله فيكم اساتذتى وجزاكم الله عنا كل خير

بسم الله ماشاء الله زادك الله من فضله وعلمه تحكم رائع وروعه فالاداء و Responsive فعال جدا بارك الله فيك وفى عملك وكل ما تحب وجزاك الله كل خير

اخى الفاضل @عبدالعزيز محمد كان رد الاستاذ جعفر لك الاستعلام مرتبط بالدالة PartOfName (يعني بالكود في VBE) ، والظاهر ان هذه الطريقة (ربط الاكسل بالاكسس) لا تسمح بأي استعلام فيه اشارة الى خارجه من الدوال او القيم (حتى قيمة موجودة في نموذج) !! واما باقى التعليق فكان للاخ ماجد بالتوفيق

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

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

انتم الخير والبركه اخى واستاذى خالد وكل اللى تتمنوه جاهز وموجود باذن الله نورونا انتوا بس

الله يسعدكم ويجازيكم خير اخوتى واساتذتى العشا عندى تنورونى والله

قمت بالتعديل وشغلت كمسؤول وزى ما هو سوف احاول مره اخرى

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

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

تسلم ياغالى جارى العمل

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

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

وعليكم السلام اخى واستاذى صالح عودا حميدا وجزاك الله خيرا

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

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

وعليكم السلام @abouelhassan اتفضل ان شاء الله يكون ما تريد =Nz([Store_1];0)+Nz([Store_2];0)+Nz([Store_3];0)+Nz([Store_4];0)+Nz([Store_5];0)+Nz([Store_6];0)+Nz([Store_7];0) بالتوفيق DATA12(1).mdb

اتفضل Sub inDsum() If Me.srch_All = "Negative" Then Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=1 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_2 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=2 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_3 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=3 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_4 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=4 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_5 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=5 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_6 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=6 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_7 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=7 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) ElseIf Me.srch_All = "Positive" Then Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=1 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_2 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=2 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_3 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=3 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_4 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=4 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_5 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=5 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_6 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=6 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_7 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=7 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Else Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=1 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_2 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=2 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_3 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=3 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_4 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=4 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_5 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=5 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_6 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=6 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_7 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=7 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) End If End Sub DATA14.mdb

اتفضل اخى وضاح @النجاشي ان شاء الله يكون ما تريد البحث برقم المعامله ورقم القيد اضف ما تريد بالتوفيق 117(1).mdb

اعطانى الخطا

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

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