Excel VBA kursus - Introduktion til VBA

Excel VBA

Hurtig response på opgaver.

Udfordrende opgaver.

Flemming Pedersen, Semco Maritime

Excel VBA

Det har været meget nærværende og personlig fjernundervisning med hurtige svar på spørgsmål og feedback på opgaver. Der har været stor engagement og ejerskab fra underviserens side.

Det faglige niveau har været vekslende mellem "begynder" og "ekspert" opgaver.

Brian Deleuran, Radiometer

Excel VBA

Meget hurtigt og kompetent feedback...

Sparring på den opgave, som jeg sidder og arbejder med.

Veltilrettelagte øvelser

Claus Witfelt, Flyvevåbnets Officersskole

Excel VBA

Det er rart at kunne tage kurset i sit eget tempo, når det lige passer ind, men det giver også en risiko for at det lige bliver langstrækt nok, men så er det godt underviseren kan holde én lidt i ørerne med mails

Eva Bonne Alkærsig, EBA InterrimControlling

Excel VBA

At jeg kan fordybe når jeg har tid og lyst, er super.

Virkelig hurtig respons fra underviseren - næsten døgnet rundt :)

Øvelserne indeholdt hvad jeg skulle bruge, for at komme videre med egne vba-projekter.

At man kunne sammenligne egne løsninger med underviserens var lærerigt.

Henrik Boss, Marel Bornholm

< >

Se flere referencer

Hændelser

Ud over at være objektorienteret er VBA også hændelsesbaseret. Det betyder, at man kan skrive kode, der knytter sig til forskellige hændelser omkring regnearket. Lad os se på et lille eksempel. Dobbelt klik på ThisWorkbook. De to rullepaneler i toppen af arbejdsområdet giver mulighed for at vælge at skrive kode til forskellige hændelser omkring regnearket. Koden her knytter sig til den hændelse, at regnearket åbnes. Sådan en kode kalder man også en hændelsesprocedure.

Dobbeltklikker man på Ark1 til Ark3 kan man skrive hændelsesprocedurer til hændelser omkring de enkelte arkfaner. Vi kommer til at arbejde mere med hændelser når vi skal kigge på userforms.

Headers og Footeres på print

En typisk udfordring er, at man ønsker at få sat Header og Footer på sit print. Denne lille hændelsesprocedure hjælper med det:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
  Dim wks As Worksheet
  Dim sFilnavn As String
  Dim sFirmanavn As String
  sFirmanavn = Worksheets("Profit").Range("A1").Value
  sFilnavn = ThisWorkbook.FullName
  For Each wks In ThisWorkbook.Worksheets
    With wks.PageSetup
      .LeftFooter = sFirmanavn
      .CenterFooter = ""
      .RightFooter = sFilnavn
    End With
  Next
End Sub