Przejdź do głównej zawartości

Jak ustawić nazwę karty arkusza równą wartości komórki w programie Excel?

W niektórych przypadkach może zajść potrzeba zmiany nazwy arkusza na podstawie określonej wartości komórki. W tym artykule pokażemy metody tworzenia nazwy karty arkusza równej wartości komórki w programie Excel.

Ustaw nazwę karty arkusza równą wartości komórki z kodem VBA
Ustaw nazwę karty arkusza równą wartości komórki za pomocą Kutools for Excel

Ustaw nazwę karty arkusza równą wartości komórki z kodem VBA

Za pomocą następującego kodu VBA możesz automatycznie ustawić nazwę karty arkusza równą wartości komórki.

1. Kliknij prawym przyciskiem myszy kartę arkusza, dla której chcesz, aby nazwa arkusza była równa wartości komórki, a następnie kliknij Wyświetl kod z menu po kliknięciu prawym przyciskiem myszy. Zobacz zrzut ekranu:

2. Skopiuj i wklej poniższy kod do okna Kod, a następnie naciśnij inny + Q klawisze jednocześnie, aby zamknąć okno Microsoft Visual Basic for Applications.

Kod VBA: Ustaw kartę arkusza równą wartości komórki

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20230130
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    ElseIf Not Intersect(Target.Dependents, Range("A1")) Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    End If
End Sub

Note: W kodzie A1 to komórka zawierająca wartość, której należy użyć jako nazwy arkusza. Możesz to zmienić według potrzeb.

Odtąd, gdy wartość w komórce A1 ulegnie zmianie, nazwa karty arkusza również zostanie zmieniona.

Ustaw nazwę karty arkusza równą wartości komórki za pomocą Kutools for Excel

W tej sekcji przedstawiamy Zmień nazwę wielu arkuszy roboczych użyteczność Kutools dla programu Excel. Za pomocą tego narzędzia możesz łatwo zmienić nazwy arkuszy z określoną wartością komórki w programie Excel.

Przed złożeniem wniosku Kutools dla programu ExcelProszę pobierz i zainstaluj najpierw.

1. kliknij Kutools Plus > Ćwiczenie > Zmień nazwę wielu arkuszy roboczych. Zobacz zrzut ekranu:

2. w Zmień nazwę wielu arkuszy roboczych w oknie dialogowym, musisz wykonać następujące czynności.

1). Sprawdź nazwy arkuszy, których nazwę chcesz zmienić w Szablony do nauki pudełko (możesz wybrać jeden arkusz lub wiele arkuszy).
2). Wybierz Zastąp oryginalną nazwę arkusza Okno w Zmień nazwę opcji
3). Jeśli chcesz zmienić nazwę arkusza lub wielu arkuszy z określoną wartością komórki, wybierz plik Z określonego zakresu i wybierz zakres komórek, na podstawie których chcesz zmienić nazwy arkuszy.
4). Kliknij OK przycisk. Zobacz zrzut ekranu:

Możesz zobaczyć, że wybrane arkusze robocze są natychmiast zmieniane według określonej wartości zakresu, jak pokazano poniżej.

Uwagi:

1. Możesz użyć FILTRY funkcja, aby łatwo odfiltrować potrzebny arkusz roboczy, jeśli istnieje wiele arkuszy roboczych.
2. Jeśli chcesz zmienić nazwę wielu arkuszy z określoną wartością komórki w każdym arkuszu. Na przykład arkusz Sheet1 będzie równy wartości swojej komórki A1, a arkusz Sheet2 będzie również równy wartości swojej komórki A1. Proszę wybrać arkusze w Szablony do nauki a następnie wybierz Zmień nazwy arkuszy z określoną komórką opcję i określ komórkę A1 w polu.

3. Nazwa arkusza nie zostanie automatycznie zmieniona wraz ze zmianą wartości komórki.

  Jeśli chcesz mieć bezpłatną wersję próbną (30 dni) tego narzędzia, kliknij, aby go pobrać, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.

Ustaw nazwę karty arkusza równą wartości komórki za pomocą Kutools for Excel

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup  |   Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły   |  Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki   |  Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi:  12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis

Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
Comments (30)
No ratings yet. Be the first to rate!
Bernardo Sebastião Floriano
Bernardo Sebastião Floriano
This comment was minimized by the moderator on the site
Good
It was the same thing I was looking for. But now I have a question:
After these steps were done, I created several sheets, I locked the sheet, but when I lock the book and enter a value in the cell, the name of the sheet does not change. In other words, it only changes with the spreadsheet unlocked and I would like to keep the spreadsheet locked
Reply
0
0
Bernardo Sebastião Floriano
Bernardo Sebastião Floriano
This comment was minimized by the moderator on the site
Boas
Era mesmo isto que estava a procurar. Mas agora tenho uma questão:
Após esses passos feitos, criei várias sheet, bloqueei a folha, mas quando bloqueio o livro e digito um valor na célula, o nome da sheet não muda. Ou seja, só muda com a sheet desbloqueada e gostaria de manter a sheet bloqueada
Reply
0
0
Yas
Yas
This comment was minimized by the moderator on the site
bonjour,
que voulez-vous dire par appuyer autre autre+q dans le code vba après avoir collé.
J'ai simplement fermé la page après avoir collé et ça ne marche pas
merci
Reply
0
0
Christopher Ward
Christopher Ward
This comment was minimized by the moderator on the site
worked beautifully!
Reply
0
0
Tom J
Tom J
This comment was minimized by the moderator on the site
Hi Crystal,

When i paste in your code it comes back with error "user-defined type not defined"?

Thanks.
Reply
0
0
crystal
crystal     Tom J
This comment was minimized by the moderator on the site
Hi Tom J,
Make sure these three options are checked in the References - VBAProject dialog box.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/error.png
Reply
Report
0
0
A Owen
A Owen
This comment was minimized by the moderator on the site
This worked perfectly for my first worksheet, but not for the second or third etc (I have up to about 20 worksheets that all need this function). Am I missing something?
Reply
0
0
crystal
crystal     A Owen
This comment was minimized by the moderator on the site
Hi A Owen,
This code only works for one worksheet per time. Sorry for the inconvenience.
Reply
Report
0
0
Remi
Remi
This comment was minimized by the moderator on the site
What is the highest nr of worksheets, that can be changed names via Kutools Plus? because the excel letting me only 17 names to changes, and that's it
Reply
0
0
Skottle
Skottle
This comment was minimized by the moderator on the site
I'm using your exact code from the above for VBA code which works perfectly for what I need. However, I have a bunch of macros on a sheet called Job Template that gets copied and reused for every new job. I designed all my macros based on a new copied version called Job Template (2). Once the sheet name is changed to the new job name, the macros no longer work and have to manually do it. I would like to be able to use any of my Macro buttons at any point instead of only using them before I change the sheet name.

Is there a way for the VBA code to always refer to the sheet name before running the rest of the code functions?
Reply
Report
0
0
dan
dan
This comment was minimized by the moderator on the site
How can I reference two cells. for example name and id number?
Reply
0
0
NickP84
NickP84
This comment was minimized by the moderator on the site
This is exactly what I need, but I need the tab to recreate a date and it isn't working... I assume this is something to do with the way excel works out date and time, can anyone suggest a workaround?
Reply
Report
0
0
crystal
crystal     NickP84
This comment was minimized by the moderator on the site
Hi Nick,
Excel does not support typing the sheet name containing special characters. If the date you type contains the character /, it won't allow you to create the sheet name with that date.
Reply
Report
0
0
There are no comments posted here yet
Load More
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations