VBA -løsning til Excel: Vis meddelelsesvinduer med lethed

Anonim

Sådan vises et lille dialogvindue med det samme

Vil du inkludere korte, interaktive oplysninger til brugeren i dit VBA -program? Du behøver ikke nødvendigvis at oprette et komplekst dialogvindue (UserForm).

Ved små opgaver kan du hente et foruddefineret meddelelsesvindue ved hjælp af funktionen MsgBox (forkortelsen står for "Beskedboks").

Du kalder kommandoen i følgende form:

Returværdi = MsgBox (vinduetekst, vindustype, vinduetitel)

Med parameteren Vinduetekst sender du den tekst, du vil vise i vinduet, f.eks. Teksten "Denne tekst vises i et meddelelsesvindue". Indtast teksten i anførselstegn.

Vinduetstypeparameteren fortæller Excel, hvordan vinduet skal se ud. Foruddefinerede konstanter er tilgængelige til dette. De vigtigste konstanter er:

vbOKKun: Viser kun en "OK" -knap

vbOKCancel: Viser knapperne OK og Annuller.

vbRetryIgnoreCancel: Viser knapperne Prøv igen, Ignorer og Annuller.

Med parameteren Window title sender du en tekst, der vises i overskriften i vinduet. Sæt også denne værdi i anførselstegn. Et eksempel er sætningen "This is the window title".

Følgende programlinje viser brugen af MsgBox -funktionen ved hjælp af et eksempel:

Vis undervindue

a = MsgBox ("Denne tekst vises i meddelelsesvinduet", vbokcancel, "This is the window title")

Afslut Sub

Hvis Excel udfører kommandoen, får du vinduet fra følgende figur:

Du kan spørge, hvilken knap brugeren bruger til at lukke vinduet ved hjælp af variabelværdien for returværdi, i tilfælde af programeksemplet, ved hjælp af variablen "a". Mulige returværdier er vbOk, vbCancel, vbRetry, vbIgnore for de respektive knapper.