Als u de dag van de week van vandaag automatisch wilt bijwerken, dan is dit artikel iets voor u. Dit artikel richt zich op het updaten van de gebruiker de huidige dag van de week via msgbox in vba.
Vraag): Ik wil een code om de dag van de week te bepalen.
We moeten de onderstaande stappen volgen om VB-editor te starten
- Klik op het tabblad Ontwikkelaar
- Selecteer in de codegroep Visual Basic
- Klik op Invoegen en vervolgens op Module
- Hiermee wordt een nieuwe module gemaakt
- Voer de volgende code in de module in:
Sub Vandaag()
Selecteer Case DatePart("w", Date, vbMonday)
Zaak 1
MsgBox "Ma"
Geval 2
MsgBox "Di"
Geval 3
MsgBox "wo"
Geval 4
MsgBox "Donder"
Geval 5
MsgBox "Vrij"
Geval 6
MsgBox "Zat"
Geval 7
MsgBox "Zon"
Einde Selecteren
Einde sub
Opmerking: De datum van vandaag is 5 juni 2015, d.w.z. vrijdag
“vbmaandag” wordt gebruikt om maandag als eerste dag van de week terug te geven; in het geval dat zondag de eerste dag van de week is, moet je gebruiken “vbzondag”
- Druk op de sneltoets ALT + F8 om het macrovenster te openen
- Selecteer de macro die u zojuist hebt gemaakt
- Klik op Uitvoeren en we krijgen de naam van de datum van vandaag.
- Als u het formaat wilt wijzigen van vr naar vrijdag
- U moet kleine wijzigingen in de code aanbrengen
Sub Vandaag()
Selecteer Case DatePart("w", Date, vbMonday)
Zaak 1
MsgBox "Maandag"
Geval 2
MsgBox "Dinsdag"
Geval 3
MsgBox "Woensdag"
Geval 4
MsgBox "Donderdag"
Geval 5
MsgBox "Vrijdag"
Geval 6
MsgBox "Zaterdag"
Geval 7
MsgBox "Zondag"
Einde Selecteren
Einde sub
- Deze keer kunt u de volledige naam van de dag weergeven.
Hierin kunnen we het VBA-berichtvenster gebruiken om de gebruiker op de hoogte te stellen van de huidige dag van de week.
