حسين مامون

السلام عليكم لم افهم جيدا طلبك ولكن لا عليك واحدة واحدة وسنفهم بعضنا ان شاء الله دكرت الطباعة افقييا هل تقصد الطباعة بالزر (طباعة جماعية) ام ماذا؟ اليك المرفق اضفت زر تعديل البيانات و زر اضافة بيانات جديدة وقائمة منسدلة في الخلية(L7) شيت نمودج المستخدمين ليسهل اختيار الطابعة تحياتي red.cartier.xlsxتعديل55.xlsm

لم افهم ما تقصد بفصله عن القطع هناك صفحتين مخفيتين (طباعة) و(طباعة2) يمكنك اظهارهما متى شئت اخي يمكنك وضع نمودج عما تريد في ملف وهكذا احسن طريقة لفهم المطلوب

السلام عليكم عفوا هناك خلل في الملف وتم اصلاحه red.cartier.xlsxتعديل55.xlsm

وضعت زر طباعة ولكن مادا سنطبع ؟ هل تريد طباعة نتيجة البحث مثلا ؟ ادا كان هذا هو ما تريد انظر التصميم في شيت 3 واجبني بالنسبة للتصميم في شيت3 مادا عنه؟ نحسبه طباعة فردي حفظك الله موعدنا غدا انشاء الله ونتمم الموضوع تحياتي red.cartier.xlsxتعديل55.xlsm

سأعمل على انشاء زر بحث اولا واعيد لك الملف لكي ترى النتيجة وبعدها نمر الى العديل ووووو تحياتي انظر المرفق red.cartier.xlsxتعديل.xlsm

اخي الكريم ادا كان ما تقصده في مشاركتك رؤوس الجدول فانظر المرفق وضع فيه بعض البيانات لكي يسهل فهم طلبك تحياتي red.cartier.xlsx

تفضل اختر من الكومبوبوكس واضغط زر بحث تقسيط .xlsm

بعد تنفيد العملية ستجد النسخة في الفولدر 😄 في مجلد باسم allaoua10 اسمك في المنتدى . الكود معدل حسب الطلب اظن الكود للاستادنا عبد الله باقشير جزاه الله خيرا وكذلك جميع الاساتدة الكرام اتمنى ان يكون ما تريد تحياتي لك اخي الكريم كود حفظ شيت من ملف اكسل حسب اليوم.xlsm

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

استادي سليم الف الف تحية اخي لا يمكن لي كتابة مثل هذا الماكرو مازلت مبتدءا في الاكسيل ومعرفتي في الميدان محدودة ، انتم اساتذتنا تعلمنا منكم وما زلنا ماكرو رائع كعادتك دائما وابدا نستمتع بأعمالك جزاك الله خيرا وحفظك وزادك علما . تحياتي لجميع الاساتدة في المنتدى اخوكم في الله حسين مامون من المغرب

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

السلام عليكم ورحمة الله استاذ moazshawar قمت بانشاء فورم اخر غير الذي وضعته في ملفك وهذا سيكون تجربة ترحيل بيانات الى صفحة "بيع" وان كان هذا ما تريد ساواصل مساعدتك بما اعرفه ونعمل سويا عى انشاء فورم لكل صفحة ونضع لها ازرار في الصفحة (العمليات). ان امكن قم انت بانشاء تصميم لفورم ويكون مخصص لشيت الشراء وضعه في مشاركىةتك التالية البرنامج.xlsm

استاد moazshawar الف تحية سأحاول عمل فورم ادخال بيانات في صفحة البيع وسنرى بعد ذلك الباقي

جرب هذا الملف ولكن ب VBA match and index.xlsm

جرب المرفق تنسيق شرطى.xlsm

انظر المرفق الصندوق2019.xlsm

الحمد لله وبنعمته تتم الصالحات وجزيت بمثل ما دعيت

جربي المرفق قاعده ادخال البيانات (3).xlsm

تفضلي اضغطي TAB وسيكون الانتقال بين محتويات الفورم بالترتيب ان شاء الله قاعده ادخال البيانات.xlsm

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

اخي على ما فهمت من مشاركتك تريد انشاء صفحة لكل "كود محاسبي" وترحيل بياناته حسب الشرط ، والشرط هنا هو "كود محاسبي" عموما لنفهم موضوعك أكثر قم بوضع نمودج لطلبك وارسله مرة اخرى وهكذا يمكن مساعدتك ان شاء الله او انظر المرفق وضعت شيتين كنمودج ان كان ما تريد فهذا سيساعد الاساتذة على العمل في طلبك الصندوق2019.xlsm

x = Application.Match(Val(Application.Max(ws.Columns(1))), ws.Columns(1), 0) If Not IsError(x) Then tbID = ws.Cells(x + 1, 2).Value '============================================== x = Application.Match(Val(Application.Max(ws.Columns(1))), ws.Columns(1), 0) If Not IsError(x) Then tbID = ws.Cells(x + 1, 2).Value استاذة OmHamza قلت ان الرقم المدني يعمل تلقائي سابقا ولكن في الواقع لن يعمل كما هو موضح في الكود المخصص لهذه الوضيفة علما ان العمود في صفحة العمل هو (B) عموما انا تركته كما في مشاركتك الاولى وهو كما ترين في الاسطر اعلاه. اما بالنسبة لكمبوبوكس "الشارع" تم اضافته في الفورم انظري المرفق تحياتي قاعده ادخال البيانات.xlsm

هذه محاولة اتمنى ان تكون المطلوب قاعده ادخال البيانات.xlsm

جرب المرفق CANCLE PROGRAM2222 (1).xlsm

قمت بانشاء 2 فورم فورم1 لادخال ايام فورم2 لادخال السلف انظر هل هذا ما تريد؟ مرتبات يوليو -.xlsm