كيف يمكن تغيير جميع الصور تلقائيًا إلى خيار «التحريك والتحجيم مع الخلايا» في Excel؟
عند العمل مع الصور في Excel، قد تلاحظ أن الصور المُدرجة في ورقة العمل تكون مضبوطة افتراضيًا على خيار «التحريك دون التحجيم مع الخلايا». وهذا يعني أنه إذا قمت بتعديل أحجام الخلايا—مثل تغيير عرض العمود أو ارتفاع الصف—فستبقى الصور بأبعادها الأصلية دون أن تتغير لتناسب التنسيق الجديد للخلايا. وللمستخدمين الذين يحتاجون إلى محاذاة سلسة للصور مع تعديلات الخلايا، مثل عند إنشاء لوحات المعلومات أو التقارير أو أوراق التتبع البصرية، قد يشكّل هذا السلوك الافتراضي مصدر إزعاجٍ ويستغرق وقتًا طويلاً لإصلاحه يدويًا، خاصةً إذا احتوت ورقة العمل على عدد كبير من الصور.
لتخطي هذه المشكلة، يوفّر Excel طريقةً لتغيير خاصية كل صورة بحيث لا تتحرّك فحسب، بل تتغيّر أبعادها تلقائيًا مع خليتها أيضًا («التحريك والتحجيم مع الخلايا»). ومع ذلك، قد يكون تعديل هذا الإعداد صورةً تلو الأخرى أمرًا مرهقًا. تعرض هذه المقالة نهجًا فعّالًا لتحديث جميع الصور في ورقة العمل دفعةً واحدة إلى خيار «التحريك والتحجيم مع الخلايا» باستخدام كود VBA مباشر. وتُعدّ هذه التقنية مفيدةً بشكل خاص في السيناريوهات التي تُعيد فيها غالبًا تنظيم الصفوف أو الأعمدة التي تحتوي على صور، أو تقوم بتصفية البيانات، لضمان بقاء العناصر البصرية مُحاذيةً بشكل مناسب مع بياناتك.
تغيير تلقائي لجميع الصور إلى خيار «التحريك والتحجيم مع الخلايا» باستخدام كود VBA
تغيير تلقائي لجميع الصور إلى خيار «التحريك والتحجيم مع الخلايا» باستخدام كود VBA
عندما تحتوي ورقة العمل على صور متعددة وتريد أن تتكيف جميعها بشكل متسق مع خلاياها المقابلة، يمكنك استخدام كود VBA التالي لضبط كل كائنات الصور في ورقة العمل النشطة فورًا على خيار «التحريك والتحجيم مع الخلايا». ويُلغي هذا الحل الآلي الخطوات اليدوية المتكررة، ويُحسّن كفاءة سير العمل، ويقلل من احتمال تفويت أي صورة أثناء العملية.
فيما يلي دليل خطوة بخطوة لتطبيق حل VBA هذا:
1. افتح ورقة العمل التي تحتوي على الصور التي تريد تحديثها بحيث تتحرك وتتغير أبعادها مع الخلايا. بعد ذلك، افتح محررMicrosoft Visual Basic for Applications بالضغط علىAlt + F11 من لوحة المفاتيح. يعمل هذا الاختصار في معظم إصدارات Excel.
ملاحظة: إذا لم تظهر لك علامة التبويبالمطوّر، يمكنك تمكينها من خلال خيارات Excel. وإذا كنت تعمل على ملف محمي أو مشترك، فقد تكون بعض الميزات مقيدة، لذا تأكد من أن لديك أذونات التحرير المطلوبة.
2. في نافذةMicrosoft Visual Basic for Applications، انقر علىإدراج > وحدة نمطيةلإنشاء وحدة جديدة، ثم انسخ والصق كود VBA التالي في نافذة الكود:
كود VBA: تغيير جميع الصور إلى خيار «التحريك والتحجيم مع الخلايا»
Sub MoveAndSizeWithCells()
Dim xPic As Picture
On Error Resume Next
Application.ScreenUpdating = False
For Each xPic In ActiveSheet.Pictures
xPic.Placement = xlMoveAndSize
Next
Application.ScreenUpdating = True
End Subنصائح:
- تأكد من أنك تعمل في ورقة العمل الصحيحة قبل تشغيل الماكرو، لأن الكود سيؤثر على جميع الصور الموجودة حاليًا في ورقة العمل النشطة.
- إذا احتوت ورقة العمل على كائنات أخرى (مثل الأشكال أو المخططات أو الرموز)، فإن هذا الكود يستهدف كائنات الصور تحديدًا ولا يؤثر بأي شكلٍ على تلك الكائنات الأخرى.
3. اضغط علىF5أو انقر على زر التشغيل في محرر VBA لتنفيذ الكود. بعد التشغيل، سيتم ضبط جميع الصور في ورقة العمل النشطة تلقائيًا على خيار «التحريك والتحجيم مع الخلايا». لست بحاجة إلى تحديد الصور واحدة تلو الأخرى—فالكود يعالجها جميعًا دفعة واحدة.
يقلل هذا الحل من الجهد اليدوي ويساعد في الحفاظ على تنسيق متسق، خاصةً عند التعامل مع تعديلات متكررة على الصفوف أو الأعمدة. إذا لاحظت أن بعض الصور لم تتغير كما هو متوقع، فتأكد من جديد من أن تلك الكائنات مُعرَّفة كصور في Excel—يجب أن تظهر باسم «صورة» في لوحة التحديد، وليس كأنواع كائنات أخرى.
إذا واجهت خطأً أثناء العملية، فتأكد من أنك لم تحدد عن طريق الخطأ ورقة مخطط، وأن الصور ليست مقفلة أو مجمَّعة. في معظم الحالات، يؤدي تشغيل الكود بالطريقة الموضَّحة أعلاه إلى النتيجة المرجوة.
لتحسين سير عملك بشكلٍ أكبر، ننصحك بحفظ ملفك قبل تشغيل كود VBA. وإذا كنت تخطط لتكرار هذه العملية بانتظام، يمكنك تعيين الماكرو على زر للوصول إليه بنقرة واحدة!
كحلٍ بديلٍ عملي لأولئك غير المرتاحين لاستخدام VBA، يمكنك تغيير خاصية كل صورة يدويًا بالنقر بزر الماوس الأيمن على الصورة، ثم اختيارتنسيق الصورة، ثم تحديدالخصائص، وبعد ذلك تفعيل خيار «التحريك والتحجيم مع الخلايا». ومع ذلك، فإن هذا الأسلوب مناسب فقط لأوراق العمل التي تحتوي على عددٍ قليلٍ من الصور.
طريقة أخرى ذات صلة هي استخدام «لوحة التحديد» في Excel VBA لتصفية وتحديد جميع الصور بسرعة، مما يتيح لك تعديل خصائصها يدويًا مع تحكمٍ أكبر في التخطيطات المعقدة التي تحتوي على أنواع مختلفة من الكائنات.
مقالات ذات صلة:
- كيف يمكن توسيط صورة داخل خلية في Excel؟
- كيف يمكن التحقق مما إذا كانت الخلية تحتوي على صورة في Excel؟
- كيف يمكن إدراج صورة أو عرضها ديناميكيًا في خلية في Excel بناءً على القيمة الموجودة في تلك الخلية؟
- كيف يمكن تكبير الصورة عند النقر عليها في Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل