Hvis du vil automatisk opdatere dagens ugedag, så er denne artikel noget for dig. Denne artikel fokuserer på at opdatere brugeren den aktuelle ugedag via msgbox i vba.
Spørgsmål): Jeg vil have en kode til at bestemme ugedagen.
Vi skal følge nedenstående trin for at starte VB -editor
- Klik på fanen Udvikler
- Vælg Visual Basic fra kodegruppen
- Klik på Indsæt derefter modul
- Dette vil oprette et nyt modul
- Indtast følgende kode i modulet
Sub DagaysDay ()
Vælg Case DatePart ("w", Date, vbMonday)
Sag 1
MsgBox "man"
Sag 2
MsgBox "Tue"
Sag 3
MsgBox "onsdag"
Sag 4
MsgBox "Thur"
Sag 5
MsgBox "fre"
Sag 6
MsgBox "Sat"
Sag 7
MsgBox "Sol"
Afslut Vælg
Afslut Sub
Bemærk: Dagens dato er 5. juni 2015, dvs. fredag
“VbMandag” bruges til at vende tilbage mandag som første ugedag; hvis søndag er den første dag i ugen, skal du bruge den “VbSunday”
- Tryk på ALT + F8 genvejstast for at åbne makrovindue
- Vælg den makro, du lige nu har oprettet
- Klik på Kør, og vi får navnet på dagens dato.
- Hvis du vil ændre formatet fra fre til fredag
- Du skal foretage små ændringer i koden
Sub DagaysDay ()
Vælg Case DatePart ("w", Date, vbMonday)
Sag 1
MsgBox "mandag"
Sag 2
MsgBox "tirsdag"
Sag 3
MsgBox "Onsdag"
Sag 4
MsgBox "torsdag"
Sag 5
MsgBox "fredag"
Sag 6
MsgBox "lørdag"
Sag 7
MsgBox "søndag"
Afslut Vælg
Afslut Sub
- Denne gang vil du kunne vise dagens fulde navn.
I dette kan vi bruge VBA -meddelelsesboks til at underrette brugeren om den aktuelle ugedag.
