Hvis du vil oppdatere dagens ukedag automatisk, er denne artikkelen noe for deg. Denne artikkelen fokuserer på oppdatering av brukeren den gjeldende ukedagen via msgbox i vba.
Spørsmål): Jeg vil ha en kode for å bestemme ukedagen.
Vi må følge trinnene nedenfor for å starte VB -editor
- Klikk på kategorien Utvikler
- Velg Visual Basic fra kodegruppen
- Klikk på Sett inn og deretter modul
- Dette vil opprette en ny modul
- Skriv inn følgende kode i modulen
Sub TodaysDay ()
Velg Case DatePart ("w", Date, vbMonday)
Sak 1
MsgBox "man"
Sak 2
MsgBox "ti"
Sak 3
MsgBox "onsdag"
Sak 4
MsgBox "Thur"
Sak 5
MsgBox "fre"
Sak 6
MsgBox "Sat"
Sak 7
MsgBox "Sun"
Avslutt Velg
Slutt Sub
Merk: Dagens dato er 5. juni 2015, dvs. fredag
“VbManday” brukes til å returnere mandag som første ukedag; i tilfelle søndag er den første dagen i uken, må du bruke den “VbSunday”
- Trykk ALT + F8 hurtigtast for å åpne makrovinduet
- Velg makroen du nettopp har opprettet
- Klikk på Kjør, så får vi navnet på dagens dato.
- Hvis du vil endre formatet fra fre til fredag
- Du må gjøre små endringer i koden
Sub TodaysDay ()
Velg Case DatePart ("w", Date, vbMonday)
Sak 1
MsgBox "mandag"
Sak 2
MsgBox "tirsdag"
Sak 3
MsgBox "Onsdag"
Sak 4
MsgBox "torsdag"
Sak 5
MsgBox "fredag"
Sak 6
MsgBox "lørdag"
Sak 7
MsgBox "søndag"
Avslutt Velg
Slutt Sub
- Denne gangen vil du kunne vise hele navnet på dagen.
I dette kan vi bruke VBA -meldingsboksen til å varsle brukeren om gjeldende ukedag.
