Pateikia dvigubą skaičių, nurodantį turto amortizacijos per nurodytą laikotarpį metų sumą.
Sintaksė
SYD( kaina, likvidacinė_v, ekspoatacinė_vertė, laikotarpis )
Funkcijos SYD sintaksė turi tokius argumentus:
Argumentas |
Aprašas |
išlaidos |
Būtinas. Dvigubas skaičius , nurodantis pradinę turto kainą. |
Likvidacinė |
Būtinas. Dvigubas skaičius , nurodantis turto vertę pasibaigus jo naudingumo trukmei. |
įkrova |
Būtinas. Dvigubas skaičius , nurodantis turto naudingumo trukmę. |
Laikotarpį |
Būtinas. Dvigubas kiekis , nurodantis laikotarpį, kurio turto nusidėvėjimas skaičiuojamas. |
Pastabos
Gyvenimo ir laikotarpio argumentai turi būti išreikšti tais pačiais vienetais. Pavyzdžiui, jei gyvenimas nurodytas mėnesiais, laikotarpis taip pat turi būti nurodytas mėnesiais. Visi argumentai turi būti teigiami skaičiai.
Užklausų pavyzdžiai
Reiškinys |
Rezultatai |
SELECT SYD([LoanAmount],[LoanAmount]*.1,20,2) AS Expr1 FROM FinancialSample; |
Apskaičiuoja turto, kurio vertė yra "LoanAmount", nusidėvėjimą, kai likvidacinė vertė yra 10 % ("LoanAmount", padauginta iš 0,1), atsižvelgiant į turto naudingumo trukmę– 20 metų. Amortizacija apskaičiuojama antraisiais metais. |
SELECT SYD([LoanAmount],0,20,3) AS SLDepreciation FROM FinancialSample; |
Grąžina turto, kurio vertė yra "LoanAmount", nusidėvėjimą, kai likvidacinė vertė yra 0 EUR, atsižvelgiant į turto naudojimo trukmę kaip 20 metų. Rezultatai rodomi stulpelyje SLDepreciation. Amortizacija apskaičiuojama trečius metus. |
VBA pavyzdys
Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Šiame pavyzdyje funkcija SYD naudojama turto nusidėvėjimui per nurodytą laikotarpį grąžinti, atsižvelgiant į turto pradines išlaidas (InitCost), likvidacinę vertę turto naudingumo laikotarpio pabaigoje (SalvageVal) ir visą turto naudojimo trukmę metais (LifeTime). Laikotarpis metais , kuriais apskaičiuojamas nusidėvėjimas , yra 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) & "."