Kako kopirati list in ga preimenovati na podlagi vrednosti celice v Excelu?
Običajno lahko uporabite Premakni ali Kopiraj funkcijo za kopiranje delovnega lista in nato ročno vnesite novo ime za kopijo, kot jo potrebujete. Ampak, ali ste kdaj poskusili preimenovati list na podlagi vrednosti celice po kopiranju delovnega lista? V tem članku bom govoril o tem, kako samodejno preimenovati delovni list na podlagi vrednosti celice, ko naredite kopijo.
Kopirajte delovni list in ga preimenujte glede na vrednost celice s kodo VBA
Večkrat kopirajte delovni list in ga preimenujte na podlagi vrednosti celic s programom Kutools za Excel
Kopirajte delovni list in ga preimenujte glede na vrednost celice s kodo VBA
Naslednja koda VBA vam lahko pomaga kopirati delovni list in ga samodejno preimenovati z določeno vrednostjo celice. Naredite to:
1. Aktivirajte delovni list, ki ga želite kopirati, in pridržite ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.
Koda VBA: Kopirajte delovni list in ga preimenujte z vrednostjo celice:
Sub Copyrenameworksheet()
'Updateby Extendoffice
Dim ws As Worksheet
Set wh = Worksheets(ActiveSheet.Name)
ActiveSheet.Copy After:=Worksheets(Sheets.Count)
If wh.Range("A1").Value <> "" Then
ActiveSheet.Name = wh.Range("A1").Value
End If
wh.Activate
End Sub
3. In nato pritisnite F5 ključ za zagon te kode in vaš trenutni delovni list je po vseh delovnih listih kopiran v trenutni delovni zvezek in je preimenovan z vrednostjo celice, ki ste jo določili, glejte sliko zaslona:
Opombe: V zgornji kodi sklic na celico A1 je vrednost celice, ki jo želite preimenovati za novi kopirani list, jo lahko spremenite po svoji potrebi.
Večkrat kopirajte delovni list in ga preimenujte na podlagi vrednosti celic s programom Kutools za Excel
Zgornjo kodo lahko preimenujete samo z eno vrednostjo celice, če morate list večkrat kopirati in jih preimenovati na podlagi seznama vrednosti celic, Kutools za ExcelJe Ustvari delovni list zaporedja vam lahko pomaga, da to nalogo končate čim prej.
| Kutools za Excel : z več kot 300 priročnimi dodatki za Excel, ki jih lahko brezplačno preizkusite v 30 dneh. |
Po namestitvi Kutools za Excel, naredite naslednje:
1. Kliknite Kutools Plus > Delovni list > Ustvari delovne liste zaporedja, glej posnetek zaslona:
2. v Ustvari delovni list zaporedja v pogovornem oknu izvedite naslednje postopke:
(1.) Izberite ime delovnega lista, ki ga želite kopirati iz Osnovni delovni list spustni seznam;
(2.) Pod možnostjo izberite možnost Podatki v obsegu Imena listov na osnovi in kliknite 
, da izberete vrednosti celic, na podlagi katerih želite preimenovati kopirane delovne liste.
3. Nato kliknite Ok in določen delovni list je bil večkrat kopiran in preimenovan z vrednostmi celic, ki ste jih izbrali v novem delovnem zvezku, glejte posnetek zaslona:
Prenesite in brezplačno preizkusite Kutools za Excel zdaj!
Predstavitev: večkrat kopirajte delovni list in ga preimenujte na podlagi vrednosti celic s programom Kutools za Excel
Najboljša orodja za pisarniško produktivnost
Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%
- Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
- Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
- Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
- Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
- Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
- Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
- Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
- Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
- Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
