Atsisiųskite darbaknygės pavyzdį
Norėdami gauti darbalapio pavadinimą, naudokite šią „Excel“ formulę
Gaukite darbalapio pavadinimą - „Excel“ formulę
Norėdami apskaičiuoti darbalapio pavadinimą vienoje „Excel“ formulėje, naudokite šią formulę: = vidurys (langelis ("failo pavadinimas", a1), rasti ("]", langelis ("failo pavadinimas", a1))+1,999)
Pastaba paveikslėlyje aukščiau šios formulės grąžina lapo pavadinimus „GetWorksheetName“ ir „Sheet3“.
Šis kodas iš pradžių gali atrodyti bauginantis, tačiau jis yra mažiau painus, jei jį padalinsite į atskiras formules:
„Excel“ funkcijos - darbalapio pavadinimas
CELL funkcija:
Ląstelės funkcija pateikia informaciją apie langelį. Naudokite kriterijus „failo pavadinimas“, kad grąžintumėte failo vietą, pavadinimą ir dabartinį lapą. = ląstelė ("failo pavadinimas", a1)
Grąžinimai: kelias [darbaknygė.xlsx] lapas: C: [darbaknygė.xlsm] 1 lapas pirmiau pateiktame pavyzdyje.
FIND funkcija:
Funkcija CELL grąžina [workbook.xlsx] lapą, bet mes norime tik lapo pavadinimo, todėl turime jį išgauti iš rezultato. Tačiau pirmiausia turime naudoti FIND funkciją, kad nustatytume lapo pavadinimo vietą iš rezultato. = rasti ("]", E5)
Grąžinimai:„]“ Simbolio vieta. 18 aukščiau pateiktame pavyzdyje.
MID funkcija
Toliau mes išskleisime norimą tekstą naudodami MID funkciją, o FIND funkcijos rezultatas (+1) kaip pradžios_numeris. = Vidutinis (E5, E6+1 999)
Grąžinimai: Lapo pavadinimas: pirmame lape pateiktas lapas 1.
Kodėl „MID“ funkcijoje įvestam numerių skaičiui pasirinkote 999? 999 yra didelis skaičius, kuris grąžins visus likusius simbolius. Vietoj to galėjote pasirinkti bet kurį kitą labai didelį skaičių.
Gaukite lapo pavadinimą VBA
Jei norite naudoti VBA vietoj „Excel“ formulės, turite daug galimybių. Tai tik vienas pavyzdys:activesheet.range ("a1"). vertė = aktyvus lapas.pavadinimas
Įveskite dabartinį darbalapio pavadinimą į langelį A1 naudodami VBA.
Grįžkite į formulės pavyzdžius
