Simpel brugerdialog
Der er to interessante metoder til at skabe lidt dialog med brugeren.
MsgBox
Den første hedder MsgBox og bruges, som navnet antyder, til at vise en beskedboks på skærmen. Syntaksen for MsgBox er (hentet fra hjælpe funktionen):
MsgBox prompt[, buttons] [, title] [, helpfile, context]
Dette betyder at man skal angive en prompt, men de ting, der står i kantede parenteser behøver man ikke angive. Det betyder at vi f.eks. kan skrive
MsgBox "Velkommen til min makro"
Og det kommer så til at se sådan her ud:
Og skriver man
MsgBox "Velkommen til min makro", vbYesNo, "Min makro"
Kommer det til at se sådan her ud:
Bemærk, at når man kommer til MsgBox "Velkommen til min makro", dukker der en liste op over mulige knapper man kan sætte på sin MsgBox. vbYesNo dækker i virkeligheden over tallet 4! - det er én af mange konstanter, der er indbygget i VBA.
Returværdi fra en MsgBox
Det giver jo ikke meget mening at sætte knapper på sådan en MsgBox, hvis vi ikke kan finde ud af, hvilken af de to knapper brugeren har trykket på. Vil man have resultater ud af en MsgBox ser det sådan her ud:
svar = MsgBox("Velkommen til min makro", vbYesNo, "Min makro")
Selection.TypeText svar
Bemærk, at der er kommet parenteser på! - det er sådan vi signalerer, at vi gerne vil have et svar retur fra metoden. svar er "bare" en variabel, der bruges til at gemme værdien der kommer retur fra MsgBoxen - man bestemmer selv hvad sådanne variable skal hedde.
Knapper på msgbox'en
I eksemplet ovenfor kan du se, at vi kan sætte ja/nej knapper på msgbox'en, men vi har flere muligheder!
Prøv at skrive.
MsgBox "Velkommen til min makro", vbYesNo + vbExclamation + vbDefaultButton2, "Min makro"
>