VBA, aby zapobiec zmianie nazwy arkusza roboczego w programie Microsoft Excel

Anonim

Czasami nasz kod VBA lub niektóre formuły zależą od nazwy arkusza roboczego. Jeśli nazwa arkusza zmieni się, zachowanie kodu lub formuły VBA może ulec zmianie. Dlatego bardzo ważne jest, aby wiedzieć, jak uniemożliwić użytkownikowi zmianę nazwy arkusza.

W tym artykule dowiemy się, jak używać kodu VBA, aby zachować tę samą nazwę dla arkusza roboczego, tj. Jeśli ktoś chce zmienić nazwę, nie może tego zrobić.

Poniżej znajduje się migawka arkusza roboczego zawiera dwa arkusze; Stałe i tymczasowe

Musimy wykonać poniższe kroki, aby naprawić nazwę arkusza Stałego na „Stały”.

  • Kliknij kartę Deweloper
  • Z grupy Kod wybierz Visual Basic

  • Wprowadź następujący kod w bieżącym module arkusza roboczego


Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Jeśli Sheet1.Name „Stałe” Wtedy
Sheet1.Name = "Stałe"
Zakończ, jeśli
Napis końcowy

  • Po skopiowaniu kodu; jeśli spróbujemy zmienić nazwę arkusza „Stały” to excel nam nie pozwoli.

Jak to działa?

Tutaj używamy zdarzenia worksheet_SelectionChange. To zdarzenie jest wyzwalane po zmianie wyboru arkuszy.

W takim przypadku sprawdzamy, czy nazwa arkusza jest „Stała” czy nie. Jeśli nie, zmieniamy nazwę arkusza na „Stały” inaczej nic się nie dzieje. Bułka z masłem!

Więc tak, w ten sposób można zapobiec zmianie nazwy arkusza. Mam nadzieję, że wystarczająco wyjaśniłem. Jeśli masz jakiekolwiek wątpliwości, daj mi znać w komentarzach poniżej.

Pobierz przykładowy plik