Om du vill automatiskt uppdatera dagens dag i veckan är den här artikeln något för dig. Denna artikel fokuserar på att uppdatera användaren den aktuella veckodagen via msgbox i vba.
Fråga): Jag vill ha en kod för att bestämma veckodagen.
Vi måste följa stegen nedan för att starta VB -editor
- Klicka på fliken Utvecklare
- Välj Visual Basic i kodgruppen
- Klicka på Infoga och sedan Modul
- Detta skapar en ny modul
- Ange följande kod i modulen
Sub TodaysDay ()
Välj Case DatePart ("w", Date, vbMonday)
Fall 1
MsgBox "mån"
Fall 2
MsgBox "Tis"
Fall 3
MsgBox "Ons"
Fall 4
MsgBox "Thur"
Fall 5
MsgBox "fre"
Fall 6
MsgBox "lör"
Fall 7
MsgBox "Sun"
Avsluta Välj
Avsluta Sub
Notera: Dagens datum är den 5 juni 2015, dvs. fredag
“VbMåndag” används för att återvända måndag som första dag i veckan; om söndag är den första dagen i veckan måste du använda den “VbSunday”
- Tryck på ALT + F8 snabbtangenten för att öppna makrofönstret
- Välj makrot som du just har skapat
- Klicka på Kör så får vi namnet på dagens datum.
- Om du vill ändra formatet från fre till fredag
- Du måste göra små ändringar i koden
Sub TodaysDay ()
Välj Case DatePart ("w", Date, vbMonday)
Fall 1
MsgBox "måndag"
Fall 2
MsgBox "tisdag"
Fall 3
MsgBox "onsdag"
Fall 4
MsgBox "torsdag"
Fall 5
MsgBox "fredag"
Fall 6
MsgBox "lördag"
Fall 7
MsgBox "söndag"
Avsluta Välj
Avsluta Sub
- Den här gången kommer du att kunna visa dagens fullständiga namn.
I detta kan vi använda VBA -meddelanderuta för att meddela användaren om den aktuella veckodagen.
