Comment utiliser la fonction DDB dans VBA ?

La fonction DDB (Double Declining Balance) dans VBA est utilisée pour calculer l’amortissement d’un actif selon la méthode de l’amortissement dégressif. Cette méthode permet de comptabiliser des charges d’amortissement plus importantes au début de la vie d’un actif.

Voici comment utiliser la fonction DDB dans VBA :

Syntaxe

DDB(cost, salvage, life, period, [factor])

cost : Le coût initial de l’actif.
salvage : La valeur résiduelle de l’actif à la fin de sa durée de vie.
life : La durée de vie utile de l’actif.
period : La période pour laquelle vous souhaitez calculer l’amortissement.
factor (facultatif) : Le facteur par lequel l’amortissement dégressif est appliqué. Par défaut, ce facteur est 2, ce qui correspond à l’amortissement dégressif double.

Exemple d’utilisation

Voici un exemple de subroutine VBA utilisant la fonction DDB pour calculer l’amortissement d’un actif :

Sub CalculateDDB()
    Dim cost As Double
    Dim salvage As Double
    Dim life As Double
    Dim period As Integer
    Dim factor As Double
    Dim depreciation As Double

    ' Valeurs d'exemple
    cost = 10000       ' Coût initial de l'actif
    salvage = 1000     ' Valeur résiduelle
    life = 5           ' Durée de vie utile de l'actif
    period = 1         ' Période pour laquelle calculer l'amortissement
    factor = 2         ' Facteur d'amortissement dégressif

    ' Calcul de l'amortissement
    depreciation = DDB(cost, salvage, life, period, factor)

    ' Affichage du résultat
    MsgBox "L'amortissement pour la période " & period & " est de " & Format(depreciation, "Currency")
End Sub

Instructions

Ouvrez l’éditeur VBA (Alt + F11) dans Excel.
Insérez un nouveau module (Cliquez sur `Insert` > `Module`).
Copiez et collez le code ci-dessus dans le module.
Exécutez la subroutine `CalculateDDB` en appuyant sur F5 ou en vous rendant dans le menu `Run` > `Run Sub/UserForm`.

Cela calculera l’amortissement de l’actif pour la première période selon la méthode de l’amortissement dégressif double et affichera le résultat dans une boîte de message. Vous pouvez ajuster les valeurs de `cost`, `salvage`, `life`, `period`, et `factor` selon vos besoins.

facebooklinkedin