Pracovný list s názvom Excel VBA
Na pomenovanie pracovného listu vo VBA nie sú potrebné žiadne špeciálne zručnosti. Potrebujeme len odkázať, ktorý názov hárka meníme, a to zadaním názvu existujúceho hárka. Napríklad, ak chceme zmeniť hárok s názvom „Predaj“, musíme hárok zavolať podľa názvu pomocou objektu pracovného hárka.
Pracovné listy („Predaj“)
Po spomenutí názvu hárka musíme zmeniť vlastnosť hárka výberom vlastnosti „Názov“.
Pracovné listy („Predaj“). Názov
Teraz musíme nastaviť vlastnosť Name na meno podľa nášho želania. Predpokladajme, že chcete zmeniť výraz „Predaj“ na „Predajný hárok“, potom za vlastnosť „NÁZOV“ vložiť znamienko rovnosti a zadať nový názov do úvodzoviek.
Pracovné listy („Predaj“). Názov = „Predajný list“
Takto môžeme zmeniť názov pracovného hárka pomocou vlastnosti Názov.
Príklady pomenovania pracovného hárka pomocou VBA
Príklad č
Tabuľku môžete zmeniť alebo premenovať pomocou premenných.
Napríklad si pozrite nasledujúci ukážkový kód.
Kód:
Sub Name_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sales") Ws.Name = "Sales Sheet" End Sub
V prvom uvedenom vyššie som premennú deklaroval ako pracovný hárok.
Dim Ws As Worksheet
Ďalej som pomocou objektu pracovných hárkov nastavil odkaz na premennú ako „Predaj“.
Set Ws = Worksheets ("Sales")
Premenná „Ws“ teraz obsahuje odkaz na pracovný hárok „Predaj“.
Teraz pomocou premennej „Ws“ som pracovný hárok premenoval na „Predajný hárok“.
Tento kód zmení názov „Predaj“ na „Predajný list“.
Dôležitá poznámka na zapamätanie
Práve sme videli, ako zmeniť názov pracovného hárka programu Excel z jedného názvu na druhý. Ak však kód spustíme znova, zobrazí sa chyba Dolný index mimo rozsah.
Jedným z kľúčov na získanie odborníka na makrá VBA je spracovanie chýb. Pred spracovaním chýb musíme vedieť, prečo sa nám zobrazuje táto chyba.
Dôvod, prečo sa nám zobrazuje táto chyba, pretože v samotnom predchádzajúcom kroku sme už zmenili pracovný hárok s názvom „Predaj“ na „Predajný list“.
Nemáme žiadny hárok s názvom „Predaj“, dostaneme tento index mimo chyby rozsahu.
Príklad č
Získajte všetky názvy pracovných hárkov v samostatnom hárku .
Predpokladajme, že máte v zošite dostatok pracovných hárkov a chcete získať názvy všetkých týchto pracovných hárkov v niektorom z jednotlivých pracovných hárkov. To sa dá dosiahnuť pomocou kódovania VBA.
Napríklad sa pozrite na obrázok nižšie.
Máme tu toľko listov.
Zo všetkých týchto hárkov potrebujeme názov každého hárka v hárku s názvom „Indexový hárok“. Napísal som pre vás nasledujúci kód.
Kód:
Sub All_Sheet_Names () Dim Ws as Worksheet Dim LR as Long For each Ws in ActiveWorkbook.Worksheets LR = Worksheets ("Index Sheet"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 'This LR varaible vyhľadať posledný použitý riadok Bunky (LR, 1). Vyberte ActiveCell.Value = Ws.Name Ďalej Ws End Sub
Teraz skopírujte tento kód do svojho modulu.
Teraz spustite kód a pomenujte ktorýkoľvek z pracovných hárkov ako „Indexový hárok“. Tento kód poskytne všetky názvy pracovných hárkov v indexovom hárku.
Takto môžeme pomocou vlastnosti „NÁZOV“ listu v jazyku VBA hrať s názvami listov. Môžeme premenovať, extrahovať a môžeme zvoliť konkrétny pracovný hárok a pomocou vlastnosti „Názov“ môžeme robiť mnoho ďalších vecí.
Na čo treba pamätať
- NAME vo VBA je vlastníctvo.
- Pomocou tohto názvu môžeme premenovať pracovný hárok a tiež môžeme extrahovať názvy hárkov.
- V prípade, že odkazujete na iné zošity ako zošit napísaný kódom, môžeme v zadanom zošite zmeniť akýkoľvek názov hárka.
- Ak sa názov pracovného hárka nezhoduje, dostaneme dolný index mimo rozsahu.
