Žemiau apžvelgsime programą Excel VBA kuris sukuria a Naudotojo apibrėžta funkcija kuris naudoja masyvo funkciją, kad grąžintų mėnesių pavadinimai.
Vartotojo apibrėžtas funkcijas reikia sudėti į modulį.
1. Atidarykite „Visual Basic“ redaktorių ir spustelėkite Įterpti, Modulis.
2. Pridėkite šią kodo eilutę:
Funkcija MONTHNAMES ()
Mūsų funkcijos pavadinimas yra MONTHNAMES. Tuščia dalis tarp skliaustų reiškia, kad „Excel VBA“ nieko neįvedame.
3. Masyvo funkcija leidžia mums priskirti reikšmes variantų masyvui vienoje kodo eilutėje.
MONTHNAMES = Masyvas („sausis“, „vasaris“, „kovas“, „balandis“, „gegužė“, „birželis“, „liepa“, „rugpjūtis“, „rugsėjis“, „spalis“, „lapkritis“, „gruodis“ ")
4. Nepamirškite baigti funkcijos.
Pabaigos funkcija
5. Dabar galite naudoti šią funkciją, kaip ir bet kurią kitą „Excel“ funkciją, norėdami grąžinti mėnesių pavadinimus. Pasirinkite dvylika horizontalių langelių, įveskite funkciją = MONTHNAMES () ir paspauskite CTRL + SHIFT + ENTER.
Rezultatas:
Pastaba: negalite ištrinti vieno mėnesio. Norėdami ištrinti mėnesius, pasirinkite diapazoną A1: L1 ir paspauskite Ištrinti. Ši funkcija galima tik šioje darbaknygėje.
