كيف يمكن اظهار صورة المتدرب عند البحث عن اسمه

[خالد محمد فتحي]

لنفرض ان هناك شيت للبحث عن بيانات متدرب واظهار صورت المتدرب بجانبه

كيف يمكن ذلك؟

[هشام شلبى]

السلام عليكم

------------

اخى خالد الرابط فيه طلب مشابه لطلبك لكن الملف فى المشاركة بدون اكواد

http://www.officena.net/ib/index.php?showtopic=31306

اما ان كنت ترغب بالاكواد

انظر المرفق

طاب يومك فى رعاية الله

وضع صورة امام الاسم1.rar

[خالد محمد فتحي]

اخي هشام اشكر لك حسن التعاون

جزاك الله كل خير

[خالد القدس]

السلام عليكم طريقة الملف بدون أكواد سهلة ورائعة بارك الله فيك وجزاك الله خيرا

[خالد محمد فتحي]

نعم صحيح طريقة سهلة ولكن لوفرضنا انه لدينا حوالي 600 صورة

في هذه الحالة يصبح حجم ملف الاكسيل كبيراً جداً

وجدت كود رائع بحيث تظهر الصورة في الشيت عن طريق البحث عنها في ملف ولنفرض انه في القرص c

Private Sub Worksheet_Change(ByVal Target As Range)

On Error GoTo 1

Application.ScreenUpdating = False

If Target.Column = 16 Then

Else

If Target.Column = 5 And Target.Row < 3 Then

If Target.Cells <> "" Then

Image1.Visible = True

Image1.Picture = LoadPicture("c:\pic\" & (Target.Text) & ".jpg")

Image1.Width = 98

Image1.Height = 114

End

End If

1

Image1.Visible = False

MsgBox ("لاتوجد صورة")

0

End

End If

End If

Application.ScreenUpdating = True

Application.EnableEvents = True

End Sub

يشير هذا السطر

If Target.Column = 5 And Target.Row < 3 Then

الى رقم العمود والصف الذي سيكتب به رقم الطالب

والسطر Image1.Picture = LoadPicture("c:\pic\" & (Target.Text) & ".jpg")

يشير الى مكان الملف واسمه في القرص

يتم وضع الكود في طور التصميم بالفيجوال

بعد اضافة عنصر اكتفي للصورة في الشيت المحدد

كما يجب مراعاة حجم الصورة

Image1.Width = 98

Image1.Height = 114

تم تعديل مارس 2, 2010 بواسطه خالد محمد فتحي

[mselmy]

استاذ/ خالد

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

[خالد محمد فتحي]

هذا ملف به الكود وبه الشرح ايضاً

وعليك بانشاء ملف جديد في القرص c

باسم picr

كود اظهار صورة من ملف.rar

[caracara]

الله يزيدك من علمه افدتناافادك الله

[احمد فضيله]

بارك الله فيكم و في مجهودكم

[weld]

ممكن تحويل الملف الى أكسل 2003 وشكرا

weld

[جلال محمد]

الاخوه الكرام

السلام عليكم

الملف الموجود في المشاركه رقم ( 7 ) به كود جميل ولكن ما هو التعديل المطلوب لكي يظهر الكود اكثر من صوره في الصفحة الواحده وليكن صورتين او اكثر

ولكم جزيل الشكر

[وليد المصرى 1]

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