Jahr, Monat, Tag eines Datums | DatumHinzufügen | Aktuelles Datum und Uhrzeit | Stunde, Minute, Sekunde | Zeitwert
Erfahren Sie, wie Sie mit . arbeiten Daten und Uhrzeiten in Excel VBA .
Platziere a Befehlstaste auf Ihrem Arbeitsblatt und fügen Sie die folgenden Codezeilen hinzu. Um die Codezeilen auszuführen, klicken Sie auf die Befehlsschaltfläche auf dem Blatt.
Jahr, Monat, Tag eines Datums
Das folgende Makro ruft das Jahr eines Datums ab. Um ein Datum zu deklarieren, verwenden Sie die Dim-Anweisung. Um ein Datum zu initialisieren, verwenden Sie die DateValue-Funktion.
Code:
KeinerBeispielDatumWie Datum
exampleDate = DateValue('19. Januar 2020')
MsgBox-Jahr (BeispielDatum)
Ergebnis:
Hinweis: Verwenden Sie Monat und Tag, um Monat und Tag eines Datums abzurufen.
DatumHinzufügen
Um einem Datum eine Anzahl von Tagen hinzuzufügen, verwenden Sie die Funktion DateAdd. Die DateAdd-Funktion hat drei Argumente. Geben Sie 'd' für das erste Argument ein, um Tage hinzuzufügen. Geben Sie 3 für das zweite Argument ein, um 3 Tage hinzuzufügen. Das dritte Argument stellt das Datum dar, zu dem die Anzahl der Tage addiert wird.
Was bedeutet Counta in Excel?
Code:
Keinererste VerabredungWie Datum, zweites DatumWie DatumfirstDate = DateValue('19. Januar 2020')
secondDate = DateAdd('d', 3, firstDate)
MsgBox secondDate
Ergebnis:
Hinweis: Ändern Sie 'd' in 'm', um einem Datum eine Anzahl von Monaten hinzuzufügen. Platzieren Sie Ihren Cursor im Visual Basic-Editor auf DateAdd, und klicken Sie auf F1, um Hilfe zu den anderen Intervallbezeichnern zu erhalten. Die Daten sind im US-Format. Monate zuerst, Tage dann. Diese Art von Format hängt von Ihren Windows-Regionaleinstellungen ab.
Aktuelles Datum und Uhrzeit
Um das aktuelle Datum und die aktuelle Uhrzeit abzurufen, verwenden Sie die Jetzt-Funktion.
Code:
wie man die Summe einer Spalte in Excel addiertMsgBox jetzt
Ergebnis:
Stunde, Minute, Sekunde
Um die Stunde einer Uhrzeit zu erhalten, verwenden Sie die Stundenfunktion.
Code:
MsgBox-Stunde (jetzt)Ergebnis:
Excel-Diagramm zeigt Daten nicht korrekt an
Hinweis: Verwenden Sie Minute und Sekunde, um die Minute und Sekunde einer Zeit zu erhalten.
Zeitwert
Die TimeValue-Funktion konvertiert eine Zeichenfolge in eine Zeitseriennummer. Die Seriennummer der Uhrzeit ist eine Zahl zwischen 0 und 1. Zum Beispiel wird Mittag (die Hälfte des Tages) als 0,5 dargestellt.
Code:
MsgBox TimeValue('9:20:01 Uhr')Ergebnis:
Um nun klar zu sehen, dass Excel Zeiten intern als Zahlen zwischen 0 und 1 behandelt, fügen Sie die folgenden Codezeilen hinzu:
KeinerundWie Doppelty = Zeitwert ('09: 20: 01 ')
MsgBox und
Ergebnis:
Gehe zum nächsten Kapitel: Veranstaltungen