Financial.DDB(Double, Double, Double, Double, Double) Methode
Definitie
Belangrijk
Bepaalde informatie heeft betrekking op een voorlopige productversie die aanzienlijk kan worden gewijzigd voordat deze wordt uitgebracht. Microsoft biedt geen enkele expliciete of impliciete garanties met betrekking tot de informatie die hier wordt verstrekt.
Retourneert een waarde die de afschrijving van een activum voor een bepaalde periode aangeeft met behulp van de methode double declining balance of een andere methode die u opgeeft.
public static double DDB(double Cost, double Salvage, double Life, double Period, double Factor = 2);static member DDB : double * double * double * double * double -> doublePublic Function DDB (Cost As Double, Salvage As Double, Life As Double, Period As Double, Optional Factor As Double = 2) As DoubleParameters
- Cost
- Double
Required. De initiële kosten van het activum.
- Salvage
- Double
Required. De waarde van het activum aan het einde van de levensduur.
- Life
- Double
Required. De lengte van de levensduur van het activum.
- Period
- Double
Required. De periode waarvoor afschrijving van activa wordt berekend.
- Factor
- Double
Optional. De rente waarmee het saldo afneemt. Als u dit argument weglaat, wordt 2 gebruikt, wat overeenkomt met de 'double declining balance'-methode.
Retouren
De afschrijving van een activum voor een specifieke periode met behulp van de methode voor dubbele declining balance of een andere methode die u opgeeft.
Uitzonderingen
Factor
<= 0, Salvage< 0,<Period = 0 of Period>Life.
Voorbeelden
In dit voorbeeld wordt de DDB functie gebruikt om de afschrijving van activa voor een opgegeven periode te retourneren op basis van de initiële kosten (InitCost), de restwaarde aan het einde van de levensduur van het activum (SalvageVal), de totale levensduur van het activum in jaren (LifeTime) en de periode in jaren waarvoor de afschrijving wordt berekend (Depr).
Dim InitCost, SalvageVal, LifeTime, DepYear As Double
Dim Fmt As String = "###,##0.00"
InitCost = CDbl(InputBox("What's the initial cost of the asset?"))
SalvageVal = CDbl(InputBox("Enter the asset's value at end of its life."))
LifeTime = CDbl(InputBox("What's the asset's useful life in years?"))
' Use the SLN function to calculate the deprecation per year.
Dim SlnDepr As Double = SLN(InitCost, SalvageVal, LifeTime)
Dim msg As String = "The depreciation per year: " & Format(SlnDepr, Fmt)
msg &= vbCrLf & "Year" & vbTab & "Linear" & vbTab & "Doubling" & vbCrLf
' Use the SYD and DDB functions to calculate the deprecation for each year.
For DepYear = 1 To LifeTime
msg &= DepYear & vbTab &
Format(SYD(InitCost, SalvageVal, LifeTime, DepYear), Fmt) & vbTab &
Format(DDB(InitCost, SalvageVal, LifeTime, DepYear), Fmt) & vbCrLf
Next
MsgBox(msg)
Opmerkingen
Bij de 'double declining balance'-methode worden de activa versneld afgeschreven. De afschrijving is het hoogst in de eerste termijn en wordt steeds kleiner in de volgende termijnen.
De Life argumenten moeten Period worden uitgedrukt in dezelfde eenheden. Als Life bijvoorbeeld in maanden wordt gegeven, Period moet dit ook in maanden worden gegeven. Alle argumenten moeten positieve getallen zijn.
De DDB functie gebruikt de volgende formule om de afschrijving voor een bepaalde periode te berekenen:
Afschrijving / periode = ((Kosten - restwaarde) * Factor) / Levensduur