Exceli VBA nime tööleht
VBA-s ei vaja töölehe nimetamine erilisi oskusi. Peame lihtsalt viitama, millist lehe nime me muudame, sisestades olemasoleva lehe nime. Näiteks kui me tahame muuta lehte nimega „Müük“, siis peame lehte kutsuma selle nimega, kasutades objekti Tööleht.
Töölehed („Müük”)
Pärast lehe nime mainimist peame töölehe nime muutmiseks valima atribuudi „Nimi“.
Töölehed (“Müük”). Nimi
Nüüd peame määrama atribuudi Name nimeks vastavalt meie soovile. Oletame, et soovite muuta „Müük” väärtuseks „Müügileht”, seejärel asetage atribuudi „NAME” järele võrdusmärk ja sisestage uus nimi jutumärkides.
Töölehed („Müük”). Nimi = „Müügileht”
Nii saame muuta töölehe nime, kasutades atribuuti Nimi.
Näited VBA abil töölehe nimetamiseks
Näide 1
Muutke või nimetage lehte muutujate abil.
Näiteks vaadake allpool näidiskoodi.
Kood:
Alamnimi_näide1 () Hämarda Ws töölehekomplektina Ws = töölehed ("Müük") Ws.Name = "Müügileht" Lõpp-alam
Esiteks olen deklareerinud muutuja tööleheks.
Dim Ws töölehena
Järgmisena olen töölehtede objekti abil määranud muutujale viite „Müük”.
Määra Ws = töölehed ("müük")
Nüüd hoiab muutuja “Ws” töölehe “Müük” viidet.
Nüüd muutujat “Ws” kasutades nimetasin töölehe ümber nimeks “Müügileht”.
Selle koodiga muudetakse nime „Müük” nimeks „Müügileht”.
Oluline märkus meeles pidada
Oleme just näinud, kuidas muuta Exceli töölehe nimi ühest nimest teise. Kui aga koodi uuesti käivitame, kuvatakse viga Alaindeks vahemikust väljas.
Üks võtmetest VBA makros eksperdi hankimisel on vigade käsitlemine. Enne vigade käsitlemist peame teadma, miks me selle vea saame.
Põhjus, miks me selle vea saime, kuna eelmises etapis ise oleme juba muutnud töölehe nimega “Müük” väärtuseks “Müügileht”.
Meil pole ühtegi lehte, mille nimi oleks „Müük”. Saame selle alaindeksi vahemiku veast välja.
Näide 2
Hankige kõik töölehtede nimed ühele lehele .
Oletame, et teie töövihikus on palju töölehti ja soovite kõigi nende töölehtede nime saada ükskõik millises üksikus töölehel. Seda saab teha VBA kodeerimise abil.
Näiteks vaadake allolevat pilti.
Meil on siin nii palju lehti.
Kõigilt nendelt lehtedelt vajame iga lehe nimetust "Indeksileht". Olen teile kirjutanud alloleva koodi.
Kood:
Sub All_Sheet_Names () Tühjenda Ws töölehena Dim LR nii pikaks iga W jaoks ActiveWorkbookis. Töölehed LR = töölehed ("Indeksileht"). Lahtrid (Read.Count, 1) .End (xlUp) .Rida + 1 'See LR-i muutuja viimati kasutatud rea lahtrite leidmiseks (LR, 1). Valige ActiveCell.Value = Ws.Name Next Ws End Sub
Nüüd kopeerige see kood oma moodulisse.
Käivitage nüüd kood, nimetades mõne töölehe nimeks "Indeksileht". See kood annab kõik töölehtede nimed jaotises "Indeksileht".
Nii saame VBA töölehe atribuudi „NAME” abil töölehtede nimega ringi mängida. Saame ümber nimetada, ekstraktida ja valida konkreetse töölehe ning teha palju muid asju, mida saab atribuudi „Nimi” abil teha.
Asjad, mida meeles pidada
- NAME VBA-s on vara.
- Selle nime abil saame töölehe ümber nimetada ja ka lehenimed välja tõmmata.
- Saame muuta määratud töövihiku töölehe mis tahes nime, kui viidate muudele töövihikutele kui koodiga kirjutatud töövihik.
- Kui töölehe nimi ei ühti, saame alaindeksi vahemikust välja.
