Le calcul de l’amortissement dégressif est particulièrement difficile sous Excel. En effet, il n’existe pas de fonctions prévues à cet effet prenant en compte la date de mise en service, le mois de clôture de l’exercice, etc. Dans cet article je vais vous présenter deux méthodes pour pouvoir traiter vos amortissements dégressifs, de la plus simple (et longue) à la plus complexe (et rapide). Mais commençons par la théorie comptable…
Sommaire
La théorie comptable
L’amortissement dégressif désigne l’une des deux méthodes d’amortissement d’un bien qui permet à une entreprise d’étaler, comptablement, le coût d’achat sur la durée d’utilisation dudit bien. Contrairement à l’amortissement linéaire qui consiste à déduire une annuité constante sur tous les exercices de la durée d’amortissement du bien, l’amortissement dégressif permet de constater une dépréciation plus rapide du bien sur les premières années. Les biens éligibles à l’amortissement dégressif sont principalement les biens d’équipement. Ils sont listés dans le Code général des impôts, annexe 2 – Article 22.
Les entreprises passibles de l’impôt sur les sociétés ou de l’impôt sur le revenu au titre des bénéfices industriels et commerciaux peuvent amortir suivant un système dégressif, dans les conditions fixées aux articles 23 à 25, les immobilisations acquises ou fabriquées par elles à compter du 1er janvier 1960 et énumérées ci-après :
- Matériels et outillages utilisés pour des opérations industrielles de fabrication, de transformation ou de transport ;
- Matériels de manutention ;
- Installations destinées à l’épuration des eaux et à l’assainissement de l’atmosphère ;
- Installations productrices de vapeur, chaleur ou énergie ;
- Installations de sécurité et installations à caractère médico-social ;
- Machines de bureau, à l’exclusion des machines à écrire ;
- Matériels et outillages utilisés à des opérations de recherche scientifique ou technique ;
- Installations de magasinage et de stockage sans que puissent y être compris les locaux servant à l’exercice de la profession ;
- Immeubles et matériels des entreprises hôtelières.
Sont exclus du bénéfice de l’amortissement dégressif les biens qui étaient déjà usagés au moment de leur acquisition par l’entreprise ainsi que ceux dont la durée normale d’utilisation est inférieure à trois ans.
Enfin, d’après les règles fiscales, on notera que l’amortissement dégressif ne peut s’appliquer qu’à des biens ayant la nature de « biens d’équipement » appartenant à des entreprises de type industrielles, artisanales, commerciales, libérales ou agricoles. Il est ouvert aux biens non-usagés ayant au minimum une durée d’amortissement d’au moins 3 ans.
Le calcul de l’amortissement dégressif
Le calcul de l’amortissement dégressif s’opère en plusieurs étapes. Dans un premier temps, il convient de déterminer le coefficient d’amortissement dégressif qui varie selon la durée de vie estimée du bien. Par exemple, pour un bien dont la durée de vie est de trois ans, le coefficient est de 1,25.
| Durée d’utilisation | Coefficient dégressif |
|---|---|
| 2-4 ans | 1,25 |
| 5-6 ans | 1,75 |
| + de 6 ans | 2,25 |
Dans un second temps, il est nécessaire de fixer le taux d’amortissement dégressif qui permet de calculer chaque annuité d’amortissement. Pour cela, il faut diviser au nombre 100 la durée d’utilisation prévisible du bien et multiplier ce résultat par le coefficient d’amortissement.
Pour un bien d’une durée de vie de 3 ans, le taux d’amortissement est de : (100/3) x 1,25.
La dernière étape consiste à déterminer le montant de la première annuité d’amortissement et des annuités suivantes :
Première annuité : PRIX D’ACHAT x TAUX D’AMORTISSEMENT x NB DE MOIS QUI RESTENT DANS L’ANNEE / 12
Annuités suivantes : PRIX D’ACHAT – ANNUITES DEJA DEDUITES x TAUX D’AMORTISSEMENT
À noter : lorsque le taux d’amortissement dégressif sera inférieur au taux linéaire, le calcul de l’amortissement dégressif basculera sur le taux linéaire.
| Année | Base amortissement | Taux dégressif | Taux linéaire | Amortissement | Valeur nette |
|---|---|---|---|---|---|
| 2017 | 5 000,00 | 35% | 20% | 1 750,00 | 3 250,00 |
| 2018 | 3 250,00 | 35% | 25% | 1 137,50 | 2 112,50 |
| 2019 | 2 112,50 | 35% | 33% | 739,38 | 1 373,12 |
| 2020 | 1 371,13 | 35% | 50% | 686,56 | 686,56 |
| 2021 | 686,56 | 35% | 100% | 685,56 | 0,00 |
Comment calculer l’amortissement dégressif sous Excel ?
Afin de calculer un amortissement dégressif sous Excel, on peut soit créer un tableau unique pour chaque immobilisation, soit créer une formule VBA pour les calculer en masse. Dans le fichier proposé ci-dessous, vous aurez accès aux deux méthodes de calculs.
Créer un tableau des amortissements dégressifs par immobilisations
Ce tableau a l’avantage d’être maîtrisé par tous et il vous permettra de vérifier rapidement si vos dotations aux amortissements sont corrects. L’inconvénient est qu’il ne permet pas d’analyser rapidement de nombreux amortissements dégressifs.
J’ai développé le tableau ci-dessus afin de permettre :
- Le calcul des amortissements dégressifs pour les exercices comptables en décalés (ex : exercice se terminant le 31 mars)
- Que l’utilisateur n’ait qu’à dupliquer les premières cellules en les tirants vers le bas. Cela permet de limiter les erreurs potentielles lors de la reprise du tableau.
Créer une formule en VBA afin de calculer les amortissements dégressifs en masse
Pour ce tableau, l’intégralité des amortissements dégressifs se calcule à l’aide d’une macro VBA. L’utilisateur doit renseigner les zones de la formule de la même façon que les formules utilisées traditionnellement sous Excel. Cette méthode peut se révéler puissante pour l’analyse en masse des amortissements dégressifs et ne demande qu’un minimum de zones à renseigner.
La formule nécessite les champs suivants :
Function amort ( valeur brut , durée , date MES , mois fin d’exercice , Exercice en cours )
Examinons le code vba :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 |
Function amort(valeur As Double, duree As Integer, date_mes As Date, mois_cloture As Byte, annee_cloture As Long) Dim x As Integer, y As Integer, exercice1 As Integer, annee_lineaire As Integer, taux_lineaire As Integer Dim mise_en_service As Date '************************ 'PREPARATION '************************ mise_en_service = DateSerial(Year(date_mes), Month(date_mes), 1) x = 0 amort = 0 nb_amort = 0 'on détermine le coefficient dégressif If duree >= 2 And duree <= 4 Then coef = 100 / duree * 1.125 If duree >= 5 And duree <= 6 Then coef = 100 / duree * 1.75 If duree >= 7 Then coef = 100 / duree * 2.25 'on détermine le premier exercice de clôture annuelle (utile pour les exercices en décalé) 'cela nous sera utile pour déterminer l'amortissement de la première année If mois_cloture < Month(date_mes) Then exercice1 = Year(date_mes) + 1 Else exercice1 = Year(date_mes) End If 'on détermine le nombre d'année d'amortissements pour cette fonction If annee_cloture - exercice1 <= duree Then nb_amort = annee_cloture - exercice1 + 1 Else nb_amort = duree End If 'on détermine sur quel exercice l'amortissement dégréssif basculera sur le taux linéaire 'c'est-à-dire lorsque le taux linéaire sera plus important que le taux dégressif y = 0 Do Until coef < (100 / (duree - y)) y = y + 1 Loop annee_lineaire = y '***************************** '1ERE ANNEE D'AMORTISSEMENT '***************************** ' nombre de mois entre la mise en service et la clôture de l'exercice * coefficient dégressif y = 0 amort = valeur / 12 * DateDiff("m", DateSerial(Year(mise_en_service), Month(mise_en_service), 1), DateSerial(exercice1, mois_cloture + 1, 1)) * coef / 100 nb_amort = nb_amort - 1 y = y + 1 If nb_amort = 0 Then Exit Function 'si on atteint le nombre d'année d'amortissement, on sort de la fonction '************************************************************* 'ANNEES SOUMISES AU TAUX DEFRESSIF (SAUF LA PREMIERE ANNEE) '************************************************************* Do Until annee_lineaire = y Or nb_amort = 0 amort = amort + ((valeur - amort) * coef / 100) nb_amort = nb_amort - 1 y = y + 1 Loop If nb_amort = 0 Then Exit Function 'si on atteint le nombre d'année d'amortissement, on sort de la fonction '*********************************** 'ANNEES SOUMISES AU TAUX LINEAIRE '*********************************** Do Until nb_amort = 0 amort = amort + ((valeur - amort) * (100 / (duree - y) / 100)) nb_amort = nb_amort - 1 y = y + 1 Loop End Function |
Et la suite ?
Avec ce code, vous êtes désormais en mesure de traiter en masse les amortissements dégressifs. L’utilisation de ce fichier se révélera adaptée pour les structures importantes souhaitant faire un contrôle de cohérence des données obtenues par le logiciel comptable. Une erreur de paramétrage du système n’est pas toujours facilement détectable. Vous pourrez à présent vous assurer de la cohérence des données.
Merci. J’ai vraiment beaucoup aimé vos articles et j’aimerais avoir plus.