Funkcija SLN

Atgriež Double vērtību, kas norāda aktīva lineāro amortizāciju vienā periodā.

Sintakse

SLN ( izmaksas, glābšana, dzīvība )

Funkcijā SLN ir šādi argumenti.

Arguments

Apraksts

izmaksas

Obligāts. Double , kas norāda pamatlīdzekļa sākotnējās izmaksas.

likvidācijas

Obligāts. Double vērtība, kas norāda pamatlīdzekļa vērtību tā lietderīgās lietošanas laika beigās.

kalpošanas

Obligāts. Double norāda aktīva lietderīgās lietošanas laika ilgumu.

Piezīmes

Nolietojuma periodam ir jābūt izteiktam tajā pašā vienībā, kas atbilst dzīvībasarguments. Visiem argumentiem jābūt pozitīviem skaitļiem.

Vaicājumu piemēri

Izteiksme

Rezultāti

ATLASIET SLN ([LoanAmount], [LoanAmount] *. 1, 20) kā Izteiksme1 no FinancialSample.

Atgriež pamatlīdzekļa nolietojumu, kas novērtēts kā "LoanAmount", ar likvidācijas vērtību 10%("LoanAmount", kas reizināts ar 0,1), ņemot vērā līdzekļa lietderīgās izmantošanas laiku 20 gadus.

ATLASIET SLN ([LoanAmount], 0, 20) kā SLDepreciation no FinancialSample.

Atgriež pamatlīdzekļa nolietojumu, kas novērtēts kā "LoanAmount", ar $0 likvidācijas vērtību, ņemot vērā līdzekļa lietderīgās izmantošanas laiku 20 gadus. Rezultāti tiek parādīti kolonnā SLDepreciation.

VBA piemērs

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Šajā piemērā funkcija SLN tiek izmantota, lai atgrieztu aktīva lineāro amortizāciju par vienu periodu, ņemot vērā aktīva sākotnējās izmaksas (InitCost), likvidācijas vērtību aktīva lietderīgās lietošanas laika (SalvageVal) un kopējā kalpošanas laika gadā (LifeTime).

Dim Fmt, InitCost, SalvageVal
Dim MonthLife, LifeTime, 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 useful life?")
MonthLife = InputBox("What's the asset's useful " & _
"life in months?")
' Ensure period is >= 1 year.
Do While MonthLife < YEARMONTHS
MsgBox "Asset life must be a year or more."
MonthLife = InputBox("What's the asset's " & _
"useful life in months?")
Loop
' Convert months to years.
LifeTime = MonthLife / YEARMONTHS
If LifeTime <> Int(MonthLife / YEARMONTHS) Then
' Round up to nearest year.
LifeTime = Int(LifeTime + 1)
End If
PDepr = SLN(InitCost, SalvageVal, LifeTime)
MsgBox "The depreciation is " & _
Format(PDepr, Fmt) & " per year."

Piezīme.:  Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai jūs varat mūs informēt, vai informācija bija noderīga? Šeit ir raksts angļu valodā jūsu atsaucei.​

Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka jums varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta speciālistiem.

×