Beispiele für die Verwendung der Year-Funktion in Excel VBA

Die Year-Funktion in Excel VBA wird verwendet, um das Jahr aus dem angegebenen Datum abzurufen. Es gibt den Wert als ganze Zahl zurück. Diese Funktion wird häufig für die Arbeit mit Datums- und Uhrzeiten sowie für die Analyse und Sortierung von Daten verwendet.

Beispiel für die Verwendung der Funktion Year:

Dim myDate As Date

Dim myYear As Integer

myDate = #12/31/2025#

myYear = Year(myDate)

MsgBox myYear

End Sub

In diesem Beispiel deklarieren wir die Variablen MyDate und myYear. Dann weisen wir der Variablen MyDate den Wert #12/31/2025# zu, was das Datum des 31. Dezember 2025 darstellt. Dann rufen wir die Funktion Year auf und übergeben den Wert der Variablen MyDate an sie. Die Funktion gibt das Jahr zurück, das wir in die Variable myYear schreiben. Als nächstes geben wir den Wert der Variablen myYear in der MsgBox-Nachricht aus.

Daher wird durch die Ausführung dieses Codes eine Meldung mit dem Jahr 2025 ausgegeben.

Beispiele für die Verwendung der Year-Funktion in Excel VBA

Die Year-Funktion in Excel VBA wird verwendet, um das Jahr aus einem Datum oder einer Uhrzeit abzurufen.

Beispiele für die Verwendung der Funktion Year:

Extrahieren eines Jahres aus dem aktuellen Datum:

Dim currentDate As DateDim currentYear As IntegercurrentDate = DatecurrentYear = Year(currentDate)MsgBox "Текущий год: " & currentYear

Dim givenDate As DateDim givenYear As IntegergivenDate = #10/15/2025# ' указанная датаgivenYear = Year(givenDate)MsgBox "Год указанной даты: " & givenYear

Dim datesArray() As DateDim yearsArray() As IntegerDim i As IntegerdatesArray = Array(#10/15/2025#, #11/20/2025#, #12/25/2025#) ' массив датReDim yearsArray(0 To UBound(datesArray))For i = 0 To UBound(datesArray)yearsArray(i) = Year(datesArray(i))Next iMsgBox "Года из массива дат:" & vbNewLine & Join(yearsArray, ", ")

Die Year-Funktion kann bei der Arbeit mit Datums- und Uhrzeiten in Excel VBA nützlich sein, sodass Sie das Jahr bequem aus den angegebenen Werten abrufen können.

Detaillierte Erklärung der Funktion Year

Mit der Year-Funktion in Excel VBA können Sie das Jahr aus dem im Funktionsargument angegebenen Datum oder der Uhrzeit abrufen. Ein Jahr ist eine Ziffer, die normalerweise aus vier Ziffern besteht und zur Angabe von Zeiträumen verwendet wird.

Die Syntax der Funktion Year lautet wie folgt:

Beispiel für die Verwendung der Funktion Year:

Dim myDate As DatemyDate = #10/3/2025#yearValue = Year(myDate)MsgBox "Год: " & yearValue

In diesem Beispiel deklarieren wir die Variable MyDate und weisen ihr den Datumswert "10/3/2025" zu. Dann rufen wir die Funktion Year auf und übergeben den Wert der Variablen MyDate als Argument an sie. Das Ergebnis der Ausführung der Funktion Year wird in der Variablen yearValue gespeichert. Geben Sie dann den Wert der Variablen yearValue mit MsgBox aus.

In diesem Fall gibt die Funktion Year den Wert 2025 zurück, da das angegebene Datum dem Jahr 2025 entspricht.

Das Merkmal der Year-Funktion besteht darin, dass sie alle im Datum oder der Uhrzeit angegebenen temporären Komponenten ignoriert und nur das Jahr abruft. Wenn Sie beispielsweise den Datums- und Uhrzeitwert "10/3/2025 15:30:45" im Funktionsargument übergeben, gibt die Funktion Year immer noch den Wert 2025 zurück.

Mit der Funktion Year können Sie auch mit Datums- und Uhrzeitwerten arbeiten, die in einer Excel-Zelle gespeichert sind. Um dies zu tun, müssen Sie im Funktionsargument einen Verweis auf eine Zelle mit einem Datum oder einer Uhrzeit angeben.

Wenn beispielsweise der Datumswert "10/3/2025" in Zelle A1 gespeichert ist, gibt die folgende Formel in Excel das Jahr dieses Datums aus:

=Year(A1)

Das Ergebnis dieser Formel lautet 2025.

Die Funktion Year ist ein nützliches Werkzeug für die Arbeit mit Datums- und Uhrzeiten in Excel VBA. Sie können das Jahr bequem aus einem Datum oder einer Uhrzeit abrufen, was bei der Durchführung verschiedener Aufgaben im Zusammenhang mit der Analyse und Verarbeitung von Daten hilfreich sein kann.

Beispiele für die Verwendung der Year-Funktion zum Arbeiten mit Datumsangaben

Mit der Year-Funktion in Excel VBA können Sie das Jahr aus einem bestimmten Datum abrufen. Es kann für viele Datumsoperationen wie Trendanalyse, Altersberechnung und vieles mehr nützlich sein.

Hier sind einige Beispiele für die Verwendung der Funktion Year:

Angenommen, Sie haben eine Zelle A1, die das folgende Datum enthält: 01.01.2025. Sie können die Funktion Year wie folgt verwenden, um nur das Jahr zu erhalten:

Year(Range("A1")) ' Возвращает 2025

Die Funktion Year kann auch mit Variablen vom Typ Date arbeiten. Im folgenden Beispiel enthält die Variable MyDate das Datum 15.07.1990:

Dim myDate As DatemyDate = #07/15/1990#Year(myDate) ' Возвращает 1990

Um mit Daten zu arbeiten, die im Zeichenfolgenformat gespeichert sind, können Sie die CDate-Funktion verwenden, um die Zeichenfolge in den Datumstyp zu konvertieren, und anschließend die Year-Funktion anwenden. Zum Beispiel:

Dim dateString As StringdateString = "07.09.1985"Year(CDate(dateString)) ' Возвращает 1985

Es ist wichtig sich daran zu erinnern, dass die Funktion Year nur das Jahr und nicht das gesamte Datum zurückgibt. Wenn Sie ein Datum mit einem Jahr abrufen möchten, können Sie die DateSerial-Funktion verwenden, mit der Sie ein Datum mit Jahr, Monat und Tag angeben können.

Ich hoffe, diese Beispiele helfen Ihnen, die Funktion Year zu verwenden, um mit Datumsangaben in Excel VBA zu arbeiten.