Kako u trenu prikazati mali dijaloški prozor
Želite li u svoj VBA program uključiti kratke, interaktivne informacije za korisnika? Ne morate nužno stvoriti složeni dijaloški prozor (UserForm).
Za male zadatke možete pozvati unaprijed definirani prozor s porukom pomoću funkcije MsgBox (kratica znači "Message Box").
Naredbu pozivate u sljedećem obliku:
Povratna vrijednost = MsgBox (tekst prozora, vrsta prozora, naslov prozora)
Pomoću parametra Window text prosljeđujete tekst koji želite prikazati u prozoru, na primjer tekst "Ovaj tekst se pojavljuje u prozoru poruke". Unesite tekst pod navodnike.
Parametar vrste prozora govori Excelu kako bi prozor trebao izgledati. Za to su dostupne unaprijed definirane konstante. Najvažnije konstante su:
vbOKSamo: Prikazuje samo gumb "OK"
vbOKOdustani: Prikazuje gumbe U redu i Odustani.
vbRetryIgnoreCancel: Prikazuje gumbe Ponovi, Zanemari i Odustani.
Parametrom Window title prosljeđujete tekst koji se prikazuje u zaglavlju prozora. Također stavite ovu vrijednost pod navodnike. Primjer je izraz "Ovo je naslov prozora".
Sljedeća programska linija prikazuje primjer korištenja funkcije MsgBox:
Prikaži podprozor
a = MsgBox ("Ovaj se tekst pojavljuje u prozoru poruke", vbokcancel, "Ovo je naslov prozora")
Kraj podm
Ako Excel izvrši naredbu, dobit ćete prozor sa sljedeće slike:
Možete upitati koji gumb korisnik koristi za zatvaranje prozora pomoću varijable povratne vrijednosti, u slučaju primjera programa, koristeći varijablu "a". Moguće povratne vrijednosti su vbOk, vbCancel, vbRetry, vbIgnore za odgovarajuće gumbe.
