KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

ضبط أحجام الصور تلقائيًا دفعة واحدة لتناسب الخلايا في Excel –2 طرق مفيدة

المؤلفXiaoyangتاريخ التعديل

عند العمل مع الصور في Excel، تُعد محاذاة الصور بدقة مع حدود الخلايا أمرًا بالغ الأهمية للحفاظ على مظهر احترافي ومنظم لورقة العمل. ومع ذلك، قد يصبح إدراج الصور وتعديلها مرارًا لتتناسب تمامًا مع أحجام الخلايا عمليةً مرهقة بسرعة—خاصةً عند التعامل مع عدد كبير من الصور. غالبًا ما يواجه المستخدمون مشكلات مثل تداخل الصور مع خطوط الخلايا أو عدم توافق أبعادها بشكل صحيح، مما يجعل ورقة العمل تبدو فوضوية وغير منسقة. إذا كنت بحاجةٍ متكررة إلى إدراج صور في Excel—مثل أيقونات المنتجات أو الرسوم التوضيحية أو غيرها من العناصر المرئية—وتريد أن تتكيف تلقائيًا مع أبعاد الخلايا، فإن إتقان طرق ضبط أحجام الصور بسرعة سيُحسّن كفاءتك ويُعزز وضوح جداول بياناتك بشكل ملحوظ.

يقدّم هذا الدليل أكثر الطرق عمليةً لضبط أحجام الصور تلقائيًا دفعة واحدة، بحيث تتناسب تمامًا مع أبعاد الخلايا—ما يوفّر لك الوقت ويحافظ على تنظيم أوراق عملك. سواءً كنت تعمل على كتالوجات المنتجات، أو قوائم الجرد، أو التقارير المرئية، أو لوحات البيانات، فإن هذه الحلول ستبسّط سير عملك وتجعل الصور مُحاذَة بدقة مع بياناتها المقابلة.

ضبط أحجام الصور تلقائيًا دفعة واحدة لتناسب الخلايا باستخدام كود VBA

ضبط أحجام الصور تلقائيًا دفعة واحدة لتناسب الخلايا باستخدام Kutools لـ Excel


ضبط حجم صورة محددة لتناسب خلية واحدة باستخدام كود VBA

للمستخدمين الذين يرغبون في إدراج صور متعددة وجعلها تتوافق تلقائيًا مع حدود خلايا محددة، يُعد ماكرو VBA المخصص حلاً فعّالًا وذكيًا. بفضل قدرات VBA في Excel، يمكنك أتمتة استيراد الصور وضبط أحجامها بدقة لتتناسب تمامًا مع أبعاد الخلايا المطلوبة. ويبرز هذا الأسلوب كخيار مثالي عند التعامل مع مجموعات كبيرة من الصور، حيث يوفّر وقتك ويقلّل بشكل كبير من الأخطاء الناتجة عن التعديل اليدوي.

يُعد كود VBA الخيار الأمثل للمستخدمين المتمرسين في ميزات Excel المتقدمة والراغبين في تخصيص مرن. علاوةً على ذلك، فهو حل فعّال من حيث التكلفة ولا يتطلب أي إضافات خارجية، لكن يجدر بالمستخدمين ملاحظة أن تمكين الماكرو قد يستلزم تعديل إعدادات الأمان في Excel.

تلميح:قبل تشغيل ماكرو VBA، تأكد من أن ورقتك لا تحتوي على بيانات مهمة غير محفوظة، لأن الماكرو قد يؤثر أحيانًا على تخطيط ورقة العمل إذا استُخدم بشكل غير صحيح. ومن الممارسات الجيدة دائمًا حفظ نسخة احتياطية من ملفك.

1.أولًا، عدّل ارتفاع الصف وعرض العمود للخلايا التي تنوي إدراج الصور فيها. حدد الخلايا المستهدَفة التي ستُوضع فيها كل صورة. يضمن تحديد أحجام الخلايا مسبقًا أن تُضبط أبعاد الصور بدقة وفق الأحجام المطلوبة.

2. اضغط علىALT + F11لفتح نافذة «Microsoft Visual Basic for Applications».

3. في محرر VBA، انقر علىإدراج > وحدة نمطية (Module)، ثم الصق كود الماكرو التالي في نافذة الوحدة النمطية الفارغة.

VBA: إدراج صور متعددة بناءً على حجم الخلية

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. بعد إدراج الكود، اضغط على مفتاحF5أو انقر على زر «تشغيل» لتنفيذ الماكرو. في مربع الحوار المنبثق، انتقل إلى المجلد الذي تحتويه صورك، وحدد جميع الصور التي ترغب في إدراجها، ثم انقر على «فتح».
رمز VBA لتحديد الصور

5.سيقوم الماكرو تلقائيًا بإدراج كل صورة محددة في نطاق الخلايا المحدد، وضبط حجم كل صورة بدقة لتناسب حدود خليتها. هذه العملية توفر عليك الجهد اليدوي في تعديل أحجام الصور ومواقعها—حتى لو كنت تعمل مع عشرات أو مئات الصور! راجع النتيجة أدناه:
رمز VBA لإدراج الصور لتتناسب مع الخلايا

