Excel VBA

Jeg har gennemført kurset Excel VBA. Jeg var skeptisk overfor måden at lære på inden jeg gik i gang, men jeg må sige at min skepsis blev gjort til skamme. Lige fra første lektion følte jeg at jeg virkelig lærte noget.

Thors tilgang til materialet er perfekt. Gennem løbende øvelser får man lejlighed til at afprøve teorien i praksis.

Beder man om lidt hjælp, så kommer den lynhurtig – men det er kun et hint og så kan man selv finde ud af resten – det er perfekt for herved tvinges eleven til at tænke sig om – mon det kan bruges i folkeskolen også :).

Kurset er ALLE pengene værd og kan køres når man har tid og er motiveret. Holder man for lange pauser i undervisningen, så komme Thors pegefinger i form af en mail og så er det bare om at komme i gang igen :)

Jacob Madsen, Mettler-Toledo A/S

Excel VBA

Det har været godt at selv kunne bestemme farten, samt bruge al den tid man nu selv synes for at lave opgaverne.

Det har været et hårdt kursus, men jeg har virkelig lært meget og er mere rustet til at lave nye makroer, hvor jeg så selv kan gå i i VBA og lave rettelser, fordi jeg kan forstå programmet.

Margit Gravgaard Larsen, Novo Nordisk A/S

Excel VBA

Det har været rart at man selv kan bestemme tempoet og hvornår man laver opgaverne. Man kan også få hjælp til at få løst opgaverne anderledes, samt få hjælp til andre opgaver. Jeg synes også det har været sjovt at man ikke får det hele serveret, men skal søge lidt information selv.

Laila Jensen, Statens Serum Institut

Excel VBA

Øvelserne kan tages i det tempo, der passer en, hvilket gør det muligt at gå i dybden med udvalgt teori og øvelser og inddrage arbejdsrelaterede udfordringer/problemstillinger direkte i kurset.

Der er hurtig respons fra underviser, man bliver udfordret på opgaverne og får ikke lov til og gå videre før en opgave er løst tilfredsstillende.

Kan anbefale kurset til andre.

Brian Lind Olsen, OUH Odense Universitetshospital

Excel VBA

Meget hurtigt og kompetent feedback...

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

Veltilrettelagte øvelser

Claus Witfelt, Flyvevåbnets Officersskole

< >
Se flere referencer

Arbejde med dokumenter

På linje med arkfanerne er der 2-3 interessante objekter man kan tage fat i når man skal arbejde med dokumenter - det er Workbooks, ActiveWorkbook og ThisWorkbook.

Workbooks

Er en samling af alle åbne regneark. Her følger et par eksempler på anvendelse:

Workbooks("salg").Activate

Vil aktivere regnearket salg.xls.

Dim w As Workbook
For Each w In Workbooks
  If w.Name <> ThisWorkbook.Name Then 
    w.Close savechanges:=True 
  End If 
Next w

Vil gennemløbe alle åbne regnark og lukke alle undtagen det regneark, der indeholder makroen.

ThisWorkbook

Er et Workbook objekt, der peger på det regneark (den fil), der indeholder makroen.

ActiveWorkbook

Er igen et Workbook objekt, der, som navnet antyder, peger på aktive regneark. ActiveWorkbook bruger vi ofte sammen med Save eller SaveAs

ActiveWorkbook.Save
ActiveWorkbook.SaveAs

 

Workbook objektet har naturligvis en lang række metoder og egenskaber, der kan være nyttige i forskellige sammenhænge. Find dem ved at skrive ActiveWorkbook.

 


 

 

Dialoger

Der findes et Dialogs objekt, der kan bruges i relation til det at gemme regneark, men også i andre sammenhænge

Application.Dialogs(xlDialogSaveAs).Show "test"

Vil åbne gem som dialogen og foreslå at regnearket gemmes i roden på c-drevet med navnet test.xls.

Har du problemer med at styre hvilken mappe filen gemmes i kan du i stedet prøve at bruge

Filnavn = Application.GetSaveAsFilename("c:\", , , "Vælg filnavn")

Den vil åbne en dialog, hvor brugeren har mulighed for at vælge sti og skrive filnavn. Vær opmærksom på, at filen ikke bliver gemt, men at du få det valgte filnavn og sti ind i variablen Filnavn. Efterfølgende skal du så bruge ActiveWorkbook.SaveAs for at gemme. Og du kan spørge på om Filnavn = False for at finde ud af om brugeren faktisk har valgt noget i dialogen.

 


 

Variable

Også når vi arbejder med dokumenter er det en god idé at bruge variable til de forskellige dokumenter man arbejder med

Dim wkbResultat As Workbook
Set wkbResultat = ActiveWorkbook    ' eller
Set wkbResultat = Workbooks.Open(sFilnavn)

 


 

Findes dokumentet

If Dir("c:\mitregneark.xls") <> "" Then 

En lille film...

Se, hvordan man kan samle data sammen fra en række filer:

 

Når du har betalt for kurset får du adgang til øvelser til hver lektion. Og når du har fået godkendt din besvarelse får du desuden adgang til mine løsningsforslag med ekstra tips og trix.