مشكلة باليوزرفورم و الترحيل للشيت

[Officawy Gded]

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

اسف للاطالة و لكم جزيل الشكر مقدماً

Try VBA 64 for First time.xlsm

[Officawy Gded]

و ده لينك للملف

https://easyupload.io/zzwian

Try VBA 64 for First time-1.xlsm

[حسين مامون]

اخي الكريم 

اطلعت على ملفك وعندي ملاحظة

1 هناك تكرار في code الموجود بالعمود "C"  واذا كان هذا شرط البحث فلا يجب ان يتكرر.

2 اشرت انك تريد ادخال البيانات في اي خلية فارغة ان تحقق الشرط ولكن في الفورم هناك 3 صندوق ادخال فقط و 18 عمود في صفحة العمل .

اقترح عليك اعادة تصميم الفورم يعني 18 عمود = 18 صندوق ادخال  للاستعلام عن جميع البيانات حسب code ومن تم يمكنك تعبئة اي خلية فارغة كما تريد واعادة ترحيلها الى الصفحة.

هذا فقط اقتراح 

[Officawy Gded]

استاذنا الفاضل حسين

اولا اشكرك من أجل ردك على طلبي و اشكرك من أجل مقترحك .

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

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

اعتذر عن تكرار عمود الكود و ممكن الاستغناء عن العمود c و العمود D

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

و اكرر شكري لمساعدتك و اتمنى يكون قدرت افصل الهدف من اليوزرفورم

تم تعديل ديسمبر 22, 2020 بواسطه Officawy Gded

[حسين مامون]

اتمنى ان يكون ما تريد

Try VBA 64 for First time.xlsm

[Officawy Gded]

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

ليس لدي ما أقوله من كلمات شكر تكفي عما قمت بعمله .

حقا لك وافر الشكر والتقدير

الشيت يعمل بشكل أكثر من رائع

تقبل تحياتي لك

 

[أحمد يوسف]

Officawy Gded

أين انت من  هذه الإجابة الممتازة؟!!! لم أرى اى ضغط على الإعجاب من طرفك , وهل جزاء الإحسان الا الإحسان ؟!!!!

أين الضغط على الإعــــجـــــاب , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!! 💙