VBA nimetab leht ümber | Kuidas Exceli töölehte ümber nimetada VBA-koodi abil?

Exceli lehtede ümbernimetamine toimub tegumiribal, allpool on töölehed olemas, topeltklõpsates neid, kuid VBA-s kasutame lehe ümbernimetamiseks omaduste meetodit Sheets või Worksheet, VBA-s lehe ümbernimetamiseks on süntaks järgmine Vana lehe nimi "). Nimi =" Uue lehe nimi ".

Nimeta leht Exceli VBA-s ümber

Oleme kõik teinud selle ülesande, nimetades töölehe ümber vastavalt oma identiteedile või vastavalt meie mugavusele? Ümbernimetamine ei ole raketiteadus, kuid kui olete VBA kooder, peate teadma seda töölehe ümbernimetamise ülesannet. Kuna töötame töölehtede abil nende nimede abil, on oluline teada töölehtede nimede olulisust VBA kodeerimisel. Selles artiklis näitame teile, kuidas lehte Exceli VBA kodeerimise abil ümber nimetada.

Kuidas lehte VBA-s ümber nimetada?

Töölehe nime muutmine ei vaja erilisi oskusi. Peame lihtsalt viitama, millist lehe nime me muudame, sisestades olemasoleva lehe nime.

Näiteks kui tahame lehe ümber nimetada nimega “Leht 1”, peame lehe helistama selle nimega, kasutades objekti Tööleht.

Töölehed (“Sheet1”)

Pärast lehe nime mainimist peame töölehe nime ümbernimetamiseks valima atribuudi “Nimi”.

Töölehed (“Sheet1”). Nimi

Nüüd peame määrama atribuudi Name nimeks vastavalt meie soovile.

Töölehed (“Sheet1”). Nimi = “New Name”

Nii saame VBA-is töölehe nime ümber nimetada, kasutades atribuuti Nimi.

Artikli järgmistes jaotistes näitame teile üha uusi näiteid töölehe muutmiseks või ümbernimetamiseks.

Näited töölehtede ümbernimetamisest Exceli VBA-s

Allpool on toodud VBA ümbernimetamise lehe näited.

Selle VBA Rename Sheet Templati saate alla laadida siit - VBA Sheet Sheet Mall

Näide # 1 - lehe muutmine või ümbernimetamine VBA muutujate abil.

Näite saamiseks vaadake allpool näidiskoodi.

Kood:

 Alamnimetus_näide1 () Hämardab Ws töölehekomplektina Ws = töölehed ("Sheet1") Ws.Name = "Uus leht" End Sub 

Kõigepealt olen ülaltoodud koodis deklareerinud muutuja tööleheks.

 Dim Ws töölehena

Järgmisena olen määranud muutujale viite "Sheet1", kasutades töölehtede objekti.

 Määra Ws = töölehed ("Sheet1")

Nüüd hoiab muutuja “Ws” töölehe “Sheet1” viidet.

Nüüd muutujat “Ws” kasutades nimetasin töölehe ümber nimeks “Uus leht”.

See kood muudab nime “Sheet1” nimeks “New Sheet”.

Kui käivitan koodi käsitsi või siis kiirklahvi F5 kaudu, saame jälle vea Alaindeks vahemikust väljas.

Põhjus, miks me selle vea saame, kuna eelmises etapis ise oleme juba muutnud töölehe nimega “Sheet1” nimeks “New Sheet”. Kuna enam pole töölehe nime, pole leht „Sheet1” saadaval, viskab VBA selle tõrke.

Näide # 2 - hankige kõik töölehtede nimed ühele lehele.

Saame kõik töövihiku töölehtede nimed ühele lehele. Allolev kood eraldab kõik töölehtede nimed.

Kood:

 Sub Renmae_Example2 () Dim Ws nagu tööleht Dim LR nii pikk iga ActiveWorkbooki iga W kohta. Töölehed LR = töölehed ("Main Sheet"). Lahtrid (Rows. Count, 1) .End (xlUp). Rida + 1 lahtrit (LR, 1). Valige ActiveCell.Value = Ws.Name Next Ws End Sub 

See kood eraldab kõik saadaolevad töölehtede nimed lehele nimega “Põhileht”.

Näide # 3 - määrake VBA abil Exceli töölehe püsiv nimi

Kuna töötame kodeerimisel lehenimedega, on neile oluline määrata püsivad nimed. Kuidas me neile püsivad nimed paneme?

Näite saamiseks vaadake allolevat koodi.

Kood:

 Alamnimetus_näide3 () töölehed ("Leht1"). Valige Lõpeta alam 

Ülaltoodud kood valib Sheet1.

Kui teie töövihikut kasutavad paljud inimesed, siis kui keegi muutis töölehe nime, kuvatakse viga Subscript Out of Range.

Selle vältimiseks saame sellele määrata püsiva nime. Püsinime määramiseks toimige järgmiselt.

1. samm: valige leht, millele peame Visual Basicu redaktoris määrama püsiva nime.

2. samm: akna Atribuudid kuvamiseks vajutage klahvi F4.

3. samm: muutke nime, atribuudi all nimi uueks nimeks.

Nagu näete, on üks nimi kuvatud kui “Sheet1” ja sulgudes, näeme uut nime kui “New Sheet”.

Nüüd kodeerimisel kasutame tegeliku nähtava nime asemel uut nime.

Kood:

 Alamnimetus_näide3 () NewSheet. Valige Lõpeta alam 

Tulge nüüd tagasi töölehe akna juurde, kuid lehe nime näeme endiselt ainult kui “Sheet1”.

Nüüd muudan lehe nimeks “Müük”.

Kui käivitan koodi F5-klahvi abil või käsitsi, valib see ikkagi lehe nimega „Müük”. Kuna olime sellele andnud püsiva nime, valib see ikkagi ainult sama lehe.


$config[zx-auto] not found$config[zx-overlay] not found