Vba: so berechnen sie tage zwischen zwei daten

Sie können die folgende grundlegende Syntax in VBA verwenden, um die Anzahl der Tage zwischen zwei Daten zu berechnen:

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

In diesem speziellen Beispiel wird die Anzahl der Tage zwischen Datumsangaben in den entsprechenden Zellen in den Bereichen A2:A7 und B2:B7 berechnet und die Ergebnisse im Bereich C2:C7 zurückgegeben.

Beachten Sie, dass das Argument „D“ in der DateDiff- Funktion angibt, dass wir die Datumsdifferenz in Tagen berechnen möchten.

Eine vollständige Liste der Einheiten, die Sie für die Datumsdifferenz verwenden können, finden Sie auf der VBA-Dokumentationsseite .

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

Beispiel: Berechnen Sie die Tage zwischen Datumsangaben in VBA

Angenommen, wir haben die folgenden zwei Spalten mit Datumsangaben in Excel:

Angenommen, wir möchten die Anzahl der Daten zwischen dem Startdatum und dem Enddatum in jeder Zeile berechnen und die Ergebnisse in Spalte C anzeigen.

Dazu können wir das folgende Makro erstellen:

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

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

Die Anzahl der Daten zwischen jedem Startdatum und jedem Enddatum ist in Spalte C angegeben.

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 filtern Sie eine Spalte mit VBA
So sortieren Sie Werte in VBA alphabetisch