JavaScript is not enabled!...Please enable javascript in your browser

جافا سكريبت غير ممكن! ... الرجاء تفعيل الجافا سكريبت في متصفحك.

-->
الصفحة الرئيسية

اكسيل| البحث عن الصور من خلال الفورم (صور الموظفيين )

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

اكسيل| البحث عن الصور من خلال الفورم (صور الموظفيين )


ومازلنا نتواصل معكم فى شرح كود جديد من مكتبة اكواد VBA


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

بطريقة سهلة وجميلة

الكود

TextBox1.Value = WorksheetFunction.VLookup(ComboBox1.Text, Range("a2:e1000"), 2, 0)
TextBox2.Value = WorksheetFunction.VLookup(ComboBox1.Text, Range("a2:e1000"), 3, 0)
TextBox3.Value = WorksheetFunction.VLookup(ComboBox1.Text, Range("a2:e1000"), 4, 0)
mypicture = WorksheetFunction.VLookup(ComboBox1.Text, Range("a2:f1000"), 5, 0)
Image1.Picture = LoadPicture(mypicture)
  • لمعرفة الية عمل الكود يرجى متابعة شرح الفيديو



لتحميل ملف العمل من هنا

الاسمبريد إلكترونيرسالة