Vba

Datum (und Uhrzeit

Date Time

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:

Jahr eines Datums in Excel VBA

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 Datum

firstDate = DateValue('19. Januar 2020')
secondDate = DateAdd('d', 3, firstDate)

MsgBox secondDate

Ergebnis:

DatumHinzufügen

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 addiert
MsgBox jetzt

Ergebnis:

Aktuelles Datum und Uhrzeit

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

Stunde der aktuellen Uhrzeit

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:

Zeitwert

Um nun klar zu sehen, dass Excel Zeiten intern als Zahlen zwischen 0 und 1 behandelt, fügen Sie die folgenden Codezeilen hinzu:

KeinerundWie Doppelt
y = Zeitwert ('09: 20: 01 ')
MsgBox und

Ergebnis:

Zeitseriennummer

1/8 abgeschlossen! Erfahre mehr über Daten und Zeiten >
Gehe zum nächsten Kapitel: Veranstaltungen



^