اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

كيف اربط الصور بالقائمه المنسدله ؟


الردود الموصى بها

اتبعت الطريقه التي شرحتوها لربط الصور بالقائمه المنسدله ولكن للاسف لا اعلم اين الخطا وهل هذا بها ماكرو ام لا وكيف الحل بسرعه الله يكرمكوا في الملف المرفق

بيانات الموظفين.rar

رابط هذا التعليق
شارك

اتبعت الطريقه التي شرحتوها لربط الصور بالقائمه المنسدله ولكن للاسف لا اعلم اين الخطا وهل هذا بها ماكرو ام لا وكيف الحل بسرعه الله يكرمكوا في الملف المرفق

اين الردددددددددددددددددددددددددددددددددود

رابط هذا التعليق
شارك

أخي العزيز

رجاء الاطلاع على المرفق وبه الشرح فهذه طريقة منفذة بكود إن شاء الله تكون مناسبة لطلبك والملف به الشرح لطريقة التعامل مع الموضوع .

ـحياتي

بالمناسبة عجبني توقيعك بس ناقص جملة ... ياآه يا آه .. :rol:

أبو عبدالله

بيانات الموظفين-1.rar

رابط هذا التعليق
شارك

اخي العزيز ابو عبدالله الف شكر ليك وهغير التوقيع وهضيفله يا اه يا اه يا دانس بس يا ريت اخي العزيز تشرحلي بالتفصيل الله يكرمك ويجعله في ميزان حسناتك كيف اعمل الماكرو ده بالتفصيل هل يكتب او يحفظ ام اقوم بتسجيله ولو ق5مت بتسجيله ما هي الخطوات ورجاء الشرح بالتفصيل حبيبي ابو عبد الله ........شكرا

رابط هذا التعليق
شارك

أخي العزيز

هذا هو الكود وكل المطلوب منك هو نسخه ثم من علامة تبويب الورقة (إسم الورقة) ماوس يمين ومن القائمة اختر VIEW CODE فتفتح لك الصفحة من محرر الفيجوال فتقوم بلصق الكود في هذه الصفحة مباشرة وطبعاً لازم دي تكون صفحة استدعاء الصور من خلال معادلة VLOOKUP الموجودة من الأصل في ملفك مع تعديلها حسب وضع القائمة المنسدلة بالأسماء وإلى جوارها الخلية التي سيظهر بها الصور وطبعاً لابد تعدل في الكود حسب عنوان الخلية التي ستظهر بها الصور والتي هي في الكود P8 إلى الخلية التي تريد أن يظهر بها الصور والباقي بخصوص عملية إضافة صور الموظفين أو تعديلها(تغييرها) سبق شرحه بالمرفق السابق ، وأهم نقطة يجب أن تنتبه لها هيى الالتزام بأن يكون إسم الصورة في الخلية التي ستظهر فيها الصور هو نفس إسم الصورة التي ستدرجهاوالذي سيظهر لك في حقل عناوين الخلاياوالنطاقات والأشكال وخلافه وهذه من أهم النقاط .

Option Explicit

Private Sub Worksheet_Calculate()

Dim oPic As Picture

Me.Pictures.Visible = False

With Range("P8")

For Each oPic In Me.Pictures

If oPic.Name = .Text Then

oPic.Visible = True

oPic.Top = .Top

oPic.Left = .Left

Exit For

End If

Next oPic

End With

End Sub

تحياتي

أبو عبدالله

رابط هذا التعليق
شارك

أخي الحبيب / خالد

لك حبي وتقديري الكبير لشخصك الجميل .

أخي الحبيب وأستاذي الكريم/ هادي سالم

شرفني وأسعدني جداً مرورك الكريم وكلماتك الرائعة خاصة أنك وحشتني جداً وأسأل الله أن تكون بكل خير .

أخي العزيز / أبو الشرف

لا تحتاج أخي الكريم لتسجيل الكودفهذا النوع من الأكواد لا يسجل بل فقط اتبع الخطوات التي ذكرتها لك في ردي السابق قبل هذا الرد مباشرة وهو باختصار نسخ الكود من الملف أو من الرد السابق ولصقه بمحرر الفيجوال للورقة التي سيكون بها إظهار الصور وباقي الخطوات موجودة بالتفصيل في الرد السابق وستجد الأمور على ما يرام إن شاء الله .

تحياتي

أبو عبدالله

رابط هذا التعليق
شارك

أخي العزيز / أبو الشرف

أشكرك جزيل الشكر .

بخصوص كتابة الأكواد والتعامل معها فهذا موضوع إن كنت مهتم به فأنت بحاجة لمزيد من الوقت والمتابعة للمشاركات المرتبطة بالموضوع بالمنتدى وبخاصة سلسلة الدروس التي تهتم بهذا الموضوع والمتوفرة والحمد لله بشكل طيب وقدم الكثير منها أساتذة كبار في المنتدى منهم الأستاذ/محمد طاهر ةالأستاذ/محمد حجازي والأستاذ/هادي سالم والأستاذ/ خبور خير وأساتذة آخرون .. وآخرها سلسلة دروس الأخ العزيز ياسر خليل والتي بدأها ومستمر فيها وتبدأ من البدايات بسهولة ووضوح لذا أنصحك أخي العزيز بمتابعتها فستجد فيها ما تريد إن شاء الله مع تمنياتي لك بكل التوفيق بس طبعاً مش توفيق اللي بالي بالك وفي الموضوع ده طبعاًأحلى من أوفيسنا مفيش يا...... :biggrin:

تقبل تحياتي

أبو عبدالله

رابط هذا التعليق
شارك

اخواني الاعزاء اخي ابو عبد الله شكرا لمجهودك طبقت الكود واشتغل 100%

السؤال انا الان عندي صور كثيره وحجم الملف كبر وانا اريد ان اجعل الصور في فلدر لوحده يوضع في الc كيف هذه الطريقه مع الشرح للاستفاده الله يكرمكووووووووووووووووووووا

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information