Excel VBA -nimen laskentataulukko
VBA: ssa laskentataulukon nimeäminen ei vaadi erityisiä taitoja. Meidän on vain viitattava muutettavan taulukon nimeen kirjoittamalla nykyinen taulukon nimi. Esimerkiksi, jos haluamme muuttaa taulukon nimeltä "Myynti", meidän on kutsuttava taulukko sen nimellä käyttämällä Worksheet-objektia.
Taulukot ("myynti")
Mainittuamme taulukon nimen, meidän on valittava "Nimi" -ominaisuus muuttaaksesi laskentataulukon nimeä.
Taulukot ("Myynti"). Nimi
Nyt meidän on asetettava Name-ominaisuudeksi haluamasi nimi. Oletetaan, että haluat muuttaa "Myynti" -asetukseksi "Myyntiarkki", laita sitten yhtäläisyysmerkki "NAME" -ominaisuuden jälkeen ja kirjoita uusi nimi lainausmerkeihin.
Laskentataulukot ("Myynti"). Nimi = "Myyntiarkki"
Näin voimme muuttaa laskentataulukon nimeä Nimi-ominaisuuden avulla.
Esimerkkejä VBA: ta käyttävän taulukon nimeämisestä
Esimerkki 1
Muuta tai nimeä taulukko uudelleen muuttujien avulla.
Katso esimerkiksi alla oleva esimerkkikoodi.
Koodi:
Alinimi_esimerkki1 () Himmennä Ws laskentataulukko-ryhmänä Ws = Laskentataulukot ("myynti") Ws.Name = "Myyntiarkki" Loppu ali
Edellä mainitsin ensin muuttujan laskentataulukoksi.
Himmennä Ws-taulukko
Seuraavaksi olen asettanut muuttujan viitteeksi "Myynti" käyttämällä taulukko-objektia.
Aseta Ws = laskentataulukot ("myynti")
Muuttuja "Ws" sisältää nyt laskentataulukon "Myynti" viitteen.
Nyt muuttuja ”Ws” on nimetty uudelleen laskentataulukoksi ”Myyntiarkki”.
Tämä koodi muuttaa "Myynti" -nimeksi "Myyntiarkki".
Tärkeä muistettava huomautus
Olemme juuri nähneet, kuinka Excel-laskentataulukon nimi voidaan muuttaa nimestä toiseen. Kuitenkin, jos suoritamme koodin uudelleen, saamme Subscript Out of Range -virheen.
Yksi avaimista VBA-makrojen asiantuntijan saamiseksi on virheiden käsitteleminen. Ennen virheiden käsittelyä meidän on tiedettävä, miksi saamme tämän virheen.
Syy miksi saamme tämän virheen, koska edellisessä vaiheessa itse olemme jo muuttaneet laskentataulukon nimeltä "Myynti" "Myyntiarkki".
Meillä ei ole myyntiä-nimistä taulukkoa. Saamme tämän alaindeksin alueen virheestä.
Esimerkki 2
Hanki kaikki laskentataulukoiden nimet yhdelle arkille .
Oletetaan, että työkirjassasi on paljon laskentataulukoita ja haluat saada kaikkien näiden laskentataulukoiden nimet mihin tahansa yksittäiseen laskentataulukkoon. Tämä voidaan tehdä käyttämällä VBA-koodausta.
Katso esimerkiksi alla olevaa kuvaa.
Meillä on täällä niin monta arkkia.
Kaikkien näiden arkkien ulkopuolella tarvitsemme jokaisen arkin nimen nimeltä "Hakemistosivu". Olen kirjoittanut alla olevan koodin sinulle.
Koodi:
Sub All_Sheet_Names () Himmennä Ws laskentataulukoksi Dim LR yhtä pitkä kullekin W: lle ActiveWorkbook.Worksheets LR = Laskentataulukot ("Hakemistosivu"). Solut (Rows.Count, 1) .End (xlUp) .Rivi + 1 'Tämä LR-muuttuja löytääksesi viimeksi käytetyn rivin Solut (LR, 1). Valitse ActiveCell.Value = Ws.Name Seuraava Ws End Sub
Kopioi nyt tämä koodi moduuliin.
Suorita nyt koodi nimeämällä mikä tahansa laskentataulukko hakemistosivuksi. Tämä koodi antaa kaikki taulukon nimet hakemistosivulle.
Tällä tavoin VBA: n laskentataulukon "NAME" -ominaisuuden avulla voimme leikkiä taulukkojen nimillä. Voimme nimetä uudelleen, purkaa ja voimme valita tietyn laskentataulukon ja tehdä monia muita asioita, jotka voidaan tehdä käyttämällä Nimi-ominaisuutta.
Muistettavaa
- NAME VBA: ssa on omaisuus.
- Tätä nimeä käyttämällä voimme nimetä laskentataulukon uudelleen ja myös purkaa taulukoiden nimet.
- Voimme muuttaa minkä tahansa määritetyn työkirjan laskentataulukon nimen, jos viitat muihin työkirjoihin kuin koodikirjoitettu työkirja.
- Jos laskentataulukon nimi ei täsmää, alaindeksi on alueen ulkopuolella.