استكشاف الأخطاء وإصلاحها والتلميحات:إذا لم تظهر الصور كما هو متوقع، فتحقق مجددًا من نطاق الخلايا المحدد وتأكد من أن ملفات الصور قابلة للوصول. ضع في اعتبارك أن الملفات المؤمَّنة أو المدمجة قد تؤثر على عملية الإدراج. وللحصول على أفضل النتائج، استخدم صيغ صور قياسية وغير مدمجة ومتسقة (مثل .jpg أو .png). وفي حال حدوث خطأ، تأكد من امتلاكك الصلاحيات الكافية لتشغيل ماكرو VBA، وأن إعدادات أمان الماكرو في Excel تسمح بتنفيذ الكود.

نهج VBA البديل:إذا أردت إدراج الصور وضبط أحجامها استنادًا إلى قائمة بمسارات الملفات الموجودة في ورقة العمل، يمكنك تعديل كود VBA ليقرأ مسارات الصور من عمود معيّن ويربط كل صورة بالخلية المقابلة لها.


ضبط أحجام الصور تلقائيًا دفعة واحدة لتناسب الخلايا باستخدام Kutools لـ Excel

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

على عكس طريقة ماكرو VBA، لا يتطلب استخدام Kutools لـ Excel أي مهارات برمجية، مما يجعله خيارًا مثاليًا للمبتدئين وكذلك للمستخدمين المتقدمين الذين يبحثون عن الراحة والدقة. بالإضافة إلى ذلك، يقلل Kutools من احتمالات الوقوع في الأخطاء ويتأثر بشكل أقل بالقيود المعتادة في Excel (مثل تلك المتعلقة بالدمج).

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

بعد تثبيت Kutools لـ Excel، اتبع الخطوات التالية لضبط أحجام الصور دفعة واحدة وإدراج صورة لتناسب الخلايا المحددة:

  1. انقر علىKUTOOLS PLUS > استيراد/تصدير > استيراد الصورلفتح أداة استيراد الصور.
    انقر فوق Kutools Plus > استيراد/تصدير > استيراد الصور
  2. في مربع الحوار «استيراد الصور»، قم بتكوين الخيارات التالية للحصول على أفضل النتائج:
    • انقر على زرإضافةلاستعراض وإضافة ملفات الصور أو مجلد كامل إلى قائمة الصور.
    • من القائمة المنسدلةحجم الاستيراد، اخترمطابقة حجم الخليةلتغيير حجم الصور تلقائيًا بما يناسب الخلايا المحددة.
    • اضبط ترتيب الصور من القائمة المنسدلةترتيب الاستيراد—واختر بينتعبئة حسب العمود، ثم حسب الصف (لإدراج عمودي) أوتعبئة حسب الصف، ثم حسب العمود (لوضع أفقي حسب الصفوف).
    • بعد تحديد جميع الإعدادات، انقر علىاستيراد.
      حدد الخيارات في مربع الحوار
  3. سيظهر مربع حوار ثانٍ باسم «استيراد الصور». هنا، حدد نطاق الخلايا الوجهة الذي سيتم إدراج الصور فيه مع ضبط أحجامها تلقائيًا. تأكد من أن نطاق الخلايا المحدد يتطابق في عدده مع عدد الصور التي ترغب في إدراجها، لضمان محاذاة دقيقة صورة بخلية. راجع لقطة الشاشة:
    حدد النطاق لوضع الصور فيه
  4. انقر علىموافقلإكمال الاستيراد. سيتم إدراج جميع الصور المحددة وضبط أحجامها تلقائيًا لتتناسب مع أبعاد الخلايا المخصصة، مما يضمن مظهرًا احترافيًا ومنظمًا كما في لقطة الشاشة أدناه:
    أدرج الصور حسب حجم الخلية باستخدام Kutools

نصائح وتحذيرات:إذا تجاوز عدد الصور أو لم يتطابق مع عدد الخلايا المحددة، فسيطلب منك Kutools تأكيد الطريقة التي ترغب بها في التعامل مع الصور. تأكد من استخدام صيغ صور مدعومة (.jpg، .png، .bmp، إلخ)، وتجنب إدراج صورة داخل خلية مدمجة للحصول على نتائج متسقة. وإذا لم تظهر الصور كما هو متوقع، فتحقق من أن Kutools مثبَّت ومحدَّث بشكل صحيح. وقد تحتاج إلى إعادة تشغيل Excel، إذ إن بعض التغييرات لا تُفعَّل إلا بعد إعادة التشغيل.

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


الخاتمة

توفر طريقتا ماكرو VBA وKutools لـ Excel حلولًا موثوقة لضبط أحجام الصور دفعةً واحدة لتتناسب تمامًا مع أبعاد الخلايا. ويعتمد اختيار الأفضل بينهما على احتياجاتك ومستوى مهارتك الشخصية.

  • كود VBAخيار ممتاز للمستخدمين المتمرسين على ماكرو Excel والراغبين في التخصيص أو الأتمتة دون تكاليف إضافية. ومع ذلك، يتطلب معرفة أساسية بالبرمجة ووعيًا كافيًا بإعدادات أمان الماكرو في Excel.
  • Kutools لـ Excelموصى به للمستخدمين الذين يضعون سهولة الاستخدام والكفاءة والدقة البصرية في مقدمة أولوياتهم عند التعامل مع كمٍّ كبير من الصور. وهو الحل المثالي خصوصًا للمستخدمين الذين يصممون القوالب بانتظام، أو يديرون صور المنتجات، أو يعدّون مستندات Excel جاهزة للعرض التقديمي.

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


مقال ذو صلة:

كيف يمكن ضبط أحجام خلايا متعددة بسرعة لتناسب الصور الموضوعة فوقها في Excel؟


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

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

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


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

  • تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل