DDB, fonction

Important :  Cet article a été traduit automatiquement, voir l’avertissement. Vous pouvez consulter la version en anglais de cet article ici.

Renvoie un Double spécifiant l’amortissement d’un bien pour une période spécifique en utilisant la méthode de l’amortissement dégressif à taux double ou toute autre méthode que vous spécifiez.

Syntaxe

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

La syntaxe de la fonction DDB comporte les arguments suivants :

Argument

Description

coût

Obligatoire. Double spécifiant le coût initial de l’actif.

valeur_rés

Obligatoire. Double spécifiant la valeur de la ressource à la fin de son cycle de vie.

durée de vie

Obligatoire. Double indiquant la durée de vie du bien.

période

Obligatoire. Double spécifiant la période pour les biens amortissement est calculé.

facteur

Facultatif. Type Variant indiquant le taux de l’amortissement dégressif. En cas d’omission, 2 (méthode d’amortissement dégressif à taux double) est supposé égal.


Notes

La méthode de l’amortissement dégressif à taux double calcule l’amortissement à un taux accéléré. Amortissement est plus élevé dans la première période et diminue les périodes.

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

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

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

Exemple

Remarque : Exemples suivants illustrent l’utilisation de cette fonction dans une Visual Basic pour le module d’Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de recherche et 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 donnée le coût initial (InitCost), la valeur résiduelle à la fin de cycle de vie son (SalvageVal), la durée de vie totale du bien en années (LifeTime) et la période en années pour 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) & "."

Remarque : Avertissement traduction automatique : cet article a été traduit par un ordinateur, sans intervention humaine. Microsoft propose cette traduction automatique pour offrir aux personnes ne maîtrisant pas l’anglais l’accès au contenu relatif aux produits, services et technologies Microsoft. Comme cet article a été traduit automatiquement, il risque de contenir des erreurs de grammaire, de syntaxe ou de terminologie.

Développez vos compétences
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.

×