Itt talál néhány viszonylag egyszerű egyéni Excel VBA-munkalapfüggvényt, amelyek szintén nagyon hasznosak. Ezeket a függvényeket burkolófüggvényeknek nevezzük, mivel belső VBA-elemek köré csomagolt kódból állnak. Más szóval, lehetővé teszik a VBA függvények használatát a munkalapképletekben.
Felhasználó() függvény
' Az aktuális felhasználó nevét adja vissza
Felhasználó = Application.UserName
Funkció befejezése
Ez a függvény lényegében lehetővé teszi, hogy a képletek hozzáférjenek az Application objektum UserName tulajdonságához.
A NumberFormat függvény
Ez a funkció egyszerűen megjeleníti egy cella számformátumát. Hasznos lehet, ha meg kell győződnie arról, hogy egy cellacsoport azonos számformátummal rendelkezik.
Funkció számformátum (cella)
' A cella számformátumát adja vissza
Számformátum = Cell(1).Számformátum
Funkció befejezése
Észrevette a Cell (1) használatát? Ha többcellás tartományt használunk argumentumként, akkor csak az első cella kerül felhasználásra.
Könnyen írhat hasonló függvényeket, amelyek visszaadják egy cella szövegszínét, háttérszínét, betűtípusát stb.
Az ExtractElement függvény
Ez a burkoló függvény egy részkarakterláncot ad vissza egy olyan szöveges karakterláncból, amely több elemet tartalmaz, elválasztó karakterrel elválasztva. Ez a képlet például a tehén szót adja vissza, amely egy szóközt elválasztó karakterlánc harmadik eleme. Az argumentumok természetesen cellahivatkozások is lehetnek.
=ExtractElement("kutya ló tehén macska", 3, " ")
Íme a kód, amely a VBA Split funkciójának burkolója:
Function ExtractElement (Txt, n, szept)
' Egy szöveges karakterlánc n-edik elemét adja vissza, ahol a
' elemeket meghatározott elválasztó karakter választja el
ExtractElement = Split(Application.Trim(Txt), Sep)(n - 1)
Funkció befejezése
Az alábbi képen a munkalapképletekben használt ExtractElement függvény látható. Az A oszlop a szöveges karakterláncot, a B oszlop a kivonandó elem számát, a C oszlop pedig a határolót tartalmazza (az üresnek tűnő cellák szóközt tartalmaznak).

Az ExtractElement függvény használata egy karakterláncból származó elem visszaadásához.
A SayIt funkció
Ez az egyszerű függvény az Application.Speech objektum Speak metódusának burkolója. Szintetizált hangot használ az érvelés „beszédére”.
Függvény SayIt(txt)
– mondja az érvet
Alkalmazás.Beszéd.Beszéd txt, Igaz
Funkció befejezése
Íme egy példa:
=HA(C10>10000,SayIt("Túlköltségvetés","OK")
A képlet ellenőrzi a C10 cellát. Ha az érték nagyobb, mint 10 000, a függvény a következő szöveget mondja ki: „Költségkeret túllépése”. Ha az érték kisebb, mint 10 000, a függvény az OK szöveget jeleníti meg (és nem mond semmit).
Használd takarékosan. Ha egynél többször használja ezt a funkciót, az nagyon zavaró lehet. Ne feledje továbbá, hogy ez a függvény a munkalap minden kiszámításakor kiértékelésre kerül, így a hang nagyon bosszantó lehet, ha sok változtatást hajt végre. Ez a funkció valószínűleg inkább szórakoztató célokra alkalmas.
Az IsLike funkció
A VBA Like operátora nagyon rugalmas módja a szöveges karakterláncok összehasonlításának. Nézze meg a VBA súgórendszerében. Ez a függvény ezt az erőt adja a munkalapképletekhez:
Funkció IsLike (szöveg, minta)
' Igazat ad vissza, ha az első argumentum olyan, mint a második
IsLike = text Like minta
Funkció befejezése