trükk №91
Néha szükség van arra, hogy a sejt képes visszatérni a nevét, a munkafüzet vagy a fájl nevét és elérési útját a munkafüzetet. Ezzel a trükkel könnyen kap a nevét és elérési útját a munkafüzetet.
Három felhasználó által definiált függvények, amit majd be ezt a cikket, helyezzük egy cellát a munkafüzet nevét vagy a fájl nevét és elérési útját a munkafüzetet. Az első két példa, MyName és MyFullName, nem igényel semmilyen érveket.
Utolsó, SheetName, a használat, a készítmény a munkalap neve nem fektetnek MID (MID) és egyéb funkciókat a sejt funkció (CELL), mivel ez tipikusan a következő nehézkes képlet: = MID (CELL ( „fájlnév”; $ A $ 1) ; FIND ( "]"; CELL ( "fájlnév"; $ A $ 1)) + 1; 255). Az orosz változat Excel = MID (CELL ( "fájlnév", $ A $ 1), SEARCH ( "]" CELL ( "fájlnév", $ A $ 1)) + 1; 255). Amint látható, az egyszerű eredmény jön a sok munka, így már önállóan kifejlesztett egy egyedi funkcióval SheetName.
Hogy alkalmazzák ezeket egyedi funkciót, nyomja meg a gyorsbillentyűt Alt / Option + FII, kattintson a Beszúrás> Modul és illessze be a kódot listában 7.19.
// Listing 7,19 Funkció MyName () As String MyName - ThisWorkbook.Name End Function Function MyFullName () As String MyFullName = ThisWorkbook.FullName End Function Function SheetName (rAnyCell) Application.Volatile SheetName = rAnyCell.Parent.Name End Function
Mentsd meg a funkciót, és zárja be az ablakot. Nos, ez a funkció jelenik meg a (Paste funkció) (billentyűzet Shift + F3) Felhasználó által definiált (felhasználó által definiált) párbeszédablak Függvénytündér.