Функція SYD

Застосовується до
Access для Microsoft 365 Access 2021 Access 2019 Access 2016

Повертає число подвійної точності, яке вказує величину амортизації активу за вказаний період із використанням методу підсумовування річних чисел.

Синтаксис

SYD(вартість, зал_вартість, термін_експлуатації, період)

Синтаксис функції SYD має такі аргументи:

Аргумент Опис
Вартість — обов’язковий аргумент. Подвійне визначення первісної вартості активу.
Врятування — обов’язковий аргумент. Подвійне зазначення вартості активу після завершення терміну його корисного використання.
час роботи — обов’язковий аргумент. Подвійне зазначення тривалості строку корисного використання активу.
крапка — обов’язковий аргумент. Подвійне зазначення періоду, для якого обчислюється амортизація активів.

Примітки

Аргументи «термін » і « період » необхідно виражати в одних і тих же одиницях. Наприклад, якщо життя дається в місяцях, то період також повинен бути вказаний в місяцях. Усі аргументи мають бути додатними числами.

Приклади запитів

Вираз Результати.
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS вираз1 FROM FinancialSample; Обчислює величину амортизації для активу, оціненого як "Сума позики", із залишковою вартістю 10% ("Сума позики" помножена на 0,1), якщо термін корисної експлуатації активу становить 20 років. Амортизація розраховується за другий рік.
SELECT SYD([LoanAmount],0,20,3) AS SLDemorciation FROM FinancialSample; Повертає величину амортизації активу, оціненого як "сума позики", із залишковою вартістю 0 грн. (якщо термін експлуатації активу становить 20 років). Результати відображаються в стовпці SLDehociation. Амортизація розраховується за третій рік.

Приклад VBA

Примітка.

У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.

У цьому прикладі функція SYD використовується, щоб повернути величину амортизації активу за вказаний період із заданим початковою вартістю активу (InitCost), залишковою вартістю наприкінці терміну експлуатації активу (SalvageVal) і загальним терміном експлуатації активу в роках (LifeTime). Період у роках, для якого обчислюється амортизація, дорівнює 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) & "."