DDB, fonction

Renvoie un taux double de calcul de l’amortissement d’un bien pour une période donnée en utilisant la méthode de l’amortissement dégressiant à taux double ou selon un autre mode que vous spécifiez.

Syntaxe

DDB( coût, valeur,valeur,durée, période [ ,facteur] )

La syntaxe de la fonction DDB est la suivante :

Argument

Description

coût

Obligatoire. Double spécification du coût initial du bien.

valeur.de secours

Obligatoire. Spécifier la valeur du bien à la fin de sa vie utile.

vie

Obligatoire. Spécifiez la durée de vie utile du bien.

point

Obligatoire. Spécifier la période pendant laquelle l’amortissement d’un bien est calculé.

facteur

Facultatif. Variant spécifiant le taux de l’équilibrage du solde. En cas d’omis, 2 (méthode de refus à taux double) est pris en charge.


Remarques

La méthode de l’amortissement dégressif à taux double calcule l’amortissement à une vitesse accélérée. L’amortissement est au plus haut pendant la première période, puis il diminue au cours des périodes suivantes.

Les argumentsdurée et période doivent être exprimés dans la même unité. Par exemple, si la vie est donnée en mois, la période doit également être donnée en mois. Tous les arguments doivent être des nombres positifs.

La fonction DDB utilise la formule suivante pour calculer l’amortissement au cours d’une période donnée :

Amortissement / période = ((coût - valeurval)* facteur) / durée de vie

Exemple

Remarque : Les exemples qui suivent illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’travail avec VBA, sélectionnez Référence du développeur dans la liste verte en regard de Rechercher, puis entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise la fonction DDB pour renvoyer l’amortissement d’un bien pour une période spécifiée en fonction du coût initial (InitCost), de la valeur du bien au terme de la durée utile du bien (SalvageVal), de la durée totale du bien en années (LifeTime) et de la période en années pendant laquelle l’amortissement est calculé (Depr).

Dim Fmt, InitCost, SalvageVal, MonthLife, LifeTime, DepYear, Depr
Const YRMOS = 12 ' Number of months in a year.
Fmt = "###,##0.00"
InitCost = InputBox("What's the initial cost of the asset?")
SalvageVal = InputBox("Enter the asset's value at end of its life.")
MonthLife = InputBox("What's the asset's useful life in months?")
Do While MonthLife < YRMOS ' 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 / YRMOS ' Convert months to years.
If LifeTime <> Int(MonthLife / YRMOS) Then
LifeTime = Int(LifeTime + 1) ' Round up to nearest year.
End If
DepYear = CInt(InputBox("Enter year for depreciation calculation."))
Do While DepYear < 1 Or DepYear > LifeTime
MsgBox "You must enter at least 1 but not more than " & LifeTime
DepYear = InputBox("Enter year for depreciation calculation.")
Loop
Depr = DDB(InitCost, SalvageVal, LifeTime, DepYear)
MsgBox "The depreciation for year " & DepYear & " is " & _
Format(Depr, Fmt) & "."

Besoin d’aide ?

Développez vos compétences dans Office
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×