اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

بعد السلام عليكم ورحمه الله و بركاته على الاخوه الاعضاء

بسم الله الرحمن الرحيم

انا لدى ورشه تصنيع صغيره اريد عمل برنامج مخزون بسيط كما هو موضح فى المرفق حيث ان هناك تعاملات يوميه من ادخال و اخراج منتجات ولا استطيع حصرها فلهذا قد قمت بعمل فكره ما واريد من اخواتى المساعده فى تنفيذه وهو كالاتى عند الضغط على الزر الموضح يظهر يوزر فورم به اسم المنتج و هذا هو المنتج الدى سوف تقوم عليه العمليه ثم اسم العميل و هو العميل الذى ياخذ المنتجات ويتم تسجيله بشكل تسلسلى ف خانه اسم العميل بمجرد كتابه اسمه و كتابه العدد الذى اخذه و كتابه التاريخ و الضغط على زر تاكيد يقوم بتسجيل هذا و طرحه من العدد الفعلى الموجود فى المنتج المحدد فى الكمبوبوكس (المنتج) هناك مربعين يوجد عليهم علامه - و + عند كتابه العدد عند مربع - يقوم بعمليه الطرح من العدد الفعلى و عند كتابه العدد عند مربع + يقوم باضافه العدد على العدد الفعلى وكل هذا المحدد الرئيسى له هو المنتجات من 1:33

store.zip

قام بنشر

بعدالسلام عليكم ورحمه الله و بركاته

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

قام بنشر

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

اى جعل تحديد عمود التسجيل وفقا لاختيار المنتج من قائمه المنتجات

قام بنشر

عليكم السلام ورحمه الله و بركاته

هو ما اريد هو جعل

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 حسب كل منتج اى كل منتج سيصبح مستقل بذاته عند اختياره فى عمليه التسجيل

قام بنشر (معدل)

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

تم تعديل بواسطه kalkol
قام بنشر

السلام عليكم ورحمة الله وبركاته

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

وتقبل دعواتي لك بالموفقية والنجاح

والسلام عليكم ورحمة الله وبركاته

store تعديل.rar

قام بنشر

السلام عليكم ورحمة الله وبركاته

اخي الحبيب والاستاذ الفاضل ابوحنين المحترم

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

ودمت في رعاية الله وحفظه

قام بنشر

السلام عليكم ورحمة الله وبركاته

أستاذي وسيدي الفاضل أبا حنين حفظكم الله

الحمد والشكر لله الذي جمعنا بكم في هذا المنتدى المبارك.

تعجز الكلمات عن وصف ما نكنه لك من أحترام وتقدير ولكن نقول أنت بصدقاتك الجارية تكون بين يدي واهب النعم وهو الكفيل بأن يكرمك أفضل منا في الدارين لذا نلجأ إليه دائماً أن يحفظك ويعوضك ويغدغ عليك فضائل أنعمه أنه نعم المولى ونعم النصير.

أبو أنس

قام بنشر

أخي الحبيب أبو أنس

و الله إنني دائما أترقب مروركم لما فيه من كلمات طيبة و دعوات تثلج الصدر أدعوا الله أن يتقبلها لنا و لكم و لكل الأمة الإسلامية

رعاك الله و جزاك خير جزاء و جعلك من اهل الجنة آمين يا رب العامين

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information