Tässä artikkelissa on vastauksia kysymyksiin, jotka koskevat miten lisätä arkki nimellä Excelissä VBA Jos etsit tällaisia ainutlaatuisia temppuja, olet tullut oikeaan paikkaan. Täällä keskustelemme siitä, miten 6 helppo & todistettuja tapoja lisätä Exceliin nimellä varustettu arkki VBA .

Lataa harjoituskirja

Voit ladata seuraavan Excel-työkirjan, jotta ymmärrät sen paremmin ja voit harjoitella sitä itse.

VBA-koodi lisätä arkin nimi

Käytämme Levyt objekti lisätä arkki Excelissä. Perus VBA koodi, jolla lisätään arkki, jonka nimi näyttää alla olevan kaltaiselta.

Ennen: Se on valinnainen. Se lisää uuden arkin ennen tiettyä arkkia.

Sen jälkeen: Se on myös valinnainen. Se lisää uuden arkin tietyn arkin jälkeen.

Laske: Se on myös valinnainen parametri, joka ilmoittaa lisättävien arkkien määrän.

Tyyppi: Se on myös valinnainen. Se määrittää arkin tyypin. Tässä oletusarvo on seuraava. xlWorksheet .

6 erilaista tapaa lisätä arkki nimellä Excel VBA: ssa

Excelissä voimme lisätä uuden arkin komennolla add ⊕ kuvaketta arkin nimen vieressä. Oletko koskaan ajatellut automatisoida samaa tehtävää Excelissä? Älä enää mieti, sillä VBA kattaa sinut.

Tässä meillä on laskentataulukko nimeltä Myyntiraportti . Se sisältää Päivittäinen myyntiraportti eräässä kahvilassa. Sarakkeissa B , C ja D , on olemassa nimiä Myyntiedustajat , Tuotteet ja Määrä vastaavasti.

Tässä lisäämme muita arkkeja tähän työkirjaan seuraavalla tavalla VBA-makro .

Tässä on käytetty Microsoft Excel 365 versiota, voit käyttää mitä tahansa muuta versiota haluamallasi tavalla.

1. Arkin lisääminen nimellä Excel VBA:ssa

Ensimmäisessä metodissamme lisäämme arkin, jonka nimi on annettu parametrissa käyttäjän syöttö Jos olet utelias oppimaan, noudata näitä yksinkertaisia ohjeita.

📌 Vaiheet:

• Aivan alussa, siirry osoitteeseen Kehittäjä välilehti.
• Toiseksi, valitse Visual Basic on Koodi ryhmä.
• Vaihtoehtoisesti paina ALT + F11 tekemään saman tehtävän.

Huom: Varmista, että painat ALT näppäin vasemmalla puolella SPACEBAR Operaatio ei suoritu, jos käytät muita ohjeita. ALT avaimet.

• Välittömästi Microsoft Visual Basic for Applications ikkuna avautuu.
• Siirry myöhemmin Lisää välilehti.
• Valitse sitten Moduuli vaihtoehdoista.

• Tällä hetkellä se avaa koodin Moduuli .
• Kirjoita sen jälkeen seuraava koodi Moduuli .

 Sub Add_Sheet_with_Name() Dim sheet_name As String Dim sheet As Object On Error Resume Next sheet_name = InputBox("Please enter sheet name ", _ "Exceldemy") If sheet_name = "" Then Exit Sub Sheets.Add.Name = sheet_name End Sub 

Koodin erittely

• Ensinnäkin kutsumme Sub-proseduuria seuraavasti Add_Sheet_with_Name .
• Sitten määritellään muuttujatyypit.
• Myöhemmin lisäsimme On Error Resume Next Tämä ei huomioi virheitä.
• Sen jälkeen käytimme InputBox saadaksemme käyttäjältä arkin nimen. Lisäksi tallennimme tekstin merkkijonon tiedostosta InputBox osaksi arkki_nimi muuttuja.
• Seuraavaksi, jos arkki_nimi on tyhjä, koodi ei etene.
• Lopuksi käytämme Add.Name metodilla, jolla nimetään juuri luotu arkki. Tässä tapauksessa nimi on sama kuin kohdassa arkki_nimi muuttuja.

