Primeri Excela VBA

To je zelo stvar, ko sem začel delati in učiti makro VBA, bil sem zmeden, kje začeti. Že smo videli urejevalnik VBA, ki vsebuje vse opredelitve možnosti in zavihkov okna VBA urejevalnika. Kot začetnik vedno ne vemo, kako začeti stvar, dokler je ne najdemo. Ta članek je rešitev za tiste, ki se soočajo s težavami pri uporabi in učenju primerov VBA in ustvarjanju makrov. Vsi smo se soočali s časom, ko bi lahko nekatere stvari v Excelu avtomatizirali z Makro. Toda nekdo, ki ne ve, kako uporabljati VBA, je ne bo mogel ustvariti. To bo koristen vodič za tiste, ki so novi v kodi VBA Macro.

Primeri VBA v Excelu za začetnike

Spodaj so primeri VBA v Excelu:

To predlogo programa Excel si lahko prenesete tukaj - VBA Primeri Predloga Excela

Primer VBA št. 1

Oglejmo si preprost primer uporabe kodiranja VBA. Za to sledite spodnjim korakom:

1. korak: Odprite modul VBA, kamor bomo pisali kodo na zavihek z vstavitvijo, kot je prikazano spodaj.

2. korak: Zdaj napišite podprocesuro makro VBA v poljubno ime.

Koda:

 Pod VBA_Examples1 () Konec Sub

3. korak: S pomočjo DIM-a določite spremenljivko, kamor bomo shranjevali številke kot cela števila.

Koda:

 Pod VBA_Examples1 () Dim A kot celoten konec Pod

4. korak: Zdaj podajte poljubno številko zgoraj definirani spremenljivki, kot je prikazano spodaj.

Koda:

 Pod VBA_Examples1 () Dim A kot celo število A = 100 konec pod

5. korak: Zdaj bomo v polju s sporočili natisnili vrednost, shranjeno v spremenljivki A.

Koda:

 Pod VBA_Examples1 () Dim A kot celoten A = 100 MsgBox A End Sub

6. korak: Zaženite kodo s pritiskom na tipko F8 ali s klikom na gumb Play, ki se nahaja pod menijsko vrstico. Videli bomo polje s sporočilom z vrednostjo 100 v njem.

Koda:

 Pod VBA_Examples1 () Dim A kot celoten A = 100 MsgBox A End Sub

7. korak: To bi lahko storili tudi s funkcijo Debug Print, katere vrednosti so vidne v takojšnjem oknu. ( Opomba: Pritisnite Ctrl + G, da odprete takojšnje okno)

Koda:

 Pod VBA_Examples1 () Dim A kot celoten A = 100 Debug.Print A End Sub

Primer VBA # 2

Zdaj bomo v tem primeru videli še en primer, kjer bomo zanko For-Next uporabili za tiskanje imen listov. Za to sledite spodnjim korakom:

1. korak: Odprite modul in napišite podproces, kot je prikazano spodaj. Za definiranje tega lahko uporabimo katero koli ime.

Koda:

 Pod VBA_Examples2 () Konec Sub

2. korak: Izberite spremenljivko kot celo število. Izberemo lahko ime spremenljivke, kot smo to storili v primeru-1.

Koda:

 Pod VBA_Examples2 () Dim A kot celoten konec Pod

3. korak: Odprite zanko For-Next, kot je prikazano spodaj.

Koda:

 Pod VBA_Examples2 () Dim A kot celo število za naslednji konec konca pod

4. korak: Izberite položaj celice, od koder želimo videti imena lista. Tukaj nimamo referenc za glavo, zato lahko začnemo s celico 1.

Koda:

 Pod VBA_Examples2 () Dim A kot celo število za A = 1 na listih.Zbroj Naprej A konec Pod

5. korak: Zdaj dodelimo spremenljivko A z vrednostjo celice, da vidimo ime lista, kot je prikazano spodaj.

Koda:

 Pod VBA_Examples2 () Dim A kot celo število za A = 1 do listov. Število celic (A, 1) .Value = Sheets (A). Name Next A End Sub

6. korak: Zdaj zaženite kodo s pritiskom na tipko F8 ali s klikom na gumb Predvajaj.

Videli bomo, da smo imeli 3 liste, ki so bili vsi imenovani privzeto, tako da se je njihovo ime natisnilo od celice A1 do spodaj do števila listov.

Primer VBA # 3

V tem primeru se bomo naučili tiskati številke. Ta postopek je povsem enak kot smo videli v primeru-2. Za to sledite spodnjim korakom:

1. korak: Odprite modul in napišite podprocesuro.

Koda:

 Pod VBA_Examples3 () Konec Sub

2. korak: Razmislite o spremenljivki z uporabo DIM-a kot celote. Ker uporabljamo številke do vrste podatkov vrste Integer.

Koda:

 Pod VBA_Examples3 () Dim A kot celoten konec Pod

3. korak: Ponovno odprite zanko For-Next, kot je prikazano spodaj.

Koda:

 Pod VBA_Examples3 () Dim A kot celo število za naslednji konec konca pod

4. korak: Zdaj izberite območje celic, od koder želimo videti številko do zadnjega v sintaksi.

Koda:

 Pod VBA_Examples3 () Dim A kot celo število za A = 1 do 10 Naslednji A konec Pod

Korak 5: Zdaj določite položaj celice s spremenljivko A. Tukaj, drugo točko položaja v celici prikazuje številko stolpca. Ko smo izbrali 1, pričakujemo, da bomo videli številke od celice A1.

Koda:

 Pod VBA_Examples3 () Dim A kot celo število za A = 1 do 10 celic (A, 1) .Value = A Next A End Sub

6. korak: Zdaj zaženite kodo s pritiskom na tipko F8 ali s klikom na gumb Predvajaj. Videli bomo, da se številke generirajo od celice A1 do A10, začenši od 1 do 10 .

7. korak: Kaj če skušamo te številke dodati v drugi stolpec? Spremenite točko stolpca z 1 na 2. Ali dodajte drugo vrstico kode, kot je prikazano spodaj.

Koda:

 Pod VBA_Examples3 () Dim A kot celo število za A = 1 do 10 celic (A, 1) .Value = A Celice (A, 2) .Value = A Next A End Sub

8. korak: Ponovno zaženite celotno kodo s pritiskom na tipko F8 ali s klikom na gumb Predvajaj. Videli bomo isto številko, ki se začne od 1 do 10, natisnjeno v stolpcu B pa tudi iz celice B1 do B10.

Primer VBA št. 4

V tem primeru bomo videli, kako spremeniti barvo praznih celic iz izbranih obsegov. Za to smo uporabili isto številko kot v zgornjem primeru, vendar smo nekaj celic izbrisali, da smo dobili izhod.

1. korak: Odprite modul, napišite podprocesuro, kot je prikazano spodaj.

Koda:

 Pod VBA_Example4 () Konec Sub

2. korak: Določimo spremenljivko z uporabo DIM kot obseg, saj izbiramo izhodni obseg števil.

Koda:

 Pod VBA_Example4 () Dim A Kot obseg Konec Pod

3. korak: Zdaj nastavite to spremenljivko kot izbira

Koda:

 Pod VBA_Example4 () Dim A kot obseg Set A = izbira konec sub

4. korak: Z uporabo definirane spremenljivke A izberite območje števil in izberite xlCellTypeBlanks, da izberete samo prazne celice.

Koda:

 Pod VBA_Example4 () Dim A V območju obsega A = Izbira A.Cells.SpecialCells (xlCellTypeBlanks). Končni pod

5. korak: Zdaj, če želite spremeniti notranjo barvo praznih celic, uporabite Interior.Color in izberite barvo, s katero želimo poudariti prazne celice. Za določitev barve uporabite tip vbBlue ali vbGreen. Uporaba vb je nujna.

Koda:

 Pod VBA_Example4 () Dim A kot območje obsega A = izbira A.Cells.SpecialCells (xlCellTypeBlanks) .Interior.Color = vbBlue End Sub

6. korak: Zdaj izberite območje celic in nato zaženite kodo s pritiskom na tipko F8 ali s klikom na gumb Predvajaj. Videli bomo, da sta celici A4 in A7, ki sta bili prazni, zdaj označeni z modro barvo, kot je prikazano spodaj.

Prednosti in slabosti primerov Excela VBA

  • VBA povečuje učinkovitost dela.
  • S tem želimo naenkrat zmanjšati ponavljajoče se naloge.
  • Ustvarimo lahko katero koli vrsto makrov, ki jih želimo.
  • Makro lahko posnamemo tudi, če kodiranje ni enostavno.
  • Ljudje, ki nimajo znanja ali ideje o kodiranju, lahko uporabljajo makro VBA.

Stvari, ki jih je treba zapomniti

  • Začetnik v VBA ne pozabite shraniti kode v formatu excel, ki je omogočen v makro. To nam bo omogočilo, da bomo kodo obdržali v isti datoteki.
  • Vedno sestavite celotno kodo, čeprav je koda iz ene vrstice. To nam bo zmanjšalo čas razhroščevanja, če se med izvajanjem kode srečujete s kakršno koli napako.
  • Vedno začnite proces učenja VBA ali katerega koli drugega jezika kodiranja z majhno in enostavno kodo. To bo omogočilo boljše razumevanje in zaupanje.

Priporočeni članki

To je vodnik za primere VBA v Excelu. Tukaj smo razpravljali o nekaj uporabnih primerih makro kode VBA v Excelu, skupaj s predlogo za prenos Excel. Ogledate si lahko tudi druge naše predlagane članke -

  1. Zbirka VBA (primeri)
  2. VBA IF Izjave | Predloge Excel
  3. Kako uporabljati funkcijo razvrščanja Excel VBA?
  4. VBA, medtem ko je zanka (primeri s predlogo Excel)
  5. VBA Environment

Kategorija:

VBA