Arkusz roboczy nazw VBA programu Excel
W VBA nazwanie arkusza nie wymaga żadnych specjalnych umiejętności. Musimy tylko odnieść się do nazwy arkusza, który zmieniamy, wprowadzając istniejącą nazwę arkusza. Na przykład, jeśli chcemy zmienić arkusz o nazwie „Sprzedaż”, musimy wywołać arkusz po jego nazwie za pomocą obiektu Arkusz.
Arkusze („Sprzedaż”)
Po podaniu nazwy arkusza musimy wybrać właściwość „Nazwa”, aby zmienić nazwę arkusza.
Arkusze robocze („Sprzedaż”). Nazwa
Teraz musimy ustawić właściwość Name na nazwę zgodnie z naszym życzeniem. Załóżmy, że chcesz zmienić „Sprzedaż” na „Arkusz sprzedaży”, a następnie umieść znak równości po właściwości „NAZWA” i wprowadź nową nazwę w cudzysłowie.
Arkusze robocze („Sprzedaż”). Nazwa = „Arkusz sprzedaży”
W ten sposób możemy zmienić nazwę arkusza za pomocą właściwości Name.
Przykłady nazwania arkusza roboczego przy użyciu VBA
Przykład 1
Zmień lub zmień nazwę arkusza za pomocą zmiennych.
Na przykład spójrz na poniższy przykładowy kod.
Kod:
Sub Name_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sales") Ws.Name = "Sales Sheet" End Sub
W powyższym pierwszym zadeklarowałem zmienną jako arkusz roboczy.
Dim Ws As Worksheet
Następnie ustawiłem odwołanie do zmiennej jako „Sprzedaż” za pomocą obiektu arkuszy roboczych.
Ustaw Ws = Worksheets („Sales”)
Teraz zmienna „Ws” zawiera odniesienie do arkusza „Sprzedaż”.
Teraz, używając zmiennej „Ws”, zmieniłem nazwę arkusza na „Arkusz sprzedaży”.
Ten kod zmieni nazwę „Sprzedaż” na „Arkusz sprzedaży”.
Ważna uwaga do zapamiętania
Właśnie widzieliśmy, jak zmienić nazwę arkusza programu Excel z jednej nazwy na drugą. Jeśli jednak ponownie uruchomimy kod, otrzymamy błąd poza zakresem indeksu.
Jednym z kluczy do uzyskania eksperta w makrach VBA jest obsługa błędów. Przed obsługą błędów musimy wiedzieć, dlaczego otrzymujemy ten błąd.
Powód, dla którego otrzymujemy ten błąd, ponieważ w poprzednim kroku już zmieniliśmy arkusz o nazwie „Sprzedaż” na „Arkusz sprzedaży”.
Nie mamy żadnego arkusza o nazwie „Sprzedaż”, otrzymamy ten błąd poza zakresem.
Przykład nr 2
Uzyskaj wszystkie nazwy arkuszy roboczych w jednym arkuszu .
Załóżmy, że masz dużo arkuszy w swoim skoroszycie i chcesz uzyskać nazwę wszystkich tych arkuszy w dowolnym z pojedynczych arkuszy. Można to zrobić za pomocą kodowania VBA.
Na przykład spójrz na poniższy obrazek.
Mamy tu tak wiele arkuszy.
Ze wszystkich tych arkuszy potrzebujemy nazwy każdego arkusza w arkuszu o nazwie „Arkusz indeksowy”. Napisałem dla Ciebie poniższy kod.
Kod:
Sub All_Sheet_Names () Dim Ws As Worksheet Dim LR As Long For Each Ws In ActiveWorkbook.Worksheets LR = Worksheets ("Index Sheet"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 'Ta zmienna LR aby znaleźć ostatnio używany wiersz Cells (LR, 1). Wybierz ActiveCell.Value = Ws.Name Next Ws End Sub
Teraz skopiuj ten kod do swojego modułu.
Teraz uruchom kod, nazywając dowolny arkusz roboczy jako „Arkusz indeksowy”. Ten kod poda wszystkie nazwy arkuszy w „Arkuszu indeksowym”.
W ten sposób, używając właściwości „NAZWA” arkusza w VBA, możemy bawić się nazwami arkuszy. Możemy zmienić nazwę, wyodrębnić i możemy wybrać konkretny arkusz i zrobić wiele innych rzeczy, które można zrobić za pomocą właściwości „Nazwa”.
Rzeczy do zapamiętania
- NAZWA w VBA jest własnością.
- Używając tej nazwy, możemy zmienić nazwę arkusza, a także możemy wyodrębnić nazwy arkuszy.
- Możemy zmienić dowolną nazwę arkusza roboczego w określonym skoroszycie, jeśli odwołujesz się do innych skoroszytów niż skoroszyt napisany kodem.
- Jeśli nazwa arkusza nie pasuje, otrzymamy indeks dolny poza zakresem.
