Comment utiliser la fonction PV dans VBA ?

La fonction PV, ou Présent Valeur, en VBA (Visual Basic for Applications) est utilisée pour calculer la valeur actuelle d’un investissement ou d’une série de paiements futurs. Son équivalent en Excel est la fonction `=PV`. En VBA, vous pouvez utiliser cette fonction soit en appelant Excel via l’automation, soit en utilisant les fonctions intégrées de VBA.

Voici comment utiliser la fonction `PV` dans VBA :

Exemple d’utilisation de la fonction `PV` via l’automation Excel :

Sub CalculerValeurPresente()

    Dim taux As Double
    Dim nb_paiements As Integer
    Dim paiement As Double
    Dim valeur_futur As Double
    Dim type_echeance As Integer
    Dim valeur_presente As Double

    ' Définir les variables
    taux = 0.05 / 12 ' Taux d'intérêt mensuel
    nb_paiements = 60 ' Nombre de paiements
    paiement = -200 ' Paiement mensuel (négatif car sortant)
    valeur_futur = 0 ' Valeur future
    type_echeance = 0 ' Paiements en fin de période

    ' Calcul de la valeur présente
    valeur_presente = Application.WorksheetFunction.Pv(taux, nb_paiements, paiement, valeur_futur, type_echeance)

    ' Afficher la valeur présente
    MsgBox "La valeur présente est: " & Format(valeur_presente, "Currency")

End Sub

Démarrer VBA : Appuyez sur `ALT` + `F11` pour ouvrir l’éditeur VBA dans Excel.
Insérer un Module : Cliquez avec le bouton droit sur votre classeur Excel dans le panneau de gauche > `Insérer` > `Module`.
Écrire le Code VBA :

Explication des paramètres :

taux : Le taux d’intérêt pour chaque période.
nb_paiements : Le nombre total de paiements.
paiement : Le montant de chaque paiement. Les paiements effectués représentent des montants négatifs.
valeur_futur : La valeur future souhaitée d’un investissement après la dernière période de paiement.
type_echeance : Indique quand les paiements sont dus. `0` signifie à la fin de la période, `1` signifie au début de la période.

Exécution du Code :

Pour exécuter la macro, allez dans l’éditeur VBA, sélectionnez la macro `CalculerValeurPresente` et appuyez sur le bouton `Exécuter`. Une boîte de dialogue devrait apparaître, affichant la valeur présente calculée.

Si vous intégrez cette fonction dans une application plus large ou une interface utilisateur, veillez à ajuster les variables et à manier les exceptions, notamment en ajoutant des validations pour les entrées utilisateur.

facebooklinkedin