Excel VBA-voorbeelden

Toen ik begon te werken en VBA-macro's te leren, was ik heel erg in de war waar ik moest beginnen. We hebben VBA Editor al gezien met alle definities van VBA Editor Window-opties en -tabbladen. Als beginner weten we altijd niet hoe we eraan moeten beginnen totdat we er een vinden. Dit artikel is de oplossing voor diegenen die moeite hebben met het gebruiken en leren van VBA-voorbeelden en het maken van macro's. We hebben allemaal te maken gehad met het moment dat bepaalde dingen in Excel geautomatiseerd hadden kunnen worden met Macro. Maar iemand die niet weet hoe hij VBA moet gebruiken, kan er geen maken. Dit zal een handige gids zijn voor degenen die nog niet bekend zijn met VBA Macro-codering.

Voorbeelden van VBA in Excel voor beginners

Hieronder staan ​​de voorbeelden van VBA in Excel:

U kunt deze VBA-voorbeelden Excel-sjabloon hier downloaden - VBA-voorbeelden Excel-sjabloon

VBA-voorbeeld 1

Laten we een eenvoudig voorbeeld bekijken van het gebruik van VBA-codering. Volg hiervoor de onderstaande stappen:

Stap 1: Open een VBA-module waar we onze code zullen schrijven vanaf het menutabblad Invoegen zoals hieronder getoond.

Stap 2: Schrijf nu de subprocedure van VBA-macro in een willekeurige naam.

Code:

 Sub VBA_Examples1 () End Sub

Stap 3: Definieer een variabele met behulp van DIM waar we getallen opslaan als gehele getallen.

Code:

 Sub VBA_Examples1 () Dim A als Integer End Sub

Stap 4: Geef nu een willekeurig nummer aan de hierboven gedefinieerde variabele, zoals hieronder weergegeven.

Code:

 Sub VBA_Examples1 () Dim A als geheel getal A = 100 End Sub

Stap 5: Nu zullen we het berichtenvak gebruiken om de waarde af te drukken die is opgeslagen in variabele A.

Code:

 Sub VBA_Examples1 () Dim A als geheel getal A = 100 MsgBox A End Sub

Stap 6: Voer de code uit door op F8 te drukken of door op de knop Afspelen onder de menubalk te klikken. We zien het berichtenvak met de waarde 100 erin.

Code:

 Sub VBA_Examples1 () Dim A als geheel getal A = 100 MsgBox A End Sub

Stap 7: Dit had ook kunnen gebeuren met de functie Debug Print, waarvan de waarden worden gezien in het venster Direct. ( Opmerking: druk op Ctrl + G om direct venster te openen)

Code:

 Sub VBA_Voorbeelden1 () Dim A als geheel getal A = 100 Debug. Druk een einde af Sub

VBA-voorbeeld 2

In dit voorbeeld zien we een ander voorbeeld waarbij we de For-Next-lus gebruiken om de bladnamen af te drukken. Volg hiervoor de onderstaande stappen:

Stap 1: Open een module en schrijf de subprocedure zoals hieronder weergegeven. We kunnen elke naam gebruiken om dit te definiëren.

Code:

 Sub VBA_Examples2 () End Sub

Stap 2: Kies een variabele als een geheel getal. We kunnen de naamvariabele kiezen zoals in voorbeeld-1.

Code:

 Sub VBA_Examples2 () Dim A als Integer End Sub

Stap 3: Open een For-Next-lus zoals hieronder weergegeven.

Code:

 Sub VBA_Examples2 () Dim A als geheel getal voor Next A End Sub

Stap 4: Selecteer de celpositie van waaruit we de bladnamen willen zien. Omdat we hier geen koptekstreferentie hebben, kunnen we beginnen met cel 1.

Code:

 Sub VBA_Voorbeelden2 () Dim A als geheel getal voor A = 1 voor vellen. Tellen Volgende A Einde Sub

Stap 5: Nu wijzen we de variabele A met celwaarde toe om de bladnaam te zien, zoals hieronder wordt weergegeven.

Code:

 Sub VBA_Voorbeelden2 () Dim A als geheel getal voor A = 1 tot vellen. Tel cellen (A, 1). Waarde = Vellen (A). Naam Volgende A Einde Sub

Stap 6: Voer nu de code uit door op F8 te drukken of door op de knop Afspelen te klikken.

We zullen zien, omdat we 3 vellen hadden, allemaal standaard genoemd, dus hun naam werd afgedrukt van cel A1 tot hieronder tot het aantal vellen dat we hebben.

VBA-voorbeeld 3

In dit voorbeeld leren we hoe u de nummers kunt afdrukken. Dit proces is vrijwel hetzelfde als we hebben gezien in voorbeeld-2. Volg hiervoor de onderstaande stappen:

Stap 1: Open een module en schrijf de subprocedure.

Code:

 Sub VBA_Examples3 () End Sub

Stap 2: Beschouw een variabele met DIM als Integer. Aangezien we de getallen voor het gehele getal gebruiken, moet het gegevenstype worden gebruikt.

Code:

 Sub VBA_Examples3 () Dim A als Integer End Sub

Stap 3: Open opnieuw een For-Next-lus zoals hieronder weergegeven.

