woensdag 10 september 2014

VBA object Worksheets

In een vorig punt hebben we de VBA-code gezien om tekst te plaatsen in een cel van het geselecteerd werkblad via het object Cells of Range. In dit punt bespreken we het object Worksheets. We gaan verder met het vorige document "invullen.xlsm".
Met het object Worksheets kunnen we bepalen in welk werkblad de tekst gaat komen. In het punt van gisteren hebben reeds het werkblad "Invullen" aangebracht".

We selecteren het werkblad "Blad1".
  • Klik op onderaan op het werkblad "Blad1".

We brengen in de module "mdlInvullen2" een nieuwe subroutine "Invullen3" aan.
  • Gebruik de sneltoets ALT F11 om de terug naar de visual basic editor te gaan.
  • Plaats de cursor onder de subroutine "Invullen2".
  • Typ "Sub Invullen3".
  • Druk op de toets Enter.

Automatisch wordt de subroutine afgesloten met "End Sub".

  • Plaats de cursor tussen "Sub Invullen3" en "End Sub".
Om iets naar een bepaald werkblad te schrijven kan je het object "Worksheets" gebruiken.
  • Typ worksheets(
In een tip wordt een index gevraagd. Dit kan de naam van het werkblad zijn of een getal dat aangeeft het hoeveelste werkblad dit is.
Je kan ofwel worksheets("Invullen") gebruiken. Maar ook worksheets(2) is mogelijk.
We kiezen voor de naam van het werkblad. We wensen dat de tekst nu verschijnt in de cel A5.

  • Typ "Invullen").Cells(5,1).value = "Hier iets invullen"

We testen de code.
  • Plaats de cursor in de regel van sub Invullen3
  • Klik op de pictogram met groene pijl.

We gaan terug naar Excel. Het werkblad "Blad1" is nog steeds geselecteerd.

  • Klik onderaan op het tabblad "Invullen" om dit werkblad te selecteren.

We merken dat onze tekst in cel A5 is verschenen.