Wenn Sie den heutigen Wochentag automatisch aktualisieren möchten, ist dieser Artikel genau das Richtige für Sie. Dieser Artikel konzentriert sich darauf, dem Benutzer den aktuellen Wochentag über msgbox in vba zu aktualisieren.
Frage): Ich möchte einen Code, um den Wochentag zu bestimmen.
Wir müssen die folgenden Schritte ausführen, um den VB-Editor zu starten
- Klicken Sie auf die Registerkarte Entwickler
- Wählen Sie aus der Gruppe Code die Option Visual Basic
- Klicken Sie auf Einfügen und dann auf Modul
- Dadurch wird ein neues Modul erstellt
- Geben Sie den folgenden Code in das Modul ein
Sub TodaysDay()
Select Case DatePart("w", Date, vbMonday)
Fall 1
MsgBox "Mo"
Fall 2
MsgBox "Di"
Fall 3
MsgBox "Mi"
Fall 4
MsgBox "Do"
Fall 5
MsgBox "Fr"
Fall 6
MsgBox "Sa"
Fall 7
MsgBox "Sonne"
Auswahl beenden
End Sub
Notiz: Das heutige Datum ist der 5. Juni 2015, also Freitag
„vbMontag“ wird verwendet, um Montag als ersten Tag der Woche zurückzugeben; Wenn Sonntag der erste Tag der Woche ist, müssen Sie verwenden „vbSonntag“
- Drücken Sie die Tastenkombination ALT + F8, um das Makrofenster zu öffnen
- Wählen Sie das Makro aus, das Sie gerade erstellt haben
- Klicken Sie auf Ausführen und wir erhalten den Namen des heutigen Datums.
- Wenn Sie das Format von Fr auf Freitag ändern möchten
- Sie müssen geringfügige Änderungen am Code vornehmen
Sub TodaysDay()
Select Case DatePart("w", Date, vbMonday)
Fall 1
MsgBox "Montag"
Fall 2
MsgBox "Dienstag"
Fall 3
MsgBox "Mittwoch"
Fall 4
MsgBox "Donnerstag"
Fall 5
MsgBox "Freitag"
Fall 6
MsgBox "Samstag"
Fall 7
MsgBox "Sonntag"
Auswahl beenden
End Sub
- Diesmal können Sie den vollständigen Namen des Tages anzeigen.
In diesem können wir das VBA-Nachrichtenfeld verwenden, um den Benutzer über den aktuellen Wochentag zu benachrichtigen.
