Zmień wszystkie komórki w ActiveSheet na wartości za pomocą VBA w programie Microsoft Excel

Anonim

W tym rozdziale dowiesz się, jak zmienić wszystkie komórki w aktywnym arkuszu na wartości za pomocą VBA w programie Microsoft Excel.

Weźmy przykład i zrozummy, jak piszemy kod VBA do zmiany wartości komórek w aktywnym arkuszu.

Jak zmienić wszystkie wartości komórek w aktywnym arkuszu?

Mamy dane w Excelu, w których chcemy zastąpić wszystkie wartości komórek tylko wartością komórki.

Postępuj zgodnie z poniższymi instrukcjami:-

  • Naciśnij klawisze Alt+F11, aby otworzyć aplikację Visual Basic

  • W VBAProject kliknij dwukrotnie Arkusz 1
  • Wprowadź poniższy podany kod VBA
 Sub Values_1() With ActiveSheet.UsedRange Range("A1:I7").Value = Range("A2").Value End With End Sub 

  • Aby uruchomić kod, naciśnij klawisz F5
  • Wartość komórki A2 zostanie zaktualizowana w zdefiniowanym zakresie

Jak zmienić wartość z pierwszej tabeli na drugą tabelę?

Mamy 2 stoły, 1NS zakres tabeli to A3:I5 i 2NS zakres tabeli to A8:I10. Chcemy zastąpić wartość 1NS tabela o wartości 2 tabela w aktywnym arkuszu.

Aby zmienić wartość, wykonaj poniższe kroki i kod:-

  • Otwórz aplikację Visual Basic
  • Wpisz poniższy kod:-
Sub Values_1() With ActiveSheet.UsedRange Range("A3:I5").Value = Range("A8:I10").Value End With End Sub 

  • Uruchom kod, naciskając F5
  • Wartości zostaną zaktualizowane

Jeśli podobały Ci się nasze blogi, podziel się nimi ze znajomymi na Facebooku. A także możesz śledzić nas na Twitterze i Facebooku.

Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy ulepszyć, uzupełnić lub unowocześnić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail