Bazat e programimit VBA dhe krijimit të makrove në aplikacionet e Microsoft Office. Shembuj makro Excel

Pavarësisht funksionalitetit të fuqishëm të ofruar nga ndërfaqja e përdoruesit Excel, ka një sërë detyrash që mund të kryhen vetëm në mënyrë programore. Përdorimi i makrove në Excel është një hyrje në programimin Excel VBA me shembuj se si të zgjidhni një sërë problemesh praktike Excel.Materiali i librit është i destinuar për përdoruesit e Excel-it, si dhe programuesit që nuk e njohin modelin e objektit Excel. Së bashku me temat mbi zhvillimin e makrove për Excel 2002, ai ofron një kurs hyrës për shkrimin e makrove dhe programeve në Excel.

Libri: Kurs Intensiv i Programimit në Excel për fundjavë

Botuesi: Dialektika
Faqet: 421
Formati: DJVU
Permasa: 12.6 Mb
Cilësia: Normale
Gjuhe: rusisht
Zhanri: programimit
Viti i botimit: 2004
ISBN: 5-8459-0687-3

Aftësitë e Microsoft Excel nuk kufizohen vetëm në punën me tabelat e të dhënave. Fshehja pas mjeteve të fletëllogaritjes është një gjuhë e fuqishme programimi - VBA (Visual Basic për Aplikacione). Sidoqoftë, pothuajse çdo përdorues ka mundësinë të mësojë se si të shkruajë programe në VBA për zgjidhjen e detyrave nga më të ndryshmet në Excel - nga ekzekutimi mekanik i llogaritjeve deri te krijimi i një sistemi për futjen e të dhënave me format e veta të ekranit dhe me mundësinë e rishikimit të korrektësisë. të vlerave të shtypura.

Libri: Programimi VBA 2002

Cilësia: Normale
Gjuhe: rusisht
Zhanri: programimit

Libri përmban një kurs për programimin në Visual Basic për Aplikacione (VBA), e cila është gjuha bazë në aplikacionet e Microsoft Office (Word, Excel, Access, PowerPoint, FrontPage, Visio, etj.). Libri është menduar për fillestarët që të programojnë në mjedisin Windows duke përdorur objekte Word-, Excel-, PowerPoint.Një pjesë e librit i kushtohet zhvillimit të aplikacioneve të Office që përdorin bazat e të dhënave të ruajtura si në skedarë të veçantë ashtu edhe në serverë të largët.Materiali i librit është i mjaftueshëm për të mësuar bazat e gjuhës Visual Basic dhe për të krijuar makro të thjeshta që ndihmojnë në automatizimin e punës rutinë të përsëritur me dokumente, tabela, tabela, prezantime, etj., si dhe për zhvillimin e aplikacioneve mjaft komplekse të bazës së të dhënave duke përdorur dialog. kuti që i ofrojnë përdoruesit mjetet më moderne të ndërfaqes.Shumica e shembujve në libër i kushtohen çështjeve aktuale të veprimtarisë tregtare, kështu që libri do të jetë shumë i dobishëm për menaxherët e niveleve të ndryshme, të cilët, me sa duket, janë të destinuara si për Microsoft Office ashtu edhe për gjuhën e integruar të programimit VBA.
Shtojcat në fund të librit mund të shërbejnë si një referencë e dobishme kur punoni me VBA dhe VB të rregullt.

Shumë libra janë shkruar në Excel. Por ky libër është i veçantë - kërkon zhvillimin e aplikacionit të fletëllogaritjes në një kontekst të gjerë. VBA është vetëm një komponent i mjedisit të zhvillimit të aplikacioneve me porosi, megjithëse mjaft thelbësor. Ky libër do t'ju ndihmojë të kuptoni ndërlikimet e zhvillimit të aplikacioneve me VBA. Ai përshkruan shumë veçori të gjuhës VBA, aftësitë e saj dhe mjedisin për përdorim.Së pari, do t'ju ofrohet një pasqyrë e aftësive të programit, më pas do të kaloni në përcaktimin e koncepteve të programimit VBA dhe më pas do të njiheni me vetë gjuhën. Nëse jeni një programues fillestar VBA, atëherë në këtë botim do të gjeni të gjitha informacionet e nevojshme që ju nevojiten për punë të mëtejshme. nëse tashmë keni përvojë të lakmueshme me VBA, atëherë ky libër do të pasurojë dhe shtojë njohuritë tuaja, duke shtuar teknika dhe shembuj të rinj nga jeta reale.

Versioni pdf është redaktuar dhe ofruar me mirësi nga kontribuesi.

Microsoft Excel është shumë më tepër se thjesht një spreadsheet. Me prezantimin e Redaktuesit Visual Basic në Excel 97, i ndjekur nga stabiliteti i përmirësuar ndjeshëm i Excel 2000, Excel u bë një platformë e respektuar zhvillimi më vete. Aplikacionet Excel tani gjenden së bashku me ato të bazuara në C ++, Java dhe platformën e zhvillimit .NET, si pjesë e grupit bazë të aplikacioneve të korporatave kritike për misionin.
Fatkeqësisht, Excel ende konsiderohet shumë shpesh si një platformë hobisti, që njerëzit zhvillojnë aplikacione Excel vetëm në kohën e tyre të lirë për të automatizuar detyra të vogla. Një vështrim i shkurtër në shumë libra Excel VBA duket se konfirmon këtë mendim. Këta libra fokusohen në bazat e automatizimit të detyrave të Excel duke përdorur VBA. Ky libër është i pari i këtij lloji në ofrimin e një shpjegimi të detajuar se si të përdoret Excel si platformë për zhvillimin e aplikacioneve cilësore profesionale.
Ndërsa shumica e platformave të tjera kryesore të zhvillimit duket se kanë një tekst standard de fakto që shpjegon praktikat më të mira të pranuara përgjithësisht për arkitekturën, projektimin dhe zhvillimin e aplikacioneve duke përdorur atë platformë, Excel deri më tani nuk e ka. Ky libër përpiqet të plotësojë këtë boshllëk. Autorët janë zhvillues profesionistë të Excel-it të cilët krijojnë aplikacione të bazuara në Excel për klientët duke filluar nga individët deri te korporatat më të mëdha shumëkombëshe. Ky libër shpjegon qasjet që përdorim kur dizajnojmë, zhvillojmë, shpërndajmë dhe mbështesim aplikacionet që shkruajmë për klientët tanë.

MZTools - Një mjet shumë i dobishëm për ata që programojnë në VBA. Me të vërtetë kursen kohë kur kodoni. Është gjithashtu e rëndësishme që të shërbimeve absolutisht falas... Këtu janë disa nga veçoritë e tij:

• Futja automatike e trajtuesve të gabimeve në module
• Futja e komenteve në kokën e procedurës, me futjen automatike të emrave të kohës, moduleve dhe procedurave, aftësia për të treguar autorin e procedurës
• Numërimi automatik i rreshtave të kodit
• Heqja e numërimit nga rreshtat e kodit
• Krijimi i shablloneve për kodet e përdorura zakonisht
• Zotëroni kujtesën për 9 operacione me aftësinë për të koduar dhe më pas ngjitur cilindo nga 9 kodet e kopjuara
• dhe shumë gjëra të tjera të dobishme

Programi shpërndahet pa pagesë.

(37,3 KiB, 3 708 shkarkime)

Mjetet VBE - Sa prej jush duhet të shkruanin kodin për formularin dhe më pas mbani mend se një element nuk u emërua ashtu siç dëshironit ose thjesht donte të riemërtohej për shkak të një ndryshimi në kod? Dhe, natyrisht, u përballëm me problemin që kur riemërtoni një element, duhet të futeni në kod dhe të zëvendësoni të gjitha referencat për këtë element me një emër të ri atje. Pra, duke përdorur këtë program, mund të riemërtoni emrin e çdo elementi të formës (TextBox, Label, etj.) dhe kontrollet ActiveX në fletën Excel, dhe vetë programi do të zëvendësojë të gjitha lidhjet në kod nga emri i vjetër në atë të ri. . Shumë komode.

Programi shpërndahet pa pagesë.

Shembujt e mëposhtëm të thjeshtë makro të Excel ilustrojnë disa nga veçoritë dhe teknikat e përshkruara në tutorialin Excel VBA.

Macro Excel: Shembulli 1

Fillimisht kjo procedurë Nënështë dhënë si shembull i përdorimit të komenteve në kodin VBA. Sidoqoftë, këtu mund të shihni gjithashtu se si deklarohen variablat, si funksionojnë referencat e qelizave Excel, duke përdorur një lak Për, operator i kushtëzuar Nëse dhe shfaqja e një kutie mesazhesh.

"Nënprocedura kërkon një qelizë që përmban vargun e specifikuar" në rangun e qelizave A1: A100 të fletës aktive Sub Find_String (sFindText As String) Dim i As Integer "Një numër i plotë i llojit Integer, i përdorur në një cikli For Dim iRowNumber As Integer" Një numër i plotë i tipit Integer për ruajtjen e rezultatit iRowNumber = 0 "Shikon nëpër qelizat A1: A100 njëra pas tjetrës derisa të gjendet një varg. Nëse gjendet një përputhje me vargun e dhënë " ruani numrin aktual të rreshtit dhe dilni nga cikli Për iRowNumber = i Dil Për Fund Nëse Next i "Ne e informojmë përdoruesin në një dritare që shfaqet nëse rreshti i kërkimit është gjetur" Nëse është specifikuar rreshti është gjetur, tregoni në cilën qelizë është gjetur përputhja Nëse iRowNumber = 0 Pastaj MsgBox "String" & sFindText & "nuk u gjet" Tjetër MsgBox "String" & sFindText & "gjendet në qelizën A" & iRowNumber Fund If End Sub

Macro Excel: Shembulli 2

Procedura e radhës Nën- një shembull i përdorimit të një lak Bej Nderkohe... Këtu mund të shihni gjithashtu se si deklarohen variablat, si të punoni me referencat e qelizave Excel dhe si të aplikoni operatorin e kushtëzuar. Nëse.

"Nënprocedura nxjerr numra Fibonacci që nuk i kalojnë 1000 Sub Fibonacci () Dim i Si numër i plotë" Numërues për të treguar pozicionin e një elementi në sekuencën Dim iFib As Integer "Ruan vlerën aktuale të sekuencës Dim iFib_Next si Integer" Ruan vlerën tjetër i sekuencës Dim iStep As Integer "Ruan madhësinë e rritjes së radhës "Inicializoni variablat i dhe iFib_Next i = 1 iFib_Next = 0" Cikli Do while do të funksionojë derisa vlera "e numrit aktual Fibonacci të kalojë 1000 Do Ndërsa iFib_Next< 1000 If i = 1 Then "Особый случай для первого элемента последовательности iStep = 1 iFib = 0 Else "Сохраняем размер следующего приращения перед тем, как перезаписать "текущее значение последовательности iStep = iFib iFib = iFib_Next End If "Выводим текущее число Фибоначчи в столбце A активного рабочего листа "в строке с индексом i Cells(i, 1).Value = iFib "Вычисляем следующее число Фибоначчи и увеличиваем индекс позиции элемента на 1 iFib_Next = iFib + iStep i = i + 1 Loop End Sub

Macro Excel: Shembulli 3

Kjo procedurë Nën sythe nëpër qelizat e një kolone A fletë aktive derisa të ndeshet me një qelizë boshe. Vlerat shkruhen në një grup. Kjo makro e thjeshtë Excel demonstron punën me vargje dinamike, si dhe përdorimin e një cikli Bëni derisa... Në këtë shembull, ne nuk do të kryejmë asnjë veprim me grupin, megjithëse në praktikën reale të programimit, pasi të dhënat janë shkruar në grup, veprime të tilla zakonisht kryhen mbi to.

"Procedura Sub ruan vlerat e qelizave në kolonën A të fletës aktive në grupin Sub GetCellValues ​​() Dim iRow As Integer" Ruan numrin e rreshtit aktual Dim dCellValues ​​() Si Double "Array për ruajtjen e vlerave të qelizave iRow = 1 ReDim dCellValues ​​(1 deri në 10)" Loop Do Derisa kalon nëpër qelizat e kolonës A të fletës aktive "dhe nxjerr vlerat e tyre në një grup deri në një qelizë të zbrazët është hasur. Bëje deri në IsEmpty (Qelizat (iRow, 1))" Kontrollo që grupi dCellValues ​​të ketë madhësi të mjaftueshme "Nëse jo, rrite grupin e madhësisë me 10 duke përdorur ReDim If UBound (dCellValues)< iRow Then ReDim Preserve dCellValues(1 To iRow + 9) End If "Сохраняем значение текущей ячейки в массиве dCellValues dCellValues(iRow) = Cells(iRow, 1).Value iRow = iRow + 1 Loop End Sub

Macro Excel: Shembulli 4

Në këtë shembull, procedura Nën lexon vlerat nga një kolonë A fletë pune Fleta 2 dhe kryen veprime aritmetike me to. Rezultatet regjistrohen në qelizat e kolonës A në fletën aktive të punës. Kjo makro demonstron përdorimin e objekteve të Excel. Në veçanti, ankim bëhet sipas procedurës Nën tek objekti Kolonat, dhe tregon se si arrihet ky objekt përmes objektit Fletë pune... Tregohet gjithashtu se kur i referohemi një qelize ose një sërë qelizash në fletën aktive, nuk është e nevojshme të specifikoni emrin e kësaj flete kur shkruani lidhjen.

"Nënprocedura duke përdorur një lak lexon vlerat në kolonën A të fletës së punës Sheet2," kryen veprime aritmetike me secilën vlerë dhe e shkruan rezultatin në "kolona A të fletës aktive të punës (Sheet1) Sub Transfer_ColA () Dim i As Integer Dim Col As Range Dim dVal As Double "Cakto kolonën A të fletës së punës tek ndryshorja Col Sheet 2 Set Col = Sheets (" Sheet2"). Kolonat (" A ") i = 1" Duke përdorur një lak, lexoni vlerat e qelizave në Col deri në "derisa të haset një qelizë e zbrazët Do Deri IsEmpty (Col.Cells (i)) "Ne kryejmë veprime aritmetike mbi vlerën e qelizës aktuale dVal = Col.Cells (i) .Vlera * 3 - 1" Komanda e mëposhtme shkruan rezultatin në kolonën A të fletës aktive të punës "Specifikoni emrin e fletës në lidhjen jo të nevojshme pasi kjo është fleta aktive Cells (i, 1) = dVal i = i + 1 Loop Fund Sub

Macro Excel: Shembulli 5

Kjo makro tregon shembullin e kodit VBA që monitoron një ngjarje Excel. Ngjarja që makroja është e lidhur ndodh sa herë që zgjidhet një qelizë ose një varg qelizash në fletën e punës. Në rastin tonë, kur zgjedhim një qelizë B1, një dritare mesazhi shfaqet në ekran.

"Ky kod tregon një dritare me një mesazh nëse qeliza B1 është zgjedhur në fletën aktuale të punës" Private Sub Worksheet_SelectionChange (ByVal Target As Range) "Kontrollo nëse qeliza B1 është zgjedhur nëse Target.Count = 1 Dhe Target.Row = 1 And Target. Kolona = 2 Pastaj "Nëse zgjidhet qeliza B1, kryeni veprimin e kërkuar MsgBox" Ju zgjodhët qelizën B1 "End If End Sub

Macro Excel: Shembulli 6

Kjo procedurë ilustron përdorimin e operatorëve Në Gabim dhe Vazhdoj për të trajtuar gabimet. Ky kod tregon gjithashtu një shembull të hapjes dhe leximit të të dhënave nga një skedar.

"Procedura Sub vendos argumentet Val1 dhe Val2 në vlerat e qelizave A1 dhe B1" nga libri i punës Data.xlsx i vendosur në dosjen C: \ Documents and Settings Sub Set_Values ​​(Val1 As Double, Val2 As Double) Dim DataWorkbook As Workbook On Error GoTo Error Handling " Hapni librin e punës me të dhëna Set DataWorkbook = Workbooks. Open ("C: \ Documents and Settings \ Data") "Cakto vlerat e variablave Val1 dhe Val2 nga libri i punës i specifikuar Val1 = Sheets ( " Fleta1 "). Qelizat (1, 1) Val2 = Fletët ("Fleta 1"). Qelizat (1, 2) DataWorkbook. Mbyllni Dalje Nën Trajtimi i gabimeve: "Nëse skedari nuk gjendet, përdoruesit do t'i kërkohet të vendosë atë që dëshiron. file" në dosjen e dëshiruar dhe më pas vazhdoni ekzekutimin e makros MsgBox "Skedari Data.xlsx nuk u gjet! "& _" Ju lutemi shtoni librin e punës në dosjen C: \ Documents and Settings dhe klikoni OK "Rifillo Fund Sub

Përmbajtja e kësaj faqeje do të rritet vazhdimisht...

1. Programi llogaritës "Ngritja e numrave në fuqi të mëdha".
   

   Zbatoni llogaritjen e saktë të ngritjes në fuqi të mëdha të numrave njëshifrorë (2 deri në 9) duke përdorur aritmetikë të gjatë.

2. Nga forumi nga Jonny323. VBA Word

   Përshëndetje të gjithëve. Kam shumë nevojë për një makro, mendoj se nuk është e vështirë: Printimi i faqes së parë në 6 kopje dhe faqes së dytë në 2 kopje. Faleminderit paraprakisht.

3. ProgressBar në formular. VBA Excel

   Një kontroll që tregon ecurinë e programit (sa punë është bërë nga 100%) ...

4. Llogaritjet statistikore në tekstin e theksuar. VBA Word

   Krijoni një makro në Word që do të përcaktojë numrin e fjalëve, presjeve dhe pikave në tekstin e lirë.
   Fjalët do të nënkuptojnë grupe karakteresh të ndara me hapësira (një ose më shumë) dhe që nuk përmbajnë hapësira brenda tyre. Nuk mund të ketë pika ose presje brenda një fjale. Elipset nuk llogariten si pika ...

5. Llogaritjet statistikore në tekstin e dokumentit. Përdorimi i UserForm për futjen e të dhënave. VBA Word

   Krijo një program në Word - Në formë, përdoruesi fut një fjalë ose frazë, dhe programi skanon të gjithë tekstin dhe fut fjalën (frazën) e futur në fund të dokumentit, pranë së cilës janë të gjithë numrat e faqeve në të cilat kjo fjalë ndodh janë të listuara. Përputhjet e numrave të faqes nuk lejohen. Kjo do të thotë, nëse fjala e specifikuar shfaqet tre herë në faqen 5, numri 5 tregohet vetëm një herë në dalje. Formulari duhet të përbëhet nga komponentët e mëposhtëm:
   - 1 TextBox për futjen e një fjale (fraze);
   - 1 buton për të dalë nga programi;
   - 1 buton për të filluar kërkimin dhe për të futur rezultatin në dokument;
   - komponent i tipit Label me tekst shpjegues mbi vijën hyrëse;
   - Përveç kësaj, formulari mund të ketë komponentë të llojit Frame;
   

6. Puna me ListBox (Excel). Kërcim, renditje, përzgjedhje e shumëfishtë ...

7. Program për zgjidhjen e enigmës sudoku japoneze (Excel)

8. Makrot e ekzekutimit të pyetjeve (d.m.th. gjenerimi i një tabele të re nga një bazë të dhënash Excel)

9. Renditja hoare (algoritmi nga wikipedia.org)

   Një nga metodat më të shpejta të renditjes.

10. Merge Sort (duke përdorur Hoare)

    Një nga metodat më të shpejta dhe më optimale të renditjes.

11. VBA Excel: Program për llogaritjen e bioritmeve njerëzore

12. Për shigjetën e zezë me programmersforum.ru

13. Përcaktoni se cili tremujor koordinativ
    pika me koordinatat e dhëna A (a, b) bie. VBA EXCEL.

14. Paraqitja e numrave të plotë me fjalë VBA EXCEL.

15. LOGJIKAT.

    Zgjidhja e një ekuacioni kuadratik.

16. VBA EXCEL.

17. VBA EXCEL. Problemi i trekëndëshit. Array, lak, logjikë.

    Duke pasur parasysh dimensionet e tre brinjëve të trekëndëshit, përcaktoni llojin e tij (drejtkëndor, i mpirë, akute ose i pamundur për t'u ndërtuar).

18. Ora me zile në Excel

19. VBA EXCEL.

20. VBA EXCEL.

21. VBA EXCEL.

    Një makro që përfaqëson në diapazonin e zgjedhur të gjithë numrat negativë në blu, numrat pozitivë në të kuqe, zero në të bardhë (ose të verdhë).

22. VBA EXCEL. Si të fshehni ose shfaqni elementët e fletës.

    Ndonjëherë, kërkohet të fshihen disa veçori nga përdoruesi (si rregull, vendndodhja e të dhënave është e fshehur):
    - vizitoni faqet e tjera të këtij libri (është më mirë të mos dini për to);
    - lëviz (horizontalisht dhe vertikalisht) fletën
    - lexoni dhe modifikoni formulat në qelizat e fletës së punës
    - fsheh linjat e kolonave dhe rreshtave
    - fsheh kokat (emrat dhe numrat) e kolonave dhe rreshtave

23. VBA EXCEL. Shtoni dhe hiqni artikullin e menysë.

    Nuk është e vështirë të shtoni (fshini) artikullin tuaj në menunë Excel. E gjithë kjo përshkruhet në ndihmë.
    Por është shumë më interesante t'ia besosh këtë punë një makro.
    Më pas bëhet e mundur, kur hapni një dokument specifik, të formoni një menu të veçantë, individuale dhe pasi ta mbyllni, ta sillni menunë Excel në gjendjen e tij origjinale. (Ky shembull kodi funksionon vetëm në MS Excel 2003, dhe në 2007 emrat e paneleve të kontrollit duhet të ndryshohen)

24. Automata celulare VBA EXCEL.

25. Metoda e seksionit të artë VBA EXCEL.

26. Zëvendëson vlerat maksimale dhe minimale të qelizave të diapazonit të zgjedhur. VBA Excel

    Zhvilloni një program ose formë përdoruesi për gjetjen dhe riorganizimin e elementeve me vlerat maksimale dhe minimale të gamës së zgjedhur të fletës së punës

27. Një funksion vargu që kthen katrorët e numrave të thjeshtë nga zero në numrin e specifikuar. VBA Excel

    Shkruani një funksion në Excel që merr një numër natyror N dhe kthen katrorët e të gjithë numrave të thjeshtë nga 0 në një N të dhënë natyror.

28. Formulari i përdoruesit për futjen e të dhënave për kreditë e bankave komerciale. VBA Excel

    Organizoni futjen e informacionit në një tabelë që përmban të dhëna për lëshimin e kredive afatgjata nga një bankë tregtare me të dhënat e mëposhtme: kodi i marrësit të kredisë, emri i marrësit të kredisë, data e lëshimit të kredisë, periudha (3- 4 terma) për të cilat është lëshuar kredia (në ditë), interesi, shuma e kredisë, data e pagesës së interesit të kredisë.

29. Formulari i përdoruesit (UserForm) për futjen e të dhënave të regjistrimit të turistëve. VBA Excel

    pikërisht në këtë vend...

Objektiv - Mësoni operatorët bazë dhe zbatoni konstruksionet bazë të programimit në gjuhën VBA.

4.1 Fazat themelore të punës me programet vba në Excel

Për të përgatitur dhe ekzekutuar një program VBA, duhet të bëni sa më poshtë:

në Excel, zgjidhni komandën nga menyja Shërbimi - Makro - RedaktuesVizualebazë;

në dritaren që shfaqet, zgjidhni komandën nga menyja Fut – Moduli... Krijohet një modul, d.m.th., në terma të thjeshtë, hapet një dritare në të cilën mund të futni tekstin e programit.

Në fillim të modulit, mund të specifikohet një udhëzim OpsioniE qartë... Nëse specifikohet, atëherë të gjitha variablat e përdorur në program do të duhet të deklarohen në deklaratë Dim(për më shumë detaje shih nënseksionin 4.3).

Në disa raste, në varësi të cilësimeve të mjedisit VBA, udhëzimi OpsioniE qartë tregohet në fillim të modulit automatikisht. Nëse programuesi dëshiron të përdorë variabla pa i deklaruar ato në një deklaratë Dim, pastaj udhëzimi OpsioniE qartë duhet hequr.

Për të ekzekutuar programin për ekzekutim, zgjidhni komandën nga menyja Run - Run Sub / UserForm.

4.2 Shembulli më i thjeshtë i një programi vba

Shembulli 4.1- Programi që ngre numrin e specifikuar a në shkallën e caktuar b.

Dim a Si Single, b Si Single

a = InputBox ("Fut bazën:")

b = InputBox ("Fut një eksponent:")

x = a ^ b 'Përhapja

MsgBox ("Rezultati është" & x)

Këtu është fjala Nën tregon fillimin e procedurës; emri i saj në këtë rast është abetare4_1 ... Një program VBA përbëhet gjithmonë nga një ose më shumë procedura (në këtë rast, një).

Karakteri '(thonjë e vetme) shënon fillimin e një komenti. Teksti i komentit mund të jetë çdo gjë.

Dim- operatori i deklarimit të ndryshores. Në këtë rast, tregohet se variablat a dhe b janë të llojit Beqare... ato. mund të jenë numra të plotë dhe thyesorë. Llojet e të dhënave dhe deklaratat e variablave do të diskutohen më në detaje në seksionin 4.3.

Kutia hyrëse- një funksion për futjen e vlerës së një ndryshoreje. Linjë a = Kutia hyrëse("Fut bazën:”) do të thotë se është futur vlera e ndryshores a; mesazhi shfaqet në ekran "Fut bazën:"... Linjë x = a^ b- Operatori i caktimit: llogaritet vlera e anës së djathtë (në këtë rast, ndryshorja a ngritur në pushtet b), dhe rezultati i caktohet variablit të specifikuar në të majtë (në këtë rast, ndryshores x). Linjë MsgBox("Rezultati është" &x) do të thotë që mesazhi shfaqet në ekran "Rezultati është i barabartë" dhe vlerën e ndryshores x.

Shënim - Nënshkruani & në funksion MsgBoxështë menduar për lidhjen e disa artikujve të të dhënave që duhet të shfaqen në ekran, në këtë shembull - vargjet "Rezultati është i barabartë" dhe e ndryshueshme x... Në mënyrë të ngjashme shenjë & mund të përdoret në funksion Kutia hyrëse(shembuj të një përdorimi të tillë do të jepen më poshtë). Përpara shenjës & dhe duhet të ndiqet nga hapësira.

Deklarata të shumta VBA mund të vendosen në një rresht. Për ta bërë këtë, ato ndahen me dy pika. Pra, programi nga shembulli 4.1 mund të shkruhet, për shembull, si më poshtë:

Shembulli i parë i një programi VBA

Dim a Si Single, b Si Single

a = InputBox ("Fut bazën:"): b = InputBox ("Fut eksponentin:")

x = a ^ b: MsgBox ("Rezultati është" & x) 'Shprehni dhe nxirrni rezultatin

Ky shembull përdor një procedurë të quajtur nënprogram. Kjo procedurë fillon me fjalën Nën... Ekziston gjithmonë të paktën një nënprogram në një program VBA. Përveç kësaj, ekziston një lloj tjetër procedure në VBA - funksionet. Një procedurë funksioni fillon me fjalën Funksioni... Përdorimi i procedurave të tilla do të diskutohet në nënseksionin 4.9.