Un UserForm (vu au chapitre précédent) devient particulièrement utile combiné à une Function de calcul : l'utilisateur saisit un montant, et le formulaire affiche immédiatement la remise applicable, sans jamais toucher directement à la feuille de calcul.

Function CalculerRemise(montant As Double) As Double
    If montant >= 5000 Then
        CalculerRemise = montant * 0.12
    Else
        CalculerRemise = 0
    End If
End Function

Private Sub CommandButton1_Click()
    Dim montant As Double
    montant = TextBox1.Value

    Dim remise As Double
    remise = CalculerRemise(montant)

    MsgBox "Remise calculée : " & remise & " $"
End Sub

Le code du bouton récupère la saisie de l'utilisateur (TextBox1.Value), l'envoie à la Function CalculerRemise déjà écrite précédemment, puis affiche le résultat — le formulaire ne fait qu'orchestrer un appel à une logique de calcul déjà testée séparément.

À vous de jouer : ajoutez au formulaire un second TextBox pour le nom du client, et faites en sorte que le message final affiche aussi ce nom. Le test de l'interface elle-même se fait directement dans l'éditeur VBA ; l'exercice porte ici sur la logique de calcul appelée par le bouton.