Problème If à 3 possibilités - VBA

Bonjour à tous,

pour un devoir sur VBA je dois créer un programme sur VBA qui me permet de construire un tableau d'amortissement en fonction de l'emprunt, du taux, du mode de remboursement et du nombre de période.

Le problème que je rencontre est que je dois créer une condition à 3 solutions :

en effet, les 3 solutions sont : remboursement annuel, trimestriel ou mensuel. en fonction de la réponse la formule de calcul du taux changera.

J'avais réussi à créer une formule avec If/Then pour Annuel et trimestriel mais je n'arrive pas pour Mensuel.

Voila la partie de code sur laquelle je suis bloquée pour l'instant.

Ma question est : existe-t-il une solution pour faire :

If/Else/Else?

Merci d'avance pour votre aide et bonne journée!

Annuel_Mensuel = MsgBox("Le remboursement est-il annuel, trimestriel ou mensuel?")

If Annuel_Mensuel = annuel Then

Range("F1") = "Annuel"

Taux_Applicable = Taux_annuel

Else

Annuel_Mensuel = mensuel

Range("F1") = "Mensuel"

Taux_Applicable = Taux_annuel / 12

Annuel_Mensuel = trimestriel

Range("F1") = "Trimestriel"

Taux_Applicable = Taux_annuel / 4

End If

bonjour,

une manière de faire :

    Annuel_Mensuel = MsgBox("Le remboursement est-il annuel, trimestriel ou mensuel?")
    If Annuel_Mensuel = "annuel" Then
        Range("F1") = "Annuel"
        Taux_Applicable = Taux_annuel
    ElseIf Annuel_Mensuel = "mensuel" Then
        Annuel_Mensuel = mensuel
        Range("F1") = "Mensuel"
        Taux_Applicable = Taux_annuel / 12
    ElseIf Annuel_Mensuel = "trimestriel" Then
        Range("F1") = "Trimestriel"
        Taux_Applicable = Taux_annuel / 4
    End If

Merci beaucoup ça fonctionne!