• Paina tällä hetkellä Juokse (⏵) Sen sijaan voit painaa F5 näppäimistölläsi.

• Yhtäkkiä se avaa syöttöruudun.
• Kirjoita tähän uuden arkin nimi. Tässä tapauksessa kirjoitimme seuraavasti Voitto laatikossa.
• Klikkaa myöhemmin OK .

• Koodimme siis suoritetaan ja se lisää arkin nimeltä Voitto .

Huom: Emme ole maininneet mitään paikkaa arkillemme. Oletusarvoisesti se sijoitetaan ennen aktiivista arkkia.

Lue lisää: Excel VBA lisätäksesi arkin toiseen työkirjaan (3 kätevää esimerkkiä)

2. Excel VBA:n soveltaminen lisäämällä arkki nimellä ennen tiettyä arkkia

Toisessa menetelmässämme lisäämme arkin nimellä ennen tiettyä arkkia. Tutustutaan prosessiin vaihe vaiheelta.

📌 Vaiheet:

• Tuo ensin esiin koodi Moduuli ikkuna kuten kuvassa Menetelmä 1 .
• Toiseksi, kirjoita siihen seuraava koodi.

 Sub Add_Sheet_Before_Specific_Sheet() Worksheets("Myyntiraportti").Activate Sheets.Add(Before:=Sheets("Voitto")).Name = "Tase" End Sub 

Koodin erittely

• Ensinnäkin kutsumme Sub-proseduuria seuraavasti Add_Sheet_Before_Specific_Sheet (Lisää_arkki_ennen_erityisarkkia) .
• Sitten aktivoimme Myyntiraportti Näin varmistetaan, että koodi toimii, jos olemme toisella arkilla.
• Seuraavaksi käytämme Add.Name metodia, jolla nimetään juuri luotu arkki. Tämä arkki luodaan ennen arkkia nimeltä Voitto Lisäksi olemme nimenneet arkin nimellä Tase .

• Suorita sen jälkeen koodi, joka on esitetty kohdassa Menetelmä 1 .
• Näin se lisää uuden arkin Tase ennen arkkia nimeltä Voitto .

Lue lisää: Excel VBA lisätä arkki muuttujan nimellä (5 ihanteellista esimerkkiä)

3. Excel VBA:n käyttäminen lisätäksesi arkin nimellä tietyn arkin jälkeen.

Tässä menetelmässä lisäämme arkin arkin nimeltä Voitto Katsotaanpa prosessia yksityiskohtaisesti.

📌 Vaiheet:

• Tuo ensin esiin koodi Moduuli ikkuna kuten kuvassa Menetelmä 1 .
• Kirjoita sen jälkeen seuraava koodi siihen.

 Sub Add_Sheet_After_Specific_Sheet() Worksheets("Profit").Activate Sheets.Add(After:=ActiveSheet).Name = "Varasto" End Sub 

Tämä koodi on lähes samanlainen kuin koodi Menetelmä 2 . vain, tässä käytimme parametria Jälkeen eikä Ennen Koska haluamme lisätä uuden arkin tietyn arkin perään.

• Suorita sen jälkeen koodi, joka on esitetty kohdassa Menetelmä 1 .
• Näin se lisää uuden arkin Varasto nimisen arkin jälkeen Voitto .

Lue lisää: Excel VBA lisätä arkki, jos sitä ei ole olemassa (nopeat vaiheet)

4. Nimen omaavan arkin lisääminen työkirjan alkuun

Tässä jaksossa lisäämme uuden arkin Excelin työkirjan alkuun käyttämällä VBA Katsotaanpa siis viipymättä, miten se tehdään.

📌 Vaiheet:

• Tuo aluksi esiin koodi Moduuli ikkuna kuten kuvassa Menetelmä 1 .
• Kirjoita sen jälkeen seuraava koodi siihen.

 Sub Add_Sheet_Start_Workbook() Sheets.Add(Before:=Sheets(1)).Name = "Yrityksen profiili" End Sub 

Tässä lisäämme uuden työarkin ennen työkirjan ensimmäistä arkkia. Eli työkirjan alussa. Näin ollen se on nyt ensimmäinen arkki. Lisäksi nimesimme arkin nimellä Yrityksen profiili .

