Excel VBA

Godt med muligheden for sparring med underviser og forslag til andre løsningsmetoder end mine egne - selvom mine også fungerede.

Godt med muligheden for ingen tidsbegræsning for kurset. Havde jeg - pga. arb. situation, brug for.

Anja Hansen, TDC

Excel VBA

Hurtig respons.
Får en til at tænke selvstændigt.
Hjælpsom.

Ole Cordes Kristensen, Ce-Tec

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 wink

Eva Bonne Alkærsig, EBA InterrimControlling

Excel VBA

Det har været et supergodt kursus, hvor man ikke bare fik resultaterne leveret, der skulle tænkes meget !

Materialet har været rigtig godt, og det er da utroligt så tit der har været hjælp at hente, har set at underviseren var online, også om aftenen og tidlig morgen, rigtig rart, og der kom lynhurtigt respons tilbage på div. spørgsmål og besvarelser.

Helt sikkertet kursus og kursusform, jeg vil anbefale til andre.

Margit Solveig Kristoffersen, Socialpædagogerne Sydjylland

Excel VBA

Hurtige tilbagemeldinger på spørgsmål og øvelser. God opbygning af kurset

Sune Jeppson, Arbejdernes Landsbank

< >
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.