Code:

 Sub VBA_Examples3 () Dim A als geheel getal voor Next A End Sub

Stap 4: Selecteer nu het celbereik van waar we het nummer tot de laatste willen zien in Voor syntaxis.

Code:

 Sub VBA_Examples3 () Dim A als geheel getal voor A = 1 tot 10 Volgende A End Sub

Stap 5: Bevestig nu de celpositie met variabele A. Hier toont het tweede positiepunt in Cel het kolomnummer. Omdat we 1 hebben gekozen, verwachten we dat de cijfers vanaf cel A1 beginnen.

Code:

 Sub VBA_Examples3 () Dim A als geheel getal voor A = 1 tot 10 cellen (A, 1). Waarde = A Volgende A Einde Sub

Stap 6: Voer nu de code uit door op F8 te drukken of door op de knop Afspelen te klikken. We zullen zien dat de getallen worden gegenereerd van cel A1 tot A10 vanaf 1 tot 10 .

Stap 7: Wat als we deze getallen in de tweede kolom proberen toe te voegen? Wijzig het kolompunt van 1 naar 2. Of voeg een andere coderegel toe, zoals hieronder wordt weergegeven.

Code:

 Sub VBA_Examples3 () Dim A als geheel getal voor A = 1 tot 10 cellen (A, 1). Waarde = A cellen (A, 2). Waarde = A Volgende A Einde Sub

Stap 8: Voer de volledige code opnieuw uit door op F8 te drukken of door op de knop Afspelen te klikken. We zien hetzelfde nummer vanaf 1 tot en met 10 in kolom B worden afgedrukt en ook van cel B1 tot B10.

VBA-voorbeeld 4

In dit voorbeeld zullen we zien hoe u de kleur van lege cellen uit de geselecteerde bereiken kunt wijzigen. Hiervoor hebben we hetzelfde nummer gebruikt als in het bovenstaande voorbeeld, maar we hebben enkele cellen verwijderd om de uitvoer te krijgen.

Stap 1: Open een module, schrijf de subprocedure zoals hieronder getoond.

Code:

 Sub VBA_Example4 () End Sub

Stap 2: Definieer een variabele met DIM als bereik, aangezien we het bestaande nummerbereik selecteren.

Code:

 Sub VBA_Example4 () Dim A als bereik-einde Sub

Stap 3: Stel nu deze variabele in als Selectie

Code:

 Sub VBA_Example4 () Dim A als bereik Set A = selectie Einde Sub

Stap 4: Selecteer nu het Getallenbereik met de gedefinieerde variabele A en kies xlCellTypeBlanks om alleen de lege cellen te selecteren.

Code:

 Sub VBA_Example4 () Dim A als bereikset A = selectie A.Cells.SpecialCells (xlCellTypeBlanks). Einde Sub

Stap 5: Gebruik nu Interior.Color om de binnenkleur van lege cellen te wijzigen en kies de kleur waarmee we de lege cellen willen markeren. Gebruik het type vbBlue of vbGreen om de kleur te definiëren. Het gebruik van vb is een must.

Code:

 Sub VBA_Example4 () Dim A als bereikset A = selectie A.Cells.SpecialCells (xlCellTypeBlanks) .Interior.Color = vbBlue End Sub

Stap 6: Selecteer nu het cellenbereik en voer vervolgens de code uit door op F8 te drukken of door op de knop Afspelen te klikken. We zullen zien dat de cel A4 en A7 die blanco waren, nu zijn gemarkeerd met een blauwe kleur, zoals hieronder wordt weergegeven.

Voors en tegens van Excel VBA-voorbeelden

  • VBA verhoogt de efficiëntie van het werk.
  • Hiermee willen we de repetitieve taken in één keer verminderen.
  • We kunnen elk type macro maken dat we willen.
  • We kunnen ook een Macro opnemen als het coderen niet eenvoudig is.
  • Mensen die geen kennis van codering of idee hebben, kunnen het moeilijk vinden om VBA Macro te gebruiken.

Dingen om te onthouden

  • Beginners in VBA moeten in gedachten houden om de code op te slaan in een Excel-compatibel Excel-formaat. Hiermee kunnen we de code in hetzelfde bestand bewaren.
  • Compileer altijd de volledige code, zelfs als de code uit één regel bestaat. Dit zal onze tijd in debuggen verminderen als u een fout tegenkomt terwijl de code wordt uitgevoerd.
  • Begin altijd het leerproces van VBA of een andere codeertaal met kleine en eenvoudige code. Dit geeft een beter begrip en vertrouwen.

Aanbevolen artikelen

Dit is een handleiding voor VBA-voorbeelden in Excel. Hier bespreken we enkele nuttige voorbeelden van VBA-macrocode in Excel samen met de downloadbare Excel-sjabloon. U kunt ook onze andere voorgestelde artikelen doornemen -

  1. VBA-collectie (voorbeelden)
  2. VBA IF-verklaringen | Excel-sjablonen
  3. Hoe de Excel VBA-sorteerfunctie te gebruiken?
  4. VBA While Loop (voorbeelden met Excel-sjabloon)
  5. VBA Environ

Categorie:

VBA