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

كيفية إضافة قيم إلى خلايا متعددة في إكسيل؟

إذا كنت ترغب في إضافة قيمة إلى عدة خلايا في Excel ، فستساعدك الطرق التالية على معالجتها بسهولة وسرعة:


السهم الأزرق الحق فقاعة أضف قيمة إلى خلايا متعددة باستخدام VBA

يمكن أن يؤدي استخدام وحدات الماكرو إلى تسهيل العديد من عمليات المعالجة المتكررة ، وجعل عملنا أسهل وأسرع. وكذلك يفعل الماكرو التالي.

الخطوة 1: حدد الخلايا التي ستضيف قيمة إليها.

الخطوة شنومكس: اضغط باستمرار ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

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

Sub Add2Formula ()
أضف 300

لكل ج في التحديد
ج- التنشيط
ActiveCell.FormulaR1C1 = "=" & ActiveCell.Formula & "+300"
التالي ج

نهاية الفرعية

الخطوة شنومك: اضغط على F5 مفتاح لتشغيل هذا الماكرو.

ملاحظة:

1. هذا الماكرو صالح فقط للخلايا التي لا تحتوي على صيغ بداخلها.

2. سيضيف هذا الماكرو 300 لجميع الخلايا المحددة. إذا كنت ترغب في إضافة قيمة أخرى ، يرجى استبدال 300 بقيمة أخرى.


السهم الأزرق الحق فقاعة أضف قيمة إلى خلايا متعددة باستخدام Kutools for Excel

كوتولس ل إكسيل يوفر لنا طريقة بديلة سهلة الاستخدام ، ويمكن أن تساعدنا أدوات التشغيل في إضافة قيمة إلى خلايا متعددة بسهولة.

كوتولس ل إكسيل يتضمن أكثر من 80 أداة يدوية لبرنامج Excel. تجربة مجانية بدون قيود خلال 30 يومًا. احصل عليها الآن.

الخطوة 1: حدد الخلايا التي ستضيف إليها نفس القيمة.

الخطوة شنومك: انقر فوق كوتولس > عملية > أدوات التشغيل .... انظر لقطة الشاشة:

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

الخطوة 4: افحص ملف قم بإنشاء الصيغ الخيار.

الخطوة شنومك: انقر OK.

في أدوات التشغيل ،
حدد إضافة ، أدخل 300 ، وانقر فوق موافق.

كوتولس ل إكسيل أدوات التشغيل يدعم جميع أنواع العمليات الحسابية لجميع الخلايا المحددة معًا:

  • الإضافة: بالإضافة إلى معامل محدد.
  • الطرح: اطرح المعامل المحدد.
  • الضرب: كل قيمة من الخلايا مضروبة في المعامل.
  • القسمة: كل قيمة من الخلايا مقسومة على المعامل.
  • الأُس: كل قيمة للخلية تدعم المعامل.
  • التقريب: قم بتقريب كل قيمة خلية إلى الأرقام العشرية (المعامل المحدد).
  • الوظيفة: تطبيق دالة على كل قيمة خلية.
  • مخصص: أنشئ تعبيرًا يشبه الصيغة وطبقه على كل قيمة خلية.

مقالات لها صلة

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

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

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

علامة تبويب kte 201905


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

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

Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks a lot. It is working 💖
This comment was minimized by the moderator on the site
If you want to include cells with formula, you could try, which is only a slight modification from the original. But adding numbers to an established formula could be dangerous so beware:


Sub Add2Formula()
' Add a number
Dim formulae As String
Dim a_number As Double

a_number = InputBox("what number to increment")

For Each cell In Selection
cell.Activate
formulae = ActiveCell.Formula
' gets rid of formula non-essentials that could cause errors
formulae = Replace(formulae, "'", "")
formulae = Replace(formulae, "=", "")

If formulae = "" Then
ActiveCell.Formula = "= " & ActiveCell.Formula & "+" & a_number
Else
ActiveCell.Formula = "= " & formulae & "+" & a_number
End If
Next cell

End Sub


This could be easily modified to skip blank cells, and to skip text cells you could probably evaluate the value of the cell, and when it errors you could go to the next cell. Hope this helps.
This comment was minimized by the moderator on the site
How can I get this VBA formula to skip blank and text cells? Thanks
This comment was minimized by the moderator on the site
sir.iam doing survey list in excel if a=200,b=100,c=50,d=15.e=10 for 3 questions if he selects a,b,b means 200+100+100=400 and Description should be good ..how to do this one
This comment was minimized by the moderator on the site
this tool is so useful and can trust the product.
This comment was minimized by the moderator on the site
any reply? will this site answer our enquiry?
This comment was minimized by the moderator on the site
Dear Expert Have a question here. How to increase age automatically for each year? Thanks
This comment was minimized by the moderator on the site
Add Value to multiple cells with VBA's techque is very useful Thanks
This comment was minimized by the moderator on the site
sir if a1=100 b1=100 and after dat we want to insert 100 again in a1 den b1 should automatically update to 200 means a1 value added in b1 and so on and on. how it is possibe we have to take the two cells only. sir plz solve dis problem
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations