So subtrahieren sie tage von einem datum in vba (mit beispiel)

Sie können die DateAdd- Funktion in VBA mit einer negativen Zahl verwenden, um eine bestimmte Anzahl von Tagen von einem Datum zu subtrahieren.

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

 Sub SubtractDays()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = DateAdd(" d ", -4, Range(" A " & i))
    Next i
    
End Sub

Dieses spezielle Makro subtrahiert vier Tage von jedem Datum im Bereich A2:A10 und zeigt die neuen Daten im Bereich B2:B10 an.

Beachten Sie, dass das Argument „d“ in der DateAdd- Funktion angibt, dass wir Tage von Datumsangaben subtrahieren möchten und nicht von einer anderen Zeiteinheit.

Eine vollständige Liste der Einheiten, die Sie in der DateAdd- Funktion verwenden können, finden Sie auf der VBA-Dokumentationsseite .

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

Beispiel: Tage vom Datum in VBA subtrahieren

Angenommen, wir haben die folgende Datumsliste in Excel:

Angenommen, wir möchten von jedem Datum vier Tage abziehen und die neuen Daten in Spalte B anzeigen.

Dazu können wir das folgende Makro erstellen:

 Sub SubtractDays()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = DateAdd(" d ", -4, Range(" A " & i))
    Next i
    
End Sub

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

Beachten Sie, dass Spalte B jedes Datum in Spalte A enthält, wobei vier Tage abgezogen wurden.

Fühlen Sie sich frei, den numerischen Wert in der DateAdd- Funktion zu ändern, um von jedem Datum eine andere Anzahl von Tagen zu subtrahieren.

Hinweis : Die vollständige Dokumentation der DateAdd- Funktion in VBA finden Sie hier .

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