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

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

قام بنشر

شكرا على الكود الجميل أخي محمد يحيى

وأعتقد أنه يتم بهذا الكود أيضا تحجيم الصورة


With ActiveSheet.Shapes("picture 2")

.Width = .Width * Range("a1").Value

.Height = .Height * Range("a1").Value

End With

ولكني أعتقد أن الأخ أبو الشرف لا يريد تحجيم الصورة وإنما يريد

ظهور 20% من الصورة والباقي يكون مختفي وهكذا إلى أن تظهر الصورة كاملة

وهذا أيضا له حل بإذن الله

.....

فعندما يتم التوضيح من الأخ ابو الشرف

يتم الرد بإذن الله

قام بنشر

شاكر يا اخوان علي اهتمامكم وجزاكم الله خيرا لكل من يفيد المسلمين - نعم انا اريد ظهور نسبه 20% من الصوره والباقي يكون مختفي وفي حاله كتابه الكود برجاء شرحه لتعم الاستفاده - جزاكم الله خيرا

قام بنشر

شكرا على الكود الجميل أخي محمد يحيى

وأعتقد أنه يتم بهذا الكود أيضا تحجيم الصورة


With ActiveSheet.Shapes("picture 2")

.Width = .Width * Range("a1").Value

.Height = .Height * Range("a1").Value

End With

ولكني أعتقد أن الأخ أبو الشرف لا يريد تحجيم الصورة وإنما يريد

ظهور 20% من الصورة والباقي يكون مختفي وهكذا إلى أن تظهر الصورة كاملة

وهذا أيضا له حل بإذن الله

.....

فعندما يتم التوضيح من الأخ ابو الشرف

يتم الرد بإذن الله

- نعم اريد ظهور بالنسبه حسب خليه معينه وباقي الصوره مختفي حسب النسبه الموجوده
قام بنشر

المضوع ممكن بإذن الله

ولكن

ماذا تريد من هذا الكود؟

أو ما الهدف من استخدامه؟ وظهور الصورة تدريجيا أو حسب نسبة مكتوبة في خلية؟

لعلنا نتعاون في فكرة تكون أفضل

  • Like 1
قام بنشر

أخي الكريم عماد

دائما سباق إلى الخير

كنت أفكر في استعمال الأمر crop ولكنك سبقتني

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

وكل عام وجميع الأحباب في منتدانا بكل خير

  • Like 1
قام بنشر

السلام عليكم

الاستاذ القدير الحسامي

فكرة جميلة جدا

جزيت خيرا

الاخ صاحب الموضوع

اطلع على المرفق كود الاستاذ الحبيب الحسامي اضفتة في الثلاثه الشيتات

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

ظهور الصوره بالنسبه1.rar

قام بنشر

السلام عليكم

بارك الله فيكم وجزاكم الله خيرا على شعوركم الجميل ومروركم الاجمل

اخي محمد صالح لا يهم من سبق الاخر المهم ايجاد اضافة ومعلومة للجميع بغض النظر عن من وضعها وقدمها جميعنا اخوة

اخي ابو نصار بارك الله فيك على هذه الاضافة والمشاركة الطيبة

قام بنشر

الاستاذ اخونا المبدع " الحســــــــــــــــــــــــــــــــامي "

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

ادامك الله لنا وللمنتدى

والشكر موصول لاخونا الاستاذ العيدروس " ابو نصار "

وفقكم الله

ابو الحارث

  • 2 weeks later...

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