Wie verwende ich die SYD-Funktion in VBA?

Die SYD-Funktion (Sum-of-Years’ Digits) in VBA wird verwendet, um den Abschreibungsbetrag eines Vermögenswerts für eine bestimmte Periode basierend auf der Abschreibungsmethode nach der Summe der Jahresziffern zu berechnen.

Die Syntax für die SYD-Funktion in VBA ist wie folgt:

SYD(Cost, Salvage, Life, Period)

Cost: Die ursprünglichen Anschaffungskosten des Vermögenswerts.
Salvage: Der Restwert des Vermögenswerts nach Ablauf der Nutzungsdauer.
Life: Die gesamte Nutzungsdauer des Vermögenswerts in Perioden.
Period: Die Periode, für die die Abschreibung berechnet werden soll.

Hier ist ein Beispiel, wie Sie die SYD-Funktion in VBA verwenden können:

Sub BerechneSYDAbschreibung()
    Dim Anschaffungskosten As Double
    Dim Restwert As Double
    Dim Nutzungsdauer As Integer
    Dim Periode As Integer
    Dim Abschreibung As Double

    ' Werte zuweisen
    Anschaffungskosten = 10000    ' Beispiel: Anschaffungskosten
    Restwert = 2000              ' Beispiel: Restwert
    Nutzungsdauer = 5            ' Beispiel: Nutzungsdauer in Jahren
    Periode = 3                  ' Beispiel: Die Periode, für die die Abschreibung berechnet werden soll

    ' SYD-Funktion verwenden
    Abschreibung = SYD(Anschaffungskosten, Restwert, Nutzungsdauer, Periode)

    ' Ergebnis anzeigen
    MsgBox "Die Abschreibung für die Periode " & Periode & " beträgt " & Format(Abschreibung, "Currency")
End Sub

In diesem Beispiel berechnet die Funktion die Abschreibung eines Vermögensgegenstands mit einem Anschaffungspreis von 10.000 Euro, einem Restwert von 2.000 Euro und einer Nutzungsdauer von 5 Jahren für das 3. Jahr.

Überprüfen Sie bitte, dass Sie die entsprechenden Referenzen in Ihrem VBA-Editor eingestellt haben, damit die Funktion korrekt funktioniert, und ändern Sie die Variablenwerte entsprechend Ihren spezifischen Anforderungen.

facebooklinkedin