![](https://codky.com/wp-content/uploads/2024/11/2725-1024x576.png)
Pour utiliser la fonction IRR (Internal Rate of Return, ou Taux de Rendement Interne) dans VBA, vous devez d’abord comprendre que cette fonction est utilisée pour calculer le taux interne de rentabilité d’un flux de trésoreries. Voici comment vous pouvez l’utiliser dans un module VBA :
Sub CalculateIRR()
Dim cashFlows As Variant
Dim irrResult As Double
' Définit le tableau de flux de trésorerie
cashFlows = Array(-5000, 1500, 2000, 2500, 3000)
' Calcule le taux de rendement interne
irrResult = Application.WorksheetFunction.IRR(cashFlows)
' Affiche le résultat dans une boîte de message
MsgBox "Le Taux de Rendement Interne est : " & Format(irrResult, "0.00%")
End Sub
- Ouvrir l’éditeur VBA: Pressez `ALT + F11` pour ouvrir l’éditeur VBA dans Excel.
- Insérer un module: Cliquez sur `Insertion` > `Module` pour insérer un nouveau module dans votre projet VBA.
- Écrire le code: Vous pouvez utiliser la fonction IRR en appelant la fonction `WorksheetFunction.IRR` ou `Financial.IRR` si vous travaillez avec le module `Financial` sous VBA. Voici un exemple simple :
Explication du code :
- Tableau de flux de trésorerie: Le tableau `cashFlows` contient les flux de trésorerie. La première valeur est souvent un investissement initial négatif, suivi des flux de trésorerie positifs ou négatifs de chaque période.
- IRR Calculation: La ligne `Application.WorksheetFunction.IRR(cashFlows)` calcule le taux de rendement interne des flux de trésorerie spécifiés.
- Afficher le résultat: Le résultat est affiché dans une boîte de message montrant le taux de rendement interne au format pourcentage.
Assurez-vous de tester votre code avec différents ensembles de données pour garantir que l’IRR est calculé correctement. Il est également possible d’ajuster le code pour inclure une estimation initiale en tant que second argument de `IRR`, si nécessaire.