Turinys
Šiame straipsnyje iliustruojami 2 patogūs būdai, kaip gauti lapo pavadinimą "Excel" programoje. Lapo pavadinimas yra "Excel" darbo lapo objekto vardo savybė.
Atsisiųsti praktikos sąsiuvinį
Atsisiųskite šį pratybų sąsiuvinį, kad galėtumėte atlikti pratimus skaitydami šį straipsnį.
Lapo pavadinimas.xlsm2 būdai, kaip gauti "Excel" lapo pavadinimą
Norėdami gauti ląstelėje saugomą arba MsgBox lange rodomą lapo pavadinimą, galime naudoti dažniausiai naudojamų funkcijų formules arba paprastą VBA kodą.
1. Formulės naudojimas lapo pavadinimui gauti "Excel" programoje
Kadangi "Excel" nepateikia jokių integruota funkcija norėdami gauti lapo pavadinimą, turime parašyti funkciją kartu su MID, CELL ir FIND funkcijos . Pažvelkime į jį:
=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,31)
Įrašykite formulę į bet kurį darbalapio, kurio pavadinimą norime gauti, langelį. Šiame pavyzdyje darbalapio pavadinimą pavadinome " Formulė ", tada įrašykite formulę į ląstelę C5 .
Kaip veikia formulė
- Svetainė CELL funkcija formulėje grąžina pilnas kelias, darbo knygos pavadinimas , ir dabartinis lapo pavadinimas . Čia pateikiama formulė:
=CELL("failo pavadinimas",A1)
- Ankstesniame etape rastas rezultatas pridedamas . darbo knygos pavadinimas svetainėje [ ] skliaustai e. [excel sheet name.xlsm] . Turime išsiaiškinti pozicija iš dešinysis laikiklis . Dabartinis darbalapio pavadinimas pradedama nedelsiant po . dešinysis laikiklis . Taigi, RASTI funkcija nustato dešiniojo skliausto padėtį pagal šią formulę ir tada reikia pridėti 1 gauti pozicija iš pirmoji eilutė iš darbalapio pavadinimas .
=FIND("]",CELL("filename",A1))+1
- Galiausiai MID funkcija užima trys argumentai -
1. argumentas: =CELL("failo pavadinimas",A1) naudojamas pirmajame etape.
2. argumentas: =FIND("]",CELL("filename",A1))+1 naudojamas antrajame etape.
3. argumentas: 31 kuris yra didžiausias Excel programos darbalapio pavadinimo ilgis.
Skaityti daugiau: Kaip ieškoti lapo pavadinimo "Excel" darbaknygėje (2 metodai)
Alternatyvi formulė
Šią formulę galima naudoti pakaitomis, kai naudojama Funkcija RIGHT vietoj MID funkcija.
=RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-FIND("]",CELL("filename",A1)))
2. VBA kodas "Excel" lapo pavadinimui gauti ir rodyti
2.1 Aktyvaus lapo pavadinimo gavimas programoje "Excel" naudojant VBA kodą
Norėdami gauti aktyvaus lapo pavadinimą, naudokite toliau pateiktą paprastą kodą.
Sub Lapo pavadinimas() Range("A1") = ActiveSheet.Name End Sub
2.2 Lapo pavadinimo nustatymas pagal indekso numerį
Naudodami šį kodą galime sužinoti darbalapio pavadinimas remiantis jų indekso numeris Jei yra keli darbalapiai sąsiuvinyje, šis metodas padeda lengvai ir greitai sužinoti darbalapio pavadinimą.
Pavyzdžiui, esame antrasis darbalapis pavadinimu vba1. Naudodami šį kodą galime sužinoti pirmasis lapas pavadinimas, kuris yra formulė.
Sub Lapo pavadinimas() Range("C5") = Sheets(1).Name End Sub
Naudodami šį kodą galime sužinoti paskutinis lapas darbo knygos pavadinimas. Šiame pavyzdyje paskutinio lapo pavadinimas yra VBA 2.
Sub Lapo pavadinimas() Range("C6") = Sheets(Sheets.Count).Name End Sub
Skaityti daugiau: Kaip ieškoti lapo pavadinimo su VBA programa "Excel" (3 pavyzdžiai)
Pastabos
Taip pat galime naudoti MsgBox funkcija parodyti VBA kodo rezultatą MsgBox jei jo nereikia laikyti ar naudoti ląstelėje.
Išvada
Dabar žinome, kaip gauti lapo pavadinimą "Excel" programoje. Tikimės, kad tai paskatins jus drąsiau naudotis šia funkcija. Bet kokie klausimai ar pasiūlymai nepamirškite jų pateikti toliau esančiame komentarų laukelyje.