Променете всички клетки в ActiveSheet на стойности, като използвате VBA в Microsoft Excel

Anonim

В тази глава ще научите как да промените всички клетки в активния лист на стойности с помощта на VBA в Microsoft Excel.

Нека вземем пример и да разберем как пишем VBA кода за промяна на стойността на клетките в активен лист.

Как да промените всички стойности на клетките в активния лист?

Имаме данни в Excel, в които искаме да заменим стойността на всички клетки само със стойността на клетката.

Следвайте следните стъпки:-

  • Натиснете клавишите Alt+F11, за да отворите приложението Visual Basic

  • Във VBAProject Щракнете двукратно върху лист 1
  • Въведете по -долу дадения VBA код
 Под стойности_1 () с ActiveSheet.UsedRange Range ("A1: I7"). Value = Range ("A2"). Value End With End Sub 

  • За да стартирате кода, натиснете клавиша F5
  • Стойността на клетка A2 ще се актуализира в определения диапазон

Как се променя стойността от първа таблица на втора таблица?

Имаме 2 маси, 1ул обхватът на масата е A3: I5 и 2nd обхватът на масата е A8: I10. Искаме да заменим стойността на 1ул таблица със стойността на 2 таблица в активния лист.

За да промените стойността, следвайте дадените по-долу стъпки и код:-

  • Отворете приложението Visual Basic
  • Въведете кода по-долу:-
Под -стойности_1 () с ActiveSheet.UsedRange Range ("A3: I5"). Value = Range ("A8: I10"). Value End With End Sub 

  • Изпълнете кода, като натиснете F5
  • Стойностите ще се актуализират

Ако ви харесаха нашите блогове, споделете го с приятелите си във Facebook. Можете също така да ни следвате в Twitter и Facebook.

Ще се радваме да чуем от вас, уведомете ни как можем да подобрим, допълним или обновим работата си и да я подобрим. Пишете ни на имейл сайта