Перейти до основного матеріалу

Як додати значення до декількох комірок у Excel?

Якщо ви хочете додати значення до кількох комірок у Excel, такі способи допоможуть вам легко та швидко обробити його:


стрілка синя права міхур Додайте значення до кількох комірок за допомогою VBA

Використання макросів може полегшити багаторазову обробку, а також спростити та пришвидшити нашу роботу. Так само робить наступний макрос.

Крок 1: Виберіть комірки, до яких ви додасте значення.

Крок 2: утримуйте клавішу ALT + F11 клавіш, і відкриється вікно Microsoft Visual Basic for Applications.

Крок 3: клацніть Insert > Модуліта вставте наступний VBA у вікно модуля.

Sub Add2Formula ()
'Додайте 300

Для кожного c у вибраному
c. Активувати
ActiveCell.FormulaR1C1 = "=" & ActiveCell.Formula & "+300"
Наступний c

End Sub

Крок 4: Натисніть кнопку F5 ключ для запуску цього макросу.

примітки:

1. Цей макрос дійсний лише для комірок, що не містять формул.

2. Цей макрос додасть 300 до всіх вибраних комірок. Якщо ви хочете додати інше значення, будь ласка, замініть 300 з іншим значенням.


стрілка синя права міхур Додайте значення до кількох клітинок за допомогою Kutools для Excel

Kutools для Excel надає нам альтернативний простий у використанні метод, а його Інструменти експлуатації можуть допомогти нам легко додати значення для кількох комірок.

Kutools для Excel включає більше 80 зручних інструментів Excel. Безкоштовно спробувати без обмежень протягом 30 днів. Отримайте зараз.

Крок 1: Виберіть комірки, до яких ви додасте одне і те ж значення.

Крок 2: натисніть кнопку Кутулс > операція > Інструменти експлуатації .... Дивіться знімок екрана:

Крок 3: виберіть Доповнення з розділу «Операція» та введіть значення, яке ви додасте до вибраних комірок. Дивіться знімок екрана:

Крок 4: Перевірте Створіть формули варіант.

Крок 5: клацніть OK.

В Інструментах експлуатації
виберіть Додавання, введіть 300 і натисніть OK.

Kutools для Excel Інструменти експлуатації підтримує всі види математичних операцій для всіх вибраних комірок разом:

  • Додаток: плюс вказаний операнд.
  • Віднімання: Віднімання вказаного операнда.
  • Множення: Кожне значення клітинок, помножене на операнд.
  • Поділ: Кожне значення клітинок ділиться на операнд.
  • Посилення: Кожне значення клітинки оперує.
  • Округлення: округлити кожне значення комірки до десяткових чисел (вказаний операнд).
  • Функція: Застосовує функцію до кожного значення комірки.
  • Спеціально: Створіть формулоподібний вираз і застосуйте до кожного значення комірки.

Пов'язані статті

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 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