Un UserForm combiné à une Function de validation permet de vérifier automatiquement qu'une demande de congé respecte le solde disponible, avant même que la demande ne soit enregistrée.

Function DemandeValide(joursDemandes As Integer, soldeDisponible As Integer) As Boolean
    DemandeValide = (joursDemandes <= soldeDisponible)
End Function

Private Sub CommandButton1_Click()
    Dim jours As Integer
    jours = TextBox1.Value

    If DemandeValide(jours, 12) Then
        MsgBox "Demande enregistrée"
    Else
        MsgBox "Solde de congés insuffisant"
    End If
End Sub

La Function DemandeValide renvoie True ou False selon que le nombre de jours demandés dépasse ou non le solde disponible (fixé ici à 12 jours) ; le code du bouton n'a plus qu'à interroger ce résultat pour décider quel message afficher.

À vous de jouer : remplacez le solde fixe (12) par une valeur lue dynamiquement dans une cellule, propre à chaque employé. Le test de l'interface se fait directement dans l'éditeur VBA ; l'exercice porte ici sur la logique de validation appelée par le bouton.