Logg på med Microsoft
Logg på, eller opprett en konto.
Hei,
Velg en annen konto.
Du har flere kontoer
Velg kontoen du vil logge på med.

Returnerer et langt flyttall som angir den lineære avskrivningen for et aktivum for én enkelt periode.

Syntaks

SLN( kostnad; restverdi; levetid )

SLN-funksjonen har følgende argumenter:

Argument

Beskrivelse

kostnad

Obligatorisk. Langt flyttall som angir opprinnelige kostnader for aktivumet.

Berging

Obligatorisk. Langt flyttall som angir verdien for aktivumet på slutten av levetiden.

tid

Obligatorisk. Langt flyttall som angir lengden på aktivumets økonomiske levetid.

Merknader

Avskrivningsperioden må uttrykkes i samme enhet som levetidenargument. Alle argumenter må være positive tall.

Spørringseksempler

Expression

Resultater

SELECT SLN([LoanAmount],[LoanAmount]*.1,20) AS Expr1 FROM FinancialSample;

Returnerer avskrivningen for et aktivum som er verdsatt som "LoanAmount", med en restverdi på 10 %("LoanAmount" multiplisert med 0,1), med tanke på at aktivumets økonomiske levetid er 20 år.

SELECT SLN([LoanAmount],0,20) AS SLDepreciation FROM FinancialSample;

Returnerer avskrivningen for et aktivum som er verdsatt som "LoanAmount", med en restverdi på $ 0, med tanke på aktivumets nyttige levetid til å være 20 år. Resultatene vises i kolonnen SLDepreciation.

VBA-eksempel

Obs!: I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.

Dette eksemplet bruker SLN-funksjonen til å returnere den lineære avskrivningen for et aktivum i én periode, gitt aktivumets opprinnelige kostnad (InitCost), restverdien ved slutten av aktivumets økonomiske levetid (SalvageVal), og aktivumets totale levetid i år (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."

Trenger du mer hjelp?

Vil du ha flere alternativer?

Utforsk abonnementsfordeler, bla gjennom opplæringskurs, finn ut hvordan du sikrer enheten og mer.

Fellesskap hjelper deg med å stille og svare på spørsmål, gi tilbakemelding og høre fra eksperter med stor kunnskap.

Var denne informasjonen nyttig?

Hvor fornøyd er du med språkkvaliteten?
Hva påvirket opplevelsen din?
Når du trykker på Send inn, blir tilbakemeldingen brukt til å forbedre Microsoft-produkter og -tjenester. IT-administratoren kan samle inn disse dataene. Personvernerklæring.

Takk for tilbakemeldingen!

×