Kā izpildīt VBA funkciju procedūras programmā Excel 2016

VBA programmēšanā funkcija atgriež vērtību. Programmā Excel 2016 varat izpildīt funkciju procedūras un izsaukt funkciju. Funkcijas, atšķirībā no apakšprocedūrām, var izpildīt tikai divos veidos:

  • Izsaucot funkciju no citas apakšprocedūras vai funkcijas procedūras

  • Izmantojot funkciju darblapas formulā

Izmēģiniet šo vienkāršo funkciju. Ievadiet to VBA modulī:

Funkcija CubeRoot(skaitlis)
  CubeRoot = skaitlis ^ (1/3)
Beigu funkcija

Šī funkcija ir diezgan viegla; tas tikai aprēķina skaitļa kuba sakni, kas tai nodota kā arguments. Tomēr tas nodrošina sākumpunktu funkciju izpratnei. Tas arī ilustrē svarīgu koncepciju par funkcijām: kā atgriezt vērtību. (Jūs atceraties, ka funkcija atgriež vērtību, vai ne?)

Ņemiet vērā, ka viena koda rindiņa, kas veido šo funkcijas procedūru, veic aprēķinu. Matemātikas rezultāts (skaitlis pakāpē 1/3) tiek piešķirts mainīgajam CubeRoot. Nav nejaušība, ka CubeRoot ir arī funkcijas nosaukums. Lai norādītu funkcijai, kāda vērtība jāatgriež, šī vērtība tiek piešķirta funkcijas nosaukumam.

Funkcijas izsaukšana no apakšprocedūras

Tā kā funkciju nevar izpildīt tieši, tā ir jāizsauc no citas procedūras. Ievadiet šo vienkāršo procedūru tajā pašā VBA modulī, kurā ir CubeRoot funkcija:

Sub CallerSub()
  Ans = CubeRoot (125)
  MsgBox Ans
Beigu apakš

Izpildot procedūru CallerSub, programmā Excel tiek parādīts ziņojuma lodziņš, kurā ir Ans mainīgā vērtība, kas ir 5.

Notiek šādi: tiek izpildīta funkcija CubeRoot, un tā saņem argumentu 125. Aprēķinu veic, izmantojot funkcijas kodu (izmantojot kā argumentu nodoto vērtību), un funkcijas atgrieztā vērtība tiek piešķirta mainīgajam Ans. Pēc tam funkcija MsgBox parāda mainīgā Ans vērtību.

Mēģiniet mainīt argumentu, kas tiek nodots funkcijai CubeRoot, un vēlreiz palaidiet CallerSub makro. Tas darbojas tāpat kā vajadzētu — pieņemot, ka funkcijai piešķirat derīgu argumentu (pozitīvu skaitli).

Starp citu, CallerSub procedūru varētu nedaudz vienkāršot. Mainīgais Ans nav īsti nepieciešams, ja vien jūsu kods vēlāk neizmantos šo mainīgo. Varat izmantot šo vienu paziņojumu, lai iegūtu tādu pašu rezultātu:

  MsgBox CubeRoot (125)

Funkcijas izsaukšana no darblapas formulas

Tagad ir pienācis laiks izsaukt šo VBA funkcijas procedūru no darblapas formulas. Aktivizējiet darblapu tajā pašā darbgrāmatā, kurā ir CubeRoot funkcijas definīcija. Pēc tam jebkurā šūnā ievadiet šādu formulu:

=CubeRoot(1728)

Šūnā tiek parādīts 12, kas patiešām ir 1728 kuba sakne.

Kā jūs varētu gaidīt, kā CubeRoot funkcijas argumentu varat izmantot šūnas atsauci. Piemēram, ja šūna A1 satur vērtību, varat ievadīt =CubeRoot(A1) . Šajā gadījumā funkcija atgriež skaitli, kas iegūts, aprēķinot A1 vērtības kuba sakni.

Šo funkciju var izmantot neierobežotu skaitu reižu darblapā. Tāpat kā programmā Excel iebūvētās funkcijas, jūsu pielāgotās funkcijas tiek parādītas dialoglodziņā Funkcijas ievietošana. Noklikšķiniet uz rīkjoslas pogas Ievietot funkciju un izvēlieties kategoriju Lietotāja definēta. Dialoglodziņā Funkcijas ievietošana ir norādīta jūsu funkcija.

Kā izpildīt VBA funkciju procedūras programmā Excel 2016

Funkcija CubeRoot parādās dialoglodziņa Funkcijas ievietošanas kategorijā User Defined.

Ja vēlaties, lai dialoglodziņš Funkcijas ievietošana parādītu funkcijas aprakstu, rīkojieties šādi:

Izvēlieties Izstrādātājs → Kods → Makro.

Programmā Excel tiek parādīts dialoglodziņš Makro, bet CubeRoot sarakstā neparādās. (CubeRoot ir funkciju procedūra, un šajā sarakstā ir redzamas tikai apakšprocedūras.) Neuztraucieties.

Lodziņā Makro nosaukums ierakstiet vārdu CubeRoot.

Noklikšķiniet uz pogas Opcijas.

Lodziņā Apraksts ievadiet funkcijas aprakstu.

Noklikšķiniet uz Labi, lai aizvērtu dialoglodziņu Makro opcijas.

Aizveriet dialoglodziņu Makro, noklikšķinot uz pogas Atcelt.

