SYD, functie

Van toepassing op
Access voor Microsoft 365 Access 2021 Access 2019 Access 2016

Geeft als resultaat een waarde van het type Double die de afschrijving van activa over een bepaalde termijn vertegenwoordigt, berekend met behulp van de 'Sum-Of-The-Years-Digits'-methode.

Syntaxis

SYD(kosten, restwaarde, levensduur, periode)

De syntaxis van de functie SYD heeft deze argumenten:

Argument Beschrijving
kosten Vereist. Een waarde van het gegevenstype Double die de aanschafkosten van het activum aangeeft.
restwaarde Vereist. Een waarde van het gegevenstype Double die de waarde van het activum aan het einde van de levensduur aangeeft.
duur Vereist. Een waarde van het gegevenstype Double die de lengte van de levensduur van het activum aangeeft.
termijn Vereist. Een waarde van het gegevenstype Double die de periode aangeeft waarvoor de afschrijving van het activum wordt berekend.

Opmerkingen

De argumenten voor levensduur en periode moeten in dezelfde eenheden worden uitgedrukt. Als de levensduur bijvoorbeeld in maanden wordt gegeven, moet de periode ook in maanden worden opgegeven. Alle argumenten moeten positieve getallen zijn.

Queryvoorbeelden

Expression Resultaten
SELECT SYD([LoanAmount];[LoanAmount]*.1,20;2) AS Expr1 FROM FinancialSample; Berekent de afschrijving voor een actief met de waarde 'LoanAmount', met een restwaarde van 10% ('LoanAmount' vermenigvuldigd met 0,1), waarbij de levensduur van het activum 20 jaar is. De afschrijving wordt berekend voor het tweede jaar.
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample; Retourneert de afschrijving voor een actief met de waarde 'LoanAmount', met een restwaarde van $ 0, waarbij de levensduur van het activum 20 jaar is. De resultaten worden weergegeven in de kolom SLDepreciation. De afschrijving wordt berekend voor het derde jaar.

VBA-voorbeeld

Opmerking

In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.

In dit voorbeeld wordt de functie SYD gebruikt om de afschrijving van een activum voor een opgegeven periode te retourneren op basis van de initiële kosten van het activum (InitCost), de restwaarde aan het einde van de levensduur van het activum (SalvageVal) en de totale levensduur van het activum in jaren (LifeTime). De periode in jaren waarvoor de afschrijving wordt berekend, is PDepr.

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, PDepr
Const YEARMONTHS = 12    ' Number of months in a year.
Fmt = "###,##0.00"    ' Define money format.
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("What's the asset's value at the end of its life?")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YEARMONTHS    ' Ensure period is >= 1 year.
    MsgBox "Asset life must be a year or more."
    MonthLife = InputBox("What's the asset's useful life in months?")
Loop
LifeTime = MonthLife / YEARMONTHS    ' Convert months to years.
If LifeTime <> Int(MonthLife / YEARMONTHS) Then
    LifeTime = Int(LifeTime + 1)    ' Round up to nearest year.
End If 
DepYear = CInt(InputBox("For which year do you want depreciation?"))
Do While DepYear < 1 Or DepYear > LifeTime
    MsgBox "You must enter at least 1 but not more than " & LifeTime
    DepYear = CInt(InputBox("For what year do you want depreciation?"))
Loop
PDepr = SYD(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & Format(PDepr, Fmt) & "."