VBA DateValue-Funktion

Während der Arbeit in VBA arbeiten wir mit Daten. Wir ordnen Datumsangaben verschiedenen Variablen zu oder können dazu die Funktion DATEVALUE verwenden. DATEVALUE ist Arbeitsblatt- und Visual Basic-Funktion. Im Arbeitsblatt wird ein serielles Datum angegeben. Wenn wir diese Funktion in VBA verwenden, erhalten wir einen Datumswert. Wie bereits erwähnt, gibt die in VBA verwendete DATEVALUE-Funktion einen Datumswert zurück. Der Datentyp, den wir bei Verwendung dieser Funktion für unsere Variablen verwendet haben, ist Datum. Es ist der Arbeitsblattfunktion etwas ähnlich. Wie wir diese Funktion verwenden, ist ziemlich einfach, es wird ein Datum als Argument verwendet.

Syntax von DateValue in Excel VBA

Die Syntax für die VBA-DateValue-Funktion in Excel lautet wie folgt:

Mit dieser Funktion wird ein Wert oder ein Argument als Zeichenfolge verwendet und an ein Datum zurückgegeben. Wir verwenden diese Funktion, weil wir mit vielen Daten arbeiten und jeder Mensch nicht ähnlich ist. Daher gibt es Unterschiede bei der Eingabe von Datumsformaten für jede einzelne Person. Wenn wir einige Berechnungen für die Daten durchführen müssen, müssen wir jedes unterschiedliche Format der in den Daten verfügbaren Daten in ein einziges Format konvertieren und dann die Berechnung durchführen. Stellen Sie sich nun das große Datenvolumen mit einem großen Datenvolumen verschiedener Datentypen vor.

Schauen wir uns einige Beispiele an, wie wir diese DATEVALUE-Funktion in VBA verwenden können, und einige Beispiele, die uns eine klarere Vorstellung davon geben, wie diese Funktion funktioniert.

Wie verwende ich VBA DateValue in Excel?

Wir werden lernen, wie man eine VBA DateValue-Funktion benutzt, mit wenigen Beispielen in Excel.

Sie können diese VBA DateValue Excel-Vorlage hier herunterladen - VBA DateValue Excel-Vorlage

Beispiel # 1 - VBA DateValue

Beginnen wir mit einem sehr einfachen Schritt. Wir weisen einer Variablen einen Datumswert als Zeichenfolge zu und geben dann den Datumswert für diese Variable aus.

Schritt 1: Sobald wir uns im Editor befinden, haben wir viele Optionen in der Kopfzeile. Fügen Sie auf der Registerkarte Einfügen ein neues Modul in den Editor ein, in dem wir alle Beispieldemonstrationen durchführen.

Schritt 2: Beginnen wir nun mit der unten gezeigten Prozedur.

Code:

 Sub Sample () End Sub

Schritt 3: Lassen Sie uns eine Variable als Datumsdatentyp deklarieren, wie unten gezeigt.

Code:

 Sub Sample () Dim A As Date End Sub

Schritt 4: Geben Sie nun mit der Funktion DATEVALUE einen Wert für die Variable A ein (siehe Abbildung unten).

Code:

 Sub Sample () Dim A As Date A = DateValue ("02/02/2019") End Sub

Schritt 5: Ich habe das Datum in doppelten Anführungszeichen angegeben, um es als Zeichenfolge zu behandeln. Verwenden Sie jetzt die msgbox-Funktion, um den in A gespeicherten Wert anzuzeigen.

Code:

 Sub Sample () Dim A As Date A = DateValue ("02/02/2019") MsgBox A End Sub

Schritt 6: Führen Sie den obigen Code aus und sehen Sie sich das Ergebnis an.

Wir wissen, dass in VBA das Datum in # -Symbolen und eine Zeichenfolge in doppelten Anführungszeichen angegeben wird. DATEVALUE ändert jedoch den Wert auf Datum.

Beispiel # 2 - VBA DateValue

Lassen Sie uns nun eine Eingabe von einem Benutzer in Datum nehmen, da ein Benutzer ein Datum in einem beliebigen Format bereitstellen kann. Wir werden den vom Benutzer angegebenen Wert mit der Funktion DATEVALUE in das Datum umrechnen.

