Vba: so ermitteln sie monat und jahr aus dem datum

Sie können die NumberFormat- Eigenschaft in VBA verwenden, um den Monat und das Jahr aus einem Datum abzurufen.

Hier ist eine gängige Methode, diese Eigenschaft in der Praxis zu verwenden:

 SubGetMonthYear ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i).Value = DateValue(Range(" A " & i))
    Range(" C " & i).NumberFormat = " mm/yyyy "
Next i

End Sub

Dieses spezielle Makro findet den Monat und das Jahr für jedes Datum im Bereich A2:A11 und zeigt diese Werte in den entsprechenden Zellen im Bereich C2:C11 an.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Tage zu diesem Tag in VBA hinzufügen

Angenommen, wir haben den folgenden Datensatz in Excel, der Informationen über die Verkäufe eines Unternehmens zu verschiedenen Terminen enthält:

Angenommen, wir möchten den Monat und das Jahr für jede Zelle in der Datumsspalte ermitteln.

Dazu können wir das folgende Makro erstellen:

 SubGetMonthYear ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i).Value = DateValue(Range(" A " & i))
    Range(" C " & i).NumberFormat = " mm/yyyy "
Next i

End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass Spalte C den Monat und das Jahr jedes entsprechenden Datums in Spalte A enthält.

Beachten Sie, dass wir die NumberFormat- Eigenschaft verwendet haben, um Datumsangaben mit zwei Ziffern für Monate und vier Ziffern für Jahre zu formatieren.

Wenn wir möchten, können wir diese Werte auch in einem anderen Format anzeigen.

Beispielsweise könnten wir die folgende Syntax verwenden, um den Monat mit einer einzelnen Ziffer (wenn der Monat nur eine Ziffer enthält) und das Jahr mit zwei Ziffern anzuzeigen:

 SubGetMonthYear ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i).Value = DateValue(Range(" A " & i))
    Range(" C " & i).NumberFormat = " m/yy "
Next i

End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Probieren Sie gerne die verschiedenen Formatierungsoptionen aus, um die Monats- und Jahreswerte nach Ihren Wünschen anzuzeigen.

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

So vergleichen Sie Daten in VBA
So konvertieren Sie eine Zeichenfolge in VBA in ein Datum
So berechnen Sie Tage zwischen zwei Daten in VBA