برجاء المساعدة في كود تسجيل بيانات

[علي عبد المنعم]

برجاء المساعدة المطلوب موجود بالملف

تسجيل يومية.rar

[shreif mohamed]

تفضل

تسجيل يومية(AutoRecovered).xlsm

[الأستاذ / محمد الدسوقى]

تسلم يا استاذ شريف

سبقتنى بهذه الروائع

وطلب منك أن تجرب هذا الكود فى حدث الكمبوبوكس الأول بالملف وتخبرنى بالنتيجة

Private Sub ComboBox1_Change()
 Me.TextBox8.Value = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, Sheets(2).Range("A3:B9"), 2, 0)
End Sub