• Suorita sitten koodi, joka on esitetty kohdassa Menetelmä 1 .
• Näin ollen, se lisää uuden arkin Yrityksen profiili työkirjan alussa.

Lue lisää: Excel-makro: Luo uusi arkki ja nimeä uudelleen (3 ihanteellista esimerkkiä)

5. Excel VBA:n hyödyntäminen arkin lisäämiseksi työkirjan loppuun

Tässä jaksossa lisätä arkki työkirjan viimeisen arkin jälkeen. Sallikaa minun esitellä prosessi alla.

📌 Vaiheet:

• Avaa ensisijaisesti koodi Moduuli ikkuna kuten kuvassa Menetelmä 1 .
• Toiseksi, liitä seuraava koodi siihen.

 Sub Sheet_End_Workbook() Sheets.Add(After:=Sheets(Sheets.Count)).Name = "Tuloslaskelma" End Sub 

Koodin erittely

• Ensinnäkin kutsumme Sub-proseduuria nimellä Sheet_End_Workbook.
• Seuraavaksi käytämme Add.Name metodia, jolla voimme nimetä juuri luodun arkin. Luomme tämän arkin työkirjan viimeisen arkin jälkeen. Viimeisen arkin numeron saamme arvosta Sheets.Count Lisäksi olemme nimenneet arkin Tuloslaskelma .

• Suorita sen jälkeen koodi, joka on esitetty kohdassa Menetelmä 1 .
• Näin ollen, se lisää uuden arkin Tuloslaskelma työkirjan lopussa.

Lue lisää: Luo uusi työkirja ja tallenna VBA: n avulla Excelissä

6. Useiden arkkien esittely Excel VBA:n avulla solun arvon avulla

Viimeistä menetelmää varten lisäämme useita arkkeja työkirjaan, jossa on nimi solualueelta Excelin avulla. VBA Lisäksi pyydämme käyttäjää syöttämään alueen, josta nimi otetaan. Katsotaanpa siis alla olevia vaiheita.

📌 Vaiheet:

• Avaa ensin koodi Moduuli ikkuna kuten kuvassa Menetelmä 1 .
• Kopioi sen jälkeen seuraava koodi ja liitä se siihen.

 Sub Add_Multiple_Sheets_Using_Cell_Value() Dim rng As Range Dim cc As Range Set rng = Application.InputBox("Select Cell Range" _ & " to Insert Sheets", "ExcelWIKI", Type:=8) Application.ScreenUpdating = False Worksheets("Myyntiraportti").Activate For Each cc In rng Sheets.Add(After:=ActiveSheet).Name = cc.Value Next cc Application.ScreenUpdating = True End Sub 

Koodin erittely

• Ensinnäkin kutsumme Sub-proseduuria nimellä Add_Multiple_Sheets_Using_Cell_Value.
• Sitten määritellään muuttujatyypit.
• Sen jälkeen käytämme InputBox saadaksesi tietovälin käyttäjältä.
• Neljänneksi aktivoimme arkin Myyntiraportti .
• Myöhemmin käytämme Jokaisen seuraavan silmukka, jolla käydään läpi valittu solualue yksi kerrallaan.
• Seuraavaksi käytämme Add.Name metodia, jolla nimetään juuri luotu arkki. Luomme nämä arkit aktiivisen arkin jälkeen. Myyntiraportti työkirjassa.

• Suorita nyt koodi, joka on esitetty kohdassa Menetelmä 1 .
• Välittömästi Exceldemy avautuu syöttöruutu.
• Anna sitten solujen solut B5:B9 alue laatikossa.
• Klikkaa lopuksi OK .

• Lopuksi se lisää viisi arkit, jotka on nimetty solujen arvojen mukaan B5:B9 Ne ovat kaikki lakanan jälkeen. Myyntiraportti .

Päätelmä

Tässä artikkelissa on helppoja ja lyhyitä ratkaisuja Excelin nimettyjen arkkien lisäämiseen. VBA Älä unohda ladata Harjoitus tiedosto. Kiitos, että luit tämän artikkelin, toivomme, että tämä oli hyödyllistä. Kerro meille kommenttiosioon, jos sinulla on kysyttävää tai ehdotuksia. Vieraile verkkosivuillamme. Exceldemy tutkia lisää.