Kā tieši ievadīt VBA kodu programmā Excel 2016

Dažreiz labākais ceļš koda ievadīšanai programmai Excel 2016 ir vistiešākais. Tieša VBA koda ievadīšana ietver tiešu koda ievadīšanu. Citiem vārdiem sakot, jūs ierakstāt kodu, izmantojot tastatūru. Teksta ievadīšana un rediģēšana VBA modulī darbojas tā, kā jūs varētu gaidīt. Varat atlasīt, kopēt, izgriezt, ielīmēt tekstu un veikt citas darbības.

Izmantojiet tabulēšanas taustiņu, lai ievilktu dažas rindas, lai kods būtu vieglāk lasāms. Atkāpe nav nepieciešama, taču tas ir labs ieradums, kas jāiegūst.

Viena VBA koda rindiņa var būt tik gara, cik nepieciešams. Tomēr, iespējams, vēlēsities izmantot rindiņas turpinājuma rakstzīmes, lai sadalītu garas koda rindas. Lai turpinātu vienu koda rindiņu (pazīstamu arī kā paziņojumu) no vienas rindiņas uz nākamo, pabeidziet pirmo rindiņu ar atstarpi, kam seko pasvītra (_). Pēc tam turpiniet paziņojumu nākamajā rindā. Un neaizmirstiet par vietu. Pasvītra rakstzīme, kuras priekšā nav atstarpe, to nedarīs.

Šeit ir piemērs viena paziņojumam, kas sadalīts trīs rindās:

Selection.Sort Key1:=Range(“A1”), _
 Order1:=xlaugošā secībā, Header:=xlUzmini, _
 Orientācija:=xlTopToBottom

Šis paziņojums darbotos tieši tāpat, ja tas tiktu ievadīts vienā rindā (bez rindas turpinājuma rakstzīmēm). Ņemiet vērā, ka šī paziņojuma otrā un trešā rindiņa ir ar atkāpi. Atkāpe nav obligāta, taču tā palīdz noskaidrot, ka šīs rindas nav atsevišķi paziņojumi.

Inženieri ar baltu pārklājumu, kas izstrādāja VBE, paredzēja, ka cilvēki pieļaus kļūdas. Tāpēc VBE ir vairāki atsaukšanas un pārtaisīšanas līmeņi. Ja izdzēsāt priekšrakstu, kuram nevajadzētu būt, rīkjoslā noklikšķiniet uz pogas Atsaukt (vai nospiediet taustiņu kombināciju Ctrl+Z), līdz paziņojums atkal tiek parādīts. Pēc atsaukšanas varat izmantot pogu Atkārtot, lai veiktu atsauktās izmaiņas.

Vai esat gatavs ievadīt reāllaika kodu? Izmēģiniet tālāk norādītās darbības.

Izveidojiet jaunu darbgrāmatu programmā Excel.

Nospiediet Alt+F11, lai aktivizētu VBE.

Projekta logā noklikšķiniet uz jaunās darbgrāmatas nosaukuma.

Izvēlieties Ievietot → Modulis, lai projektā ievietotu VBA moduli.

Modulī ierakstiet šādu kodu:

Sub GuessName()
 Msg = "Vai jūsu vārds ir " & Application.UserName & "?"
 Ans = MsgBox(Ziņojums, vbYesNo)
 Ja Ans = vbNo, tad MsgBox "Ak, nekas."
 Ja Ans = vbYes, tad MsgBox "Man ir jābūt ekstrasensam!"
Beigu apakš

Novietojiet kursoru jebkurā ievadītā teksta vietā un nospiediet taustiņu F5, lai izpildītu procedūru.

F5 ir komandas Palaist → Palaist apakšgrupu/lietotāja veidlapu saīsne. Ja kodu ievadījāt pareizi, programma Excel izpilda procedūru, un jūs varat atbildēt uz vienkāršu dialoglodziņu. Atcerieties, ka teksts dialoglodziņā būs atšķirīgs.

Kā tieši ievadīt VBA kodu programmā Excel 2016

GuessName procedūra parāda šo dialoglodziņu.

Ievadot 5. darbībā norādīto kodu, iespējams, pamanīsit, ka VBE jūsu ievadītajā tekstā veic dažus pielāgojumus. Piemēram, pēc Subpriekšraksta ievadīšanas VBE automātiski ievieto priekšrakstu End Sub. Un, ja jūs izlaižat atstarpi pirms vai pēc vienādības zīmes, VBE ievieto atstarpi jums. Tāpat VBE maina dažu tekstu krāsu un lielo burtu lietojumu. Tas viss ir pilnīgi normāli. Tas ir tikai VBE veids, kā uzturēt lietas kārtīgas un lasāmas.

Ja veicāt iepriekšējās darbības, jūs tikko uzrakstījāt VBA apakšprocedūru, kas pazīstama arī kā makro. Nospiežot taustiņu F5, programma Excel izpilda kodu un izpilda norādījumus. Citiem vārdiem sakot, programma Excel novērtē katru paziņojumu un dara to, ko jūs tam likāt. (Neļaujiet šim jaunatklātajam spēkam iet uz jūsu galvu.) Varat izpildīt šo makro neierobežotu skaitu reižu, lai gan tas mēdz zaudēt savu pievilcību pēc dažiem desmitiem reižu.

Informācijai šajā vienkāršajā makro ir izmantoti šādi jēdzieni:

  • Apakšprocedūras noteikšana (pirmā rinda)

  • Vērtību piešķiršana mainīgajiem (Msg un Ans)

  • Konkatenācijas (iestāšanās) virkni (izmantojot & operators)

  • Izmantojot iebūvēto VBA funkciju (MsgBox)

  • Izmantojot iebūvētās VBA konstantes (vbYesNo, vbNo un vbYes)

  • Ja-tad konstrukcijas izmantošana (divas reizes)

  • Apakšprocedūras beigšana (pēdējā rinda)

Nav slikti iesācējam, vai ne?


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 […]