Ako želite automatski ažurirati današnji dan u tjednu, onda je ovaj članak za vas. Ovaj članak se fokusira na ažuriranje korisnika trenutnog dana u tjednu putem msgbox -a u vba.
Pitanje): Želim kôd za određivanje dana u tjednu.
Moramo slijediti korake u nastavku za pokretanje VB uređivača
- Kliknite karticu Developer
- Iz grupe kodova odaberite Visual Basic
- Pritisnite Umetni pa Modul
- Ovo će stvoriti novi modul
- Unesite sljedeći kôd u Modul
Sub DanaysDay ()
Odaberite Date DatePart Case ("w", Date, vbMonday)
Slučaj 1
MsgBox "Pon"
Slučaj 2
MsgBox "uto"
Slučaj 3
MsgBox "srijeda"
Slučaj 4
MsgBox "Thur"
Slučaj 5
MsgBox "Pet"
Slučaj 6
MsgBox "Sat"
Slučaj 7
MsgBox "Sunce"
Kraj Odaberite
Kraj podm
Bilješka: Današnji datum je 5. lipnja 2015., odnosno petak
"Vbponedjeljak" koristi se za povratak u ponedjeljak kao prvi dan u tjednu; u slučaju da je nedjelja prvi dan u tjednu onda morate koristiti “VbSunday”
- Pritisnite ALT + F8 tipku prečaca da biste otvorili prozor Makro
- Odaberite makronaredbu koju ste upravo stvorili
- Pritisnite Run i dobit ćemo naziv današnjeg datuma.
- Ako želite promijeniti format s petka na petak
- Morate napraviti male promjene u kodu
Sub DanaysDay ()
Odaberite Date DatePart Case ("w", Date, vbMonday)
Slučaj 1
MsgBox "Ponedjeljak"
Slučaj 2
MsgBox "Utorak"
Slučaj 3
MsgBox "srijeda"
Slučaj 4
MsgBox "Četvrtak"
Slučaj 5
MsgBox "petak"
Slučaj 6
MsgBox "Subota"
Slučaj 7
MsgBox "Nedjelja"
Kraj Odaberite
Kraj podm
- Ovaj put ćete moći prikazati puno ime dana.
U ovom slučaju možemo upotrijebiti okvir s porukom VBA za obavještavanje korisnika o trenutnom danu u tjednu.
