Lernen Sie VBA Excel kennen: Erhalten Sie den Monatsnamen mithilfe von Makros

In diesem Artikel erfahren Sie, wie Sie mithilfe von Makros in VBA Excel den Namen des aktuellen Monats abrufen können. Diese Informationen können bei vielen Aufgaben nützlich sein, z. B. beim Erstellen von Berichten oder beim automatischen Ausfüllen von Tabellen.

Es gibt mehrere Möglichkeiten, den Monatsnamen zu erhalten, aber eine der einfachsten und schnellsten ist die Verwendung der integrierten VBA - MonthName-Funktion. Es ermöglicht Ihnen, den Namen des Monats basierend auf seiner Sequenznummer zu erhalten.

Anwendungsbeispiel:

Dim monthNumber As Integer

Dim monthName As String

monthNumber = Month(Date)

monthName = MonthName(monthNumber)

MsgBox monthName

In diesem Beispiel definieren wir zuerst die Variable monthNumber und weisen ihr den Wert des aktuellen Monats zu, indem wir die Month-Funktion mit dem Date-Parameter verwenden. Dann rufen wir die Funktion MonthName auf und übergeben den resultierenden Wert monthNumber an sie. Das Ergebnis wird in der Variablen MonthName gespeichert, die wir mit der MsgBox-Funktion auf dem Bildschirm anzeigen.

Daher wird beim Ausführen dieses Makros der Name des aktuellen Monats angezeigt. Dies kann beispielsweise "Januar", "Februar" und so weiter sein, abhängig vom aktuellen Datum.

Lernen Sie VBA Excel: Den Namen des Monats erhalten

Sie können die Funktion MonthName verwenden, um den Monatsnamen in VBA abzurufen. Diese Funktion akzeptiert zwei Argumente: die Monatsnummer und einen Parameter, der das Format des Monatsnamens angibt.

Beispiel für die Verwendung von MonthName :

Sub GetMonthName()Dim monthNumber As IntegerDim monthName As StringmonthNumber = 1 ' Задаем номер месяцаmonthName = MonthName(monthNumber) ' Получаем имя месяцаMsgBox "Имя месяца: " & monthName ' Выводим имя месяца в окне сообщенияEnd Sub

In diesem Beispiel legen wir die Monatsnummer auf 1 fest, was dem Januar entspricht. Dann rufen wir die Funktion MonthName mit der Monatsnummer als Argument auf und speichern den resultierenden Monatsnamen in der Variablen MonthName . Schließlich geben wir den Monatsnamen im Meldungsfeld mit der MsgBox-Funktion aus.

Sie können die Parameter der MonthName-Funktion ändern, um den Monatsnamen im gewünschten Format abzurufen. Beispielsweise können Sie den Parameter Abbreviate auf True festlegen, um den abgekürzten Monatsnamen zu erhalten. Mit dem Parameter FirstDayOfWeek können Sie den ersten Wochentag auswählen, um den Monatsnamen zu berechnen.

Auf diese Weise können Sie die Funktion MonthName verwenden, um den Monatsnamen in Excel VBA abzurufen. Dies kann nützlich sein, wenn Sie Berichte erstellen oder Daten analysieren, bei denen Sie mit Daten und Monaten arbeiten müssen.

Abrufen des Monatsnamens in VBA Excel

In VBA (Visual Basic for Applications) von Excel gibt es mehrere Möglichkeiten, den Monatsnamen für ein bestimmtes Datum abzurufen. Dies kann nützlich sein, wenn Sie ein Datum in einem lesbaren Format anzeigen möchten oder wenn Sie verschiedene Datumsvorgänge ausführen.

Eine einfache Möglichkeit, den Monatsnamen zu erhalten, ist die Verwendung einer Funktion MonthName. Diese Funktion akzeptiert die Monatsnummer und optionale Parameter, um die Sprache und das Format des zurückgegebenen Monats anzugeben. Zum Beispiel:

Dim monthName As StringmonthName = MonthName(5) ' Возвращает "Май"

Wenn Sie den Monatsnamen für das aktuelle Datum abrufen möchten, können Sie die Funktion verwenden Format. Funktion Format verwendet Formatierungsmuster, die festlegen, welche Datumselemente angezeigt werden sollen. Die nützlichsten Muster zum Abrufen des Monatsnamens sind "mmmm" und "mmmm".

Dim monthName As StringmonthName = Format(Date, "mmmm") ' Возвращает полное имя текущего месяца

Wenn Sie den Namen des Monats im Genitiv erhalten möchten, können Sie die Funktion verwenden MonthNameGenitive, die den Namen des Monats im Genitiv für die angegebene Monatsnummer zurückgibt. Zum Beispiel:

Dim monthNameGenitive As StringmonthNameGenitive = MonthNameGenitive(5) ' Возвращает "Мая"

Sie können auch ein Array mit Monatsnamen verwenden, um ihre Werte anhand der Monatsnummer abzurufen. Zum Beispiel:

Dim monthNames(1 To 12) As StringmonthNames(1) = "Январь"monthNames(2) = "Февраль". Dim monthName As StringmonthName = monthNames(5) ' Возвращает "Май"

Abhängig von der Aufgabe und den Einstellungen können Sie die geeignete Methode zum Abrufen des Monatsnamens in VBA Excel auswählen. Verwenden Sie diese Methoden, um mit Daten und Monatsansichten bequem zu arbeiten.