abouelhassan

للرفع رفع الله قدركم

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

بمعنى عايز تقرير صفحات بعينها فى تاريخ من الى هل بالامكان جزاك الله خيرا

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

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

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

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

رفع الله قدرك اخى انتظرك بارك الله فيك وجزاك خيرا يا رب

مشكور جدا استاذ سليم روائع بعد اذن حضرتك استاذ سليم كان لدى من خلال الابحار بمواضيع حضرتك كود رائع يقوم بنفس المهمة بس مش عارف الخلل فين هل بالامكان الاطلاع واين اضع الكود مابين ws.unprotect 123 ws.UsedRange.Value = ws.UsedRange.Value بارك الله فيك ولك Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets ws.Unprotect 123 ws.UsedRange.Value = ws.UsedRange.Value ws.Protect 123 Next ws شكر وتقدير واحترام من اخيك

للرفع رفع الله قدركم

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

ربنا يحفظك حبيبي Negative اقوم بوضع -100مثلا اى رقم بجانبه سالب Positive الرقم عادى All=positive-negative لا املك لك الا دعاء من رجل عجوز عله يصادف ساعة إجابة يارب يحفظك ويسعدك ويبارك لك في اسرتك الكريمة يارب التقرير استدعاء به 3خيارات انا استدعاء positiveفقط اوNegative فقط أو ناتج طرح الموجب ناقص السالب بالتاريخ من إلى زادك الله من فضله اشكرك

سأنتظر استاذنا الفاضل بارك الله فيك

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

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

اعان الله ما يعين اخوانه اتمنى اجد ضالتى اخواتى

لو تفضلتم هل من شرح لنفس الفكرة بس كود على ملف اكسيل هل بالامكان بدل الترحيل لشيتات الاكسيل الترحيل لقاعدة بيانات اسف للتدخل مع الشكر

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

البقاء لله وحده

اتمنى منكم المساعدة اخواتى الاساتذة الافاضل

السلام عليكم احبابى الاساتذة الافاضل هذه اول مشاركة لى بمنتدى الاكسيس اتمنى لا ترودونى شاهدت هذا الموضوع للاستاذ شوقى ربيع احتاج لمساعدتكم لتنفيذ بحيث لدى ملف اكسيل تم كتابة الكودين بهم بواسطة الاستاذ سليم والاستاذ ياسر خليل الكود الاول كود ترحيل يقوم بالترحيل الى صفحة اكسيل 1 او2او3 على حسب ما احدده له والكود الثانى كود استدعاء عن طريق تحديد التاريخ واختار البيانات التى اريد استدعائها بكومبو بوكس فيتم استدعائها من الشيت 1و2و3 بالتاريخ من الى الكودين يعملان تمام بالملف ما اريد مساعدتكم فيه تنفيذ فكرة الاستاذ شوقى ربيع ربط الاكسيل بالاكسيس بحيث يكون ملف الاكسيل يرحل ويستدعى من قاعدة بيانات بدل الشيت1و2و3 مع خالص الدعاء abouelhassan.xlsm Data.accdb

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

الف مبروك تستاهلوا كل خير وفقكم الله واعانكم

هذا اخى هما الملفين الملف المطلوب تعديل او اضافة الى الكودين به هو ملف copy of my_new والملف الاخر new به الشيتات التى اريد تنفيذ الكودين الموجود ين بالملف copy of my new عليهم شكر وتقدير واحترام من اخيك Copy of My_New_Repport.xlsm new.xlsx

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