Skip to main content

كيفية تطبيق نفس الصيغة على خلايا متعددة في Excel؟

Author: Sun Last Modified: 2025-05-30

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

تطبيق نفس الصيغة على خلايا متعددة باستخدام التعبئة التلقائية

تطبيق نفس الصيغة على خلايا متعددة باستخدام VBA

تطبيق نفس الصيغة على خلايا متعددة باستخدام Kutools لـ Excel


arrow blue right bubble تطبيق نفس الصيغة على خلايا متعددة باستخدام التعبئة التلقائية

باستخدام التعبئة التلقائية لتطبيق نفس الصيغة على خلايا متعددة، يمكنك القيام بما يلي:

1. حدد خلية فارغة ثم اكتب الصيغة التي تحتاجها، هنا أكتب =(A1*3)/2+100، وبعد ذلك اسحب مقبض التعبئة التلقائية إلى اليمين لملء الصيغة في الصف، انظر إلى لقطة الشاشة:

add same formula to cells with formula

2. ثم اسحب مقبض التعبئة لأسفل إلى النطاق الذي تحتاجه. انظر إلى لقطة الشاشة:

drag the formula to other cells

ملاحظة: يمكنك أيضًا تحديد النطاق الذي ستطبق عليه نفس الصيغة، ثم انقر فوق الرئيسية > تعبئة > لأسفل وتعبئة > لليمين بالتتابع.


arrow blue right bubble تطبيق نفس الصيغة على خلايا متعددة باستخدام VBA

علاوة على ذلك، يمكن أن يساعدك VBA في تطبيق نفس الصيغة على خلايا متعددة.

1. اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic For Applications.

2. انقر فوق Module > إدراج لإدراج نافذة وحدة، ثم انسخ VBA أدناه إلى النافذة.

VBA: تطبيق نفس الصيغة على الخلايا.

Sub SetFormula()
'Updateby20140827
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    Rng.Value = (Rng.Value * 3) / 2 + 100
Next
Application.ScreenUpdating = True
End Sub

3. انقر فوق زر التشغيل، ستظهر نافذة KutoolsforExcel لتختار نطاقًا. انظر إلى لقطة الشاشة:

apply same formula to multiple cells with vba code

4. انقر فوق موافق، وسيتم تطبيق نفس الصيغة على جميع الخلايا المحددة.

نصيحة: يمكنك تغيير الصيغة عن طريق تغيير Rng.Value = (Rng.Value * 3) / 2 + 100 في VBA أعلاه لتلبية احتياجاتك.


arrow blue right bubble تطبيق نفس الصيغة على خلايا متعددة باستخدام Kutools لـ Excel

مع تثبيت Kutools لـ Excel، يمكنك استخدام أدوات الحساب لتطبيق نفس الصيغة بسرعة على نطاق الخلايا.

Kutools لـ Excel يتضمن أكثر من 300 أداة مفيدة لـ Excel. جربها مجانًا بدون قيود لمدة 30 يومًا. احصل عليها الآن

1. حدد النطاقات التي تحتاج إلى تطبيق نفس الصيغة وانقر فوق Kutools > المزيد > أدوات الحساب. انظر إلى لقطة الشاشة:

2. في نافذة أدوات الحساب، انقر فوق مخصص في قسم العملية، واكتب الصيغة في مربع النص، يمكنك رؤية نتائج الحساب في مربع المعاينة.

apply same formula to cells with kutools

3. انقر فوق موافق أو تطبيق، ثم يتم تطبيق الصيغة التي كتبتها على جميع النطاقات المحددة. انظر إلى لقطة الشاشة:

apply same formula to cells with kutools to get the result

ملاحظة:

1. إذا قمت بتحديد خيار إنشاء صيغة في نافذة أدوات الحساب، سيتم الاحتفاظ بالصيغ في كل خلية. انظر إلى لقطة الشاشة:

check the Create formulas to create formulas for cells

2. إذا تم تحديد خيار تجاهل الصيغة، فإن العملية ستتخطى الخلايا التي تحتوي على الصيغة في النطاق.

انقر هنا لمعرفة المزيد حول أدوات الحساب.

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

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

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


Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير

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