Vba: so erhalten sie den monatsnamen vom datum

Sie können die MonthName- Funktion in VBA verwenden, um den Monatsnamen aus einem Datum in Excel abzurufen.

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

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i) = MonthName(Month(Range(" A " & i)))
Next i

End Sub

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

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

Beispiel: So erhalten Sie mit VBA den Monatsnamen aus dem Datum

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 Monatsnamen für jede Zelle in der Spalte „Datum“ abrufen.

Dazu können wir das folgende Makro erstellen:

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i)= MonthName(Month(Range(" A " & i)))
Next i

End Sub

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

Beachten Sie, dass Spalte C den Monatsnamen für jedes entsprechende Datum in Spalte A enthält.

Wenn Sie stattdessen den abgekürzten Monatsnamen zurückgeben möchten, können Sie wie folgt ein optionales True- Argument in der MonthName- Funktion verwenden:

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i)= MonthName(Month(Range(" A " & i)), True )
Next i

End Sub

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

Spalte C enthält jetzt den abgekürzten Monatsnamen für jedes übereinstimmende Datum in Spalte A.

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