انتقل إلى المحتوى الرئيسي

كيفية عرض الصور من مجموعة من مسارات الملفات في Excel؟

إذا كانت لديك قائمة بمسارات ملفات الصور ، فأنت الآن تريد عرض الصور المقابلة في العمود المجاور بناءً على مسارات الملفات للحصول على نتيجة لقطة الشاشة التالية. كيف يمكنك حل هذه الوظيفة في Excel بسرعة وسهولة؟

عرض الصور من مجموعة من مسارات الملفات برمز VBA في Excel

عرض الصور من مجموعة من مسارات الملفات مع ميزة مذهلة


عرض الصور من مجموعة من مسارات الملفات برمز VBA في Excel

هنا ، يمكنني تقديم رمز VBA لمساعدتك ، يرجى القيام بذلك على النحو التالي:

1. اضغط باستمرار على ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.

كود فبا: عرض الصور من مجموعة من مسارات الملفات:

Sub InsertPicFromFile()
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. بعد إدخال الرمز أعلاه ، يرجى الضغط F5 لتشغيل هذا الرمز، وسيظهر مربع مطالبة لتذكيرك بتحديد خلايا مسار الملف، انظر لقطة الشاشة:

4. ثم اضغط OK الزر، تم عرض جميع الصور المستندة إلى مسارات الملفات المقابلة في العمود التالي كما هو موضح في لقطة الشاشة التالية:


عرض الصور من مجموعة من مسارات الملفات مع ميزة مذهلة

إذا كنت منزعجًا من الكود أعلاه، كوتولس ل إكسيل يدعم ميزة مفيدة - إدراج صور من المسار (URL)باستخدام هذه الأداة القوية، يمكنك إدراج الصور بسرعة بناءً على مسارات الملفات أو عناوين URL مرة واحدة.

نصيحة:لتطبيق هذا إدراج صور من المسار (URL) الميزة ، أولاً ، يجب عليك تنزيل ملف كوتولس ل إكسيل، ثم قم بتطبيق الميزة بسرعة وسهولة.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

1. انقر كوتولس > إدراج > إدراج صور من المسار (URL)، انظر لقطة الشاشة:

2. في إدراج صور من المسار (URL) مربع الحوار ، يرجى القيام بالعمليات التالية:

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

3. ثم اضغط Ok الزر، تم إدراج الصور المقابلة في الخلايا، انظر الصورة:

انقر فوق تنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!


المزيد من المقالات ذات الصلة:

  • تحويل عناوين URL للصور إلى صور فعلية في Excel
  • إذا كانت لديك قائمة بعناوين URL للصور في العمود A ، والآن ، فأنت تريد تنزيل الصور المقابلة من عناوين URL وعرضها في العمود المجاور B كما هو موضح في لقطة الشاشة اليسرى. في Excel ، كيف يمكنك استخراج الصور الفعلية من عناوين URL للصور بسرعة وسهولة؟
  • استخراج الارتباطات التشعبية من صور متعددة في Excel
  • لنفترض أن لديك قائمة صور في ورقة عمل، وكل صورة تحتوي على ارتباط تشعبي، والآن ترغب في استخراج عناوين الارتباط التشعبي الحقيقية من هذه الصور إلى خلاياها التالية كما هو موضح في لقطة الشاشة التالية. بالطبع، يمكنك نسخ عنوان الارتباط التشعبي من مربع تحرير الارتباط التشعبي واحدًا تلو الآخر، ولكن هذا سيستغرق وقتًا طويلاً إذا كانت هناك ارتباطات تشعبية متعددة يلزم استخراجها.
  • إنشاء قائمة منسدلة مع الصور في Excel
  • في Excel، يمكننا إنشاء قائمة منسدلة تحتوي على قيم الخلايا بسرعة وسهولة، ولكن هل سبق لك أن حاولت إنشاء قائمة منسدلة تحتوي على صور، أي أنه عند النقر فوق قيمة واحدة من القائمة المنسدلة، فإن قيمتها النسبية سيتم عرض الصورة في نفس الوقت.
  • أدخل نفس الصورة في أوراق عمل متعددة
  • عادةً، يمكننا إدراج صورة في ورقة العمل بسرعة باستخدام وظيفة الإدراج في Excel، ولكن هل حاولت يومًا إدراج نفس الصورة في جميع أوراق العمل في المصنف الخاص بك؟

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have a question - this VBA code is working for me (Excel 365 Mac v16.40), but it does not load the images into Excel until I import them all manually (and then delete them). Prior to my manual import, the script runs and then completes without an error, but without any images appearing. It's almost as if Excel can't see the destination path until I have made the path "visible" through the manual import.
Any thoughts as to what is happening here/how to solve without this workaround? Thanks!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations