شيت مخازن برجاء المساعدة

[محمد متولي]

تم اضافة الاكواد يدويا في شيت الاصناف وعند الاستعلام علي الاصناف الاخير في شيت الاكواد من كارت الصنف من الفورم رسالة الاصناف غير موجودة 

فبرجاء الافادة 

مثال الكود 45291 مسجل علي الشيت وبالرغم من اني بستعلم علية في كارت الصنف 

مخازن.xlsm

[أ / محمد صالح]

المشكلة في هذا السطر في حدث بعد تحديث مربع النص

Me.TextBox2 = Application.VLookup(Val(Me.TextBox1), Sheets("cod").Range("c5:e5000"), 2, 0)

حيث يتم البحث حتى صف 5000 والرقم المطلوب في الصف 7152

لذلك يلزمك زيادة صف النهاية إلى 10000 مثلا

[محمد متولي]

شكرا لحضرتك