Schritt 1: Wählen Sie im Editor unter Einfügen ein neues Modul aus.

Schritt 2: Lassen Sie uns nun eine weitere Unterprozedur wie folgt starten.

Code:

 Sub Sample1 () End Sub

Schritt 3: Deklarieren Sie zwei Variablen als Datumsangaben, da die Benutzereingaben in einer Variablen als Wert verwendet werden, während in einer anderen Variablen die Funktion DATEVALUE verwendet wird, um sie in ein Datum umzuwandeln.

Code:

 Sub Sample1 () Dim InputDate As Date, OutputDate As Date End Sub

Schritt 4: Nehmen Sie in der Eingabedatenvariablen die Eingabe des Benutzers über die Eingabefeldfunktion vor.

Code:

 Sub Sample1 () Dim InputDate als Datum, OutputDate als Datum InputDate = InputBox ("Enter a Date") End Sub

Schritt 5: Lassen Sie uns in der Variablen Outputdate das Datum ändern, das wir als Eingabe für das Datum erhalten. Verwenden Sie dazu die Funktion DATEVALUE (siehe unten).

Code:

 Sub Sample1 () Dim InputDate als Datum, OutputDate als Datum InputDate = InputBox ("Enter a Date") OutputDate = DateValue (InputDate) End Sub

Schritt 6: Lassen Sie uns nun den Wert anzeigen, den wir jetzt mit der Funktion msgbox haben.

Code:

 Sub Sample1 () Dim InputDate als Datum, OutputDate als Datum InputDate = InputBox ("Enter a Date") OutputDate = DateValue (InputDate) MsgBox OutputDate End Sub

Schritt 7: Führen Sie den obigen Code aus und geben Sie ein Eingabedatum wie folgt ein.

Schritt 8: Klicken Sie auf OK und sehen Sie das Endergebnis wie folgt.

Obwohl das Datumsformat vom Benutzer verschieden war, haben wir es erfolgreich in ein Datum konvertiert.

Beispiel # 3 - VBA DateValue

Wir können Daten in unserem Blatt sehen und wie man die DATEVALUE Funktion auf ihnen verwendet? Ich habe ein Datum in Zelle A1 wie folgt.

Lassen Sie es uns auf das Standarddatum ändern, das wir haben.

Schritt 1: Starten Sie erneut im selben Modul eine weitere Unterprozedur wie unten gezeigt.

Code:

 Sub Sample2 () End Sub

Schritt 2: Deklarieren Sie eine Variable wie unten gezeigt als Datum.

Code:

 Sub Sample2 () Dim Dt As Date End Sub

Schritt 3: Speichern Sie nun in der Variablen Dt den Wert der Zelle A1, der mit der Funktion DATEVALUE wie folgt lautet.

Code:

 Sub Sample2 () Dim Dt As Date Dt = DateValue (Sheet1.Range ("A1"). Value) End Sub

Schritt 4: Lassen Sie uns nun den in unserer Variablen gespeicherten Wert anzeigen.

Code:

 Sub Sample2 () Dim Dt As Date Dt = DateValue (Sheet1.Range ("A1"). Value) MsgBox Dt End Sub

Schritt 5: Führen Sie nun den obigen Code aus und lassen Sie uns das Ergebnis sehen.

Dinge, an die man sich erinnern sollte

  • DATEVALUE ist eine Datumsfunktion in VBA.
  • Es ist der Arbeitsblattfunktion etwas ähnlich, die Arbeitsblattfunktion gibt uns die Seriennummern des Datums, während sie uns in VBA den DATEVALUE gibt.
  • Diese Funktion übernimmt das Argument als Datum in der Zeichenfolge und konvertiert es in die Zeichenfolge.

Empfohlene Artikel

Dies ist eine Anleitung zu VBA DateValue. Hier diskutieren wir die Verwendung der Excel VBA DateValue-Funktion zusammen mit praktischen Beispielen und einer herunterladbaren Excel-Vorlage. Sie können auch unsere anderen Artikelvorschläge durchgehen -

  1. Kopieren Einfügen Funktion in VBA
  2. Excel VBA-Datumsformat
  3. VBA-Index außerhalb des gültigen Bereichs
  4. Excel ISNUMBER Formula

Kategorie:

VBA