dozens قام بنشر ديسمبر 11, 2012 قام بنشر ديسمبر 11, 2012 بعد السلام عليكم ورحمه الله و بركاته على الاخوه الاعضاء بسم الله الرحمن الرحيم انا لدى ورشه تصنيع صغيره اريد عمل برنامج مخزون بسيط كما هو موضح فى المرفق حيث ان هناك تعاملات يوميه من ادخال و اخراج منتجات ولا استطيع حصرها فلهذا قد قمت بعمل فكره ما واريد من اخواتى المساعده فى تنفيذه وهو كالاتى عند الضغط على الزر الموضح يظهر يوزر فورم به اسم المنتج و هذا هو المنتج الدى سوف تقوم عليه العمليه ثم اسم العميل و هو العميل الذى ياخذ المنتجات ويتم تسجيله بشكل تسلسلى ف خانه اسم العميل بمجرد كتابه اسمه و كتابه العدد الذى اخذه و كتابه التاريخ و الضغط على زر تاكيد يقوم بتسجيل هذا و طرحه من العدد الفعلى الموجود فى المنتج المحدد فى الكمبوبوكس (المنتج) هناك مربعين يوجد عليهم علامه - و + عند كتابه العدد عند مربع - يقوم بعمليه الطرح من العدد الفعلى و عند كتابه العدد عند مربع + يقوم باضافه العدد على العدد الفعلى وكل هذا المحدد الرئيسى له هو المنتجات من 1:33 store.zip
أبو حنــــين قام بنشر ديسمبر 11, 2012 قام بنشر ديسمبر 11, 2012 السلام عليكم قمت بإجراء محاولة على السريع و لا أدري هل تفي بالغرض أو لا جربيها و أخبرني بالنتائج Book1.rar
dozens قام بنشر ديسمبر 12, 2012 الكاتب قام بنشر ديسمبر 12, 2012 بعدالسلام عليكم ورحمه الله و بركاته الف الف شكر استاذى و معلمى ابو حنين و احب ان اوضح انمباهرى الشديد بحضرتك و تعلمت منك العديد و مازلت اتعلم العديد من خبراتك فى الفجول بيسيك اكسل حفظك الله وسوف اقوم بدراسه الكود و التعلم من حضرتك
dozens قام بنشر ديسمبر 12, 2012 الكاتب قام بنشر ديسمبر 12, 2012 هل من الممكن جعل هذه العمليه تتم فى عمود كل منتج على حدى اى اريد ان اذا قام احد العملاء باخذ منتج 3 يسجل فى عمود المنتج 3 واذا اخذ احد العملاء باخذ منتج 6 يسجل فى عمود المنتج 6 و هكذا اى جعل تحديد عمود التسجيل وفقا لاختيار المنتج من قائمه المنتجات
أبو حنــــين قام بنشر ديسمبر 12, 2012 قام بنشر ديسمبر 12, 2012 السلام عليكم جرب أخي المرفق بعد التعديل الذي طلبته هذا إن كنت قد فهمت المقصود أخبرني بالنتائج تعديل.rar
dozens قام بنشر ديسمبر 12, 2012 الكاتب قام بنشر ديسمبر 12, 2012 عليكم السلام ورحمه الله و بركاته هو ما اريد هو جعل LR = Sheets("DATAA").Cells(65000, "B").End(xlUp).Row عمود b متغير فى هذا الكود حسب كل منتج بمعنى منتج 1 عند اختياره يسجل ف LR = Sheets("DATAA").Cells(65000, "B").End(xlUp).Row b منتج 2 يسجل ف LR = Sheets("DATAA").Cells(65000, "c").End(xlUp).Row c منتج 3 يسجل ف LR = Sheets("DATAA").Cells(65000, "d").End(xlUp).Row d منتج 4 يسجل ف LR = Sheets("DATAA").Cells(65000, "e").End(xlUp).Row e منتج 5 يسجل ف LR = Sheets("DATAA").Cells(65000, "f").End(xlUp).Row f وهكذا ......... وهنا سيجعل عمليه التسجيل اقل بمعنى الكود هيسجل ف اخر سطر من b او c او d او f حسب كل منتج اى كل منتج سيصبح مستقل بذاته عند اختياره فى عمليه التسجيل
أبو حنــــين قام بنشر ديسمبر 12, 2012 قام بنشر ديسمبر 12, 2012 أخي والله لم افهم المطلوب لو وضعت مثال على الملف الذي أرسلته لك في المشاركة رقم 5 و تبين فيه المطلوب بمعنى تعطي أكثر من مثال لأرى سير العملية كيف يحدث
dozens قام بنشر ديسمبر 12, 2012 الكاتب قام بنشر ديسمبر 12, 2012 (معدل) لقد حاولت فعل ما اريده و قد فعلته بالفعل يا استاذى القدير ا/ ابو حنين ويرجع الفضل لله سبحانه و تعالى ثم حضرتك فى تعليمى العديد من الاكواد و شرحها لى من قبل فى المواضيع السابقه ولكنى كنت اريد رفع الملف المعدل ولكن محرج من حضرتك اشكرك على تعبك معايا الف الف شكر على جعلى اقوم بتطبيق الفكره من خلال اكواد حضرتك العجيبه فى الاكسل تم تعديل ديسمبر 12, 2012 بواسطه kalkol
أبو محمد عباس قام بنشر ديسمبر 13, 2012 قام بنشر ديسمبر 13, 2012 السلام عليكم ورحمة الله وبركاته الاستاذ والاخ الحبيب ابو حنين حفظك الله واعطاك الصحة والعافية حل رائع جزاك الله خيرا ولي طلب اذا سمحت لي بذلك وهو اعتقد نفس طلب الاخ kalkol المحترم لكنه قام بالمطلوب بنفسه كما في مشاركته 8 لكن انا حاولت ولم استطع فارفقت لك ملف وفيه الطلب مع الشرح و امثله للتعديل وتقبل دعواتي لك بالموفقية والنجاح والسلام عليكم ورحمة الله وبركاته store تعديل.rar
أبو حنــــين قام بنشر ديسمبر 13, 2012 قام بنشر ديسمبر 13, 2012 تفضل أخي عباس الملف كما طلبت تعديل store.rar
أبو محمد عباس قام بنشر ديسمبر 13, 2012 قام بنشر ديسمبر 13, 2012 السلام عليكم ورحمة الله وبركاته اخي الحبيب والاستاذ الفاضل ابوحنين المحترم بارك الله فيك واعلى مقامك في الدارين ونسال الله سبحانه وتعالى ان يديم عليك نعمه انه نعم المولى ونعم القدير ودمت في رعاية الله وحفظه
أبو أنس حاجب قام بنشر ديسمبر 13, 2012 قام بنشر ديسمبر 13, 2012 السلام عليكم ورحمة الله وبركاته أستاذي وسيدي الفاضل أبا حنين حفظكم الله الحمد والشكر لله الذي جمعنا بكم في هذا المنتدى المبارك. تعجز الكلمات عن وصف ما نكنه لك من أحترام وتقدير ولكن نقول أنت بصدقاتك الجارية تكون بين يدي واهب النعم وهو الكفيل بأن يكرمك أفضل منا في الدارين لذا نلجأ إليه دائماً أن يحفظك ويعوضك ويغدغ عليك فضائل أنعمه أنه نعم المولى ونعم النصير. أبو أنس
أبو حنــــين قام بنشر ديسمبر 13, 2012 قام بنشر ديسمبر 13, 2012 أخي الحبيب أبو أنس و الله إنني دائما أترقب مروركم لما فيه من كلمات طيبة و دعوات تثلج الصدر أدعوا الله أن يتقبلها لنا و لكم و لكل الأمة الإسلامية رعاك الله و جزاك خير جزاء و جعلك من اهل الجنة آمين يا رب العامين
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.