Šiame straipsnyje sužinosime, kaip rasti aktyvų darbaknygės kelią programoje „Excel“.
Ląstelės funkcija programoje „Excel“
Ląstelių funkcija „Excel“ suteikia jums informaciją apie darbalapius, pvz., Stulpelį, turinį, failo pavadinimą ir kt.
Sintaksė
| = CELL ("failo pavadinimas", A1) |
„Failo pavadinimas“: gauna visą nuorodos langelio lapo pavadinimą
A1: lapo langelio nuoroda
Bet mums reikia išgauti tik lapo pavadinimą. Iš esmės pavardė.
Kaip matote, lapo pavadinimas prasideda po ] (uždaro didelio skliaustelio ženklas). Tam mums tereikia jo pozicijos tekste ir tada ištrauksime lapo pavadinimą.
Čia suskaičiavau simbolius nuo paskutinio rezultato, kuris buvo 12. Tačiau mes negalime to padaryti kiekvieną kartą.
Taigi, norėdami išgauti lapo pavadinimą iš viso vardo, turime rasti ] (uždaro didelio skliaustelio ženklas)
Norėdami rasti, naudokite formulę ]
| = RASTI ("]", CELL (" failo pavadinimas ", A1)) |
58 yra pozicija ] .
Dabar mūsų formulė baigta
| = MID (CELL ("failo pavadinimas", A1), FIND ("]", CELL ("failo pavadinimas", A1))+1,255) |
Paaiškinimas:
CELL („failo pavadinimas“, A1): pateikia visą darbalapio pavadinimą
FIND ("]", CELL ("failo pavadinimas", A1))+1: ši funkcija suteikia jums ] ir pridėkite +1, nes mums reikia tik lapo pavadinimo pirmojo simbolio pozicijos.
255: maksimalus „Excel“ lapo pavadinimo žodžio apribojimas.
MID: funkcija MID išskiria konkrečią antrinę eilutę iš teksto, naudodami poziciją nuo pradžios iki pabaigos.
Čia ištraukėme failo pavadinimą naudodami formulę.
Dabar turime dar vieną formulę, užuot naudoję MID funkciją. Naudokite FIGHT funkciją.
Funkcija RIGHT išskiria konkrečią antrinę eilutę iš paskutinio teksto.
Naudokite formulę:
| = RIGHT (CELL ("failo pavadinimas", A2), LEN (CELL ("failo pavadinimas", A2))-FIND ("]", CELL ("failo pavadinimas", A2))) |
Paaiškinimas:
FIND ("]", CELL ("failo pavadinimas", A2)): išskiria lapo pavadinimo char vietą.
LEN (CELL ("failo pavadinimas", A2)): gauna teksto ilgį (failo pavadinimas)
DEŠINĖ: FIGHT funkcija ištraukia eilutę iš teksto pagal jos padėtį.
Kaip matote, ši funkcija taip pat veikia gerai. Taip… Dabar mes turime 2 skirtingas formules, kurių logika naudojama tik lapo pavadinimui išgauti.
Kaip gauti tik lapo pavadinimą naudojant „Excel“ naudojant VBA
VBA pavyzdys
Turime duomenis trijuose lapuose ir norime visus duomenis sujungti į pagrindinį lapą. Kiekvieno lapo duomenų pabaigoje turėtų būti lapo pavadinimas.
Spustelėjus mygtuką „Konsoliduoti duomenis kartu su lapo pavadinimu“, duomenys bus konsoliduoti pagrindiniame lape.
Kodo paaiškinimas
SheetCount = Application.Worksheets.Count
Aukščiau pateiktas kodas naudojamas norint apskaičiuoti darbaknygės darbalapio skaičių.
LastRow = ActiveCell.SpecialCells (xlLastCell) .Row
Aukščiau pateiktas kodas naudojamas paskutinio langelio eilutės numeriui gauti.
Diapazonas („A2: F“ ir „LastRow“). Pasirinkite
Aukščiau pateiktas kodas naudojamas norint pasirinkti visus duomenis, pradedant nuo langelio A2.
Pasirinkimas. Kopijuoti
Aukščiau pateiktas kodas naudojamas pasirinktiems duomenims kopijuoti.
Diapazonas (pasirinkimas, langeliai (paskutinė eilutė, 7)). Vertė = skaičiuoklės (skaitiklis). Pavadinimas
Aukščiau pateiktas kodas naudojamas lapo pavadinimui priskirti pasirinktam langeliui.
Sekite toliau pateiktą kodą
Pasirinkimas aiškus
Sub ConsolidateDataWithSheetName () 'Deklaruojantys kintamieji Dim Counter kaip Integer Dim SheetCount As Integer Dim LastRow as Long' Išjungimo ekrano atnaujinimai Application.ScreenUpdating = False 'Darbo knygų skaičiavimas darbo knygoje SheetCount = Application.Worksheets.Count For Counter = 2 To SheetCet Skaičiuoklės (skaitiklis). Aktyvinti diapazoną („A2“). Pasirinkite „Gauti paskutinio langelio eilutės numerį LastRow = ActiveCell.SpecialCells (xlLastCell). Eilutė“ Visų darbaknygės duomenų diapazono duomenų pasirinkimas („A2: F“ ir „LastRow“) ). Pasirinkite „Kopijuoti pasirinktus duomenis Selection.Copy Sheets („ Main “). Aktyvinti diapazoną („ A2 “). Pasirinkite LastRow = ActiveCell.SpecialCells (xlLastCell) .Row LastRow = LastRow + 1 'Nukopijuotų duomenų įklijavimas į paskutinę eilutę pagrindinio lapo langeliuose (paskutinė eilutė, 1). Pasirinkite ActiveSheet.Paste Cells (LastRow, 7). Pasirinkite LastRow = ActiveCell.SpecialCells (xlLastCell). Eilutė 'Lapo pavadinimo pridėjimas kartu su duomenų diapazonu (Selection, Cells (LastRow, Vertė = skaičiuoklės (skaitiklis). Pavadinimas Kitas pabaiga
Tikimės, kad šis straipsnis apie tai, kaip rasti aktyvų darbaknygės kelią „Excel“, yra aiškinamasis. Čia rasite daugiau straipsnių apie verčių skaičiavimą ir susijusias „Excel“ formules. Jei jums patiko mūsų tinklaraščiai, pasidalykite jais su draugais „Facebook“. Taip pat galite sekti mus „Twitter“ ir „Facebook“. Mes norėtume išgirsti jūsų nuomonę, praneškite mums, kaip galime patobulinti, papildyti ar naujovinti savo darbą ir padaryti jį geresnį. Rašykite mums el.
Viskas apie „Excel“ pavadintus diapazonus: „Excel“ diapazonus, pažymėtus pavadinimais, lengva naudoti „Excel“ formulėse. Sužinokite viską apie tai čia.
Pavadinimo langelis „Excel“ : „Excel“ pavadinimo laukas yra ne kas kita, kaip maža rodymo sritis „Excel“ lapo viršuje kairėje, rodanti aktyvios ląstelės pavadinimą arba „Excel“ diapazonus. Galite pervardyti langelį ar masyvą nuorodoms.
Kaip gauti „Excel“ darbalapio pavadinimą : „CELL“ funkcija „Excel“ suteikia jums informaciją apie bet kurį darbalapį, pvz., Stulpelį, turinį, failo pavadinimą ir kt.
Kaip naudoti dinaminius pavadintus diapazonus „Excel“ : Dinaminis pavadinimų diapazonas yra pavadinimas, naudojamas masyvui ar diapazonui, kuris plečiasi ir mažėja pagal duomenis. Sužinokite daugiau apie dinaminius pavadintus diapazonus čia.
Kaip sukurti išskleidžiamąjį sąrašą naudojant spalvą „Excel“ : Pridėkite spalvų prie išskleidžiamojo „Excel“ sąrašo naudodami sąlyginį formatavimą ir duomenų patvirtinimą.
Prisijunkite prie „Excel“ vardo ir pavardės : Sujunkite dvi ar daugiau reikšmių ar pavadinimų naudodami Funkcija CONCATENATE arba & operatorius. Šiame straipsnyje paaiškinama, kaip „Excel“ pridėti dvi ar daugiau langelių.
Populiarūs straipsniai:
50 „Excel“ nuorodų, skirtų produktyvumui padidinti : Greičiau atlikite savo užduotis „Excel“. Šie spartieji klavišai padės padidinti darbo efektyvumą naudojant „Excel“.
Kaip naudotis „VLOOKUP“ funkcija „Excel“ : Tai yra viena iš dažniausiai naudojamų ir populiariausių „Excel“ funkcijų, naudojama vertei iš įvairių diapazonų ir lapų ieškoti.
Kaip naudoti „IF“ funkciją „Excel“ : „Excel“ IF sakinys patikrina sąlygą ir grąžina konkrečią reikšmę, jei sąlyga yra TRUE, arba grąžina kitą konkrečią reikšmę, jei FALSE.
Kaip naudotis „SUMIF“ funkcija „Excel“ : Tai dar viena esminė prietaisų skydelio funkcija. Tai padeda apibendrinti vertes konkrečiomis sąlygomis.
Kaip naudoti „COUNTIF“ funkciją „Excel“ : Skaičiuokite vertes su sąlygomis naudodami šią nuostabią funkciją. Norint suskaičiuoti konkrečias vertes, nereikia filtruoti duomenų. Skaitiklio funkcija yra būtina norint paruošti prietaisų skydelį.