Šis aprakstošais teksts tagad parādās dialoglodziņā Funkcijas ievietošana.

Pārbaudiet CubeRoot funkciju, kas tiek izmantota darblapu formulās.

Kā izpildīt VBA funkciju procedūras programmā Excel 2016

Funkcijas CubeRoot izmantošana formulās.


Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows

Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows

Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows Microsoft Word atver failus tikai lasīšanas režīmā, padarot tos neiespējamu rediģēt? Neuztraucieties, metodes ir norādītas zemāk

Kā novērst nepareizu Microsoft Word dokumentu drukāšanu

Kā novērst nepareizu Microsoft Word dokumentu drukāšanu

Kā labot kļūdas, drukājot nepareizus Microsoft Word dokumentus.Kļūdas Word dokumentu drukāšanā ar mainītiem fontiem, nekārtīgām rindkopām, trūkstoša teksta vai pazaudētu saturu ir diezgan izplatītas. Tomēr nevajag

Izdzēsiet pildspalvas un marķiera zīmējumus savos PowerPoint slaidos

Izdzēsiet pildspalvas un marķiera zīmējumus savos PowerPoint slaidos

Ja prezentācijas laikā esat izmantojis pildspalvu vai marķieri, lai zīmētu uz PowerPoint slaidiem, varat saglabāt zīmējumus nākamajai prezentācijai vai izdzēst tos, lai nākamajā reizē, kad to parādīsit, jūs sāktu ar tīriem PowerPoint slaidiem. Izpildiet šos norādījumus, lai dzēstu pildspalvas un marķiera zīmējumus: Līniju dzēšana pa vienai […]

Veidojiet bibliotēkas saturu programmā SharePoint 2010

Veidojiet bibliotēkas saturu programmā SharePoint 2010

Stilu bibliotēkā ir CSS faili, paplašināmās stila lapu valodas (XSL) faili un attēli, ko izmanto iepriekš definētas šablona lapas, lapu izkārtojumi un vadīklas programmā SharePoint 2010. Lai atrastu CSS failus publicēšanas vietnes stilu bibliotēkā: izvēlieties Vietnes darbības → Skatīt Viss vietnes saturs. Tiek parādīts vietnes saturs. Stila bibliotēka atrodas […]

Formatējiet skaitļus tūkstošos un miljonos Excel pārskatos

Formatējiet skaitļus tūkstošos un miljonos Excel pārskatos

Nepārsedziet savu auditoriju ar milzīgiem skaitļiem. Programmā Microsoft Excel varat uzlabot informācijas paneļu un pārskatu lasāmību, formatējot skaitļus tā, lai tie tiktu rādīti tūkstošos vai miljonos.

Kā koplietot un sekot līdzi SharePoint vietnēm

Kā koplietot un sekot līdzi SharePoint vietnēm

Uzziniet, kā izmantot SharePoints sociālo tīklu rīkus, kas ļauj indivīdiem un grupām sazināties, sadarboties, koplietot un sazināties.

Kā programmā Excel konvertēt datumus Juliana formātos

Kā programmā Excel konvertēt datumus Juliana formātos

Jūlija datumi ražošanas vidēs bieži tiek izmantoti kā laikspiedols un ātra atsauce partijas numuram. Šāda veida datuma kodēšana ļauj mazumtirgotājiem, patērētājiem un pakalpojumu aģentiem noteikt produkta izgatavošanas laiku un līdz ar to arī produkta vecumu. Jūlija datumi tiek izmantoti arī programmēšanā, militārajā jomā un astronomijā. Savādāk […]

Kā izveidot Access Web App

Kā izveidot Access Web App

Programmā Access 2016 varat izveidot tīmekļa lietotni. Kas tad vispār ir tīmekļa lietotne? Tīmeklis nozīmē, ka tas ir tiešsaistē, un lietotne ir tikai “lietojumprogrammas” saīsinājums. Pielāgota tīmekļa lietotne ir tiešsaistes datu bāzes lietojumprogramma, kurai var piekļūt no mākoņa, izmantojot pārlūkprogrammu. Jūs veidojat un uzturat tīmekļa lietotni darbvirsmas versijā […]

Ātrās palaišanas josla programmā SharePoint 2010

Ātrās palaišanas josla programmā SharePoint 2010

Lielākā daļa SharePoint 2010 lapu ātrās palaišanas joslā lapas kreisajā pusē parāda navigācijas saišu sarakstu. Ātrās palaišanas joslā tiek rādītas saites uz piedāvāto vietņu saturu, piemēram, sarakstiem, bibliotēkām, vietnēm un publicēšanas lapām. Ātrās palaišanas joslā ir divas ļoti svarīgas saites: Visa vietnes satura saite: […]

Ko nozīmē risinātāja kļūdu ziņojumi programmā Excel?

Ko nozīmē risinātāja kļūdu ziņojumi programmā Excel?

Vienkāršām problēmām risinātājs programmā Excel parasti ātri atrod optimālās Risinātāja mainīgā vērtības mērķa funkcijai. Taču dažos gadījumos Solver ir grūti atrast Solver mainīgā vērtības, kas optimizē mērķa funkciju. Šādos gadījumos Solver parasti parāda ziņojumu vai kļūdas ziņojumu, kurā aprakstīta vai apspriesta problēma, ko […]