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 pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
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!