Utilisez une fonction pour entrer des appréciations

Je vous propose dans ce post de créer une fonction pour entrer automatiquement une appréciation en fonction de la note de l'élève:

Fonction Appréciation

Etape 1: Créer la fonction

La première étape consiste à créer une fonction permettant de rentrer une appréciation en fonction d'une note.

Pour cela, aller dans l'éditeur de VBA, vous pouvez créer la fonction dans le module xlam:

Créer la fonction appreciation dans le module xlam

Voici la fonction que vous pouvez recopier directement (et personnaliser) dans votre éditeur VBA:

Function Appreciation(note As Double)

Select Case note

Case Is < 5

Appreciation = "Insuffisant"

Case Is < 15

Appreciation = "Correct"

Case Else

Appreciation = "Excellent"

End Select

End Function

Etape 2: Tester la fonction

Pour tester la fonction, écrivez dans la case où vous souhaitez rentrer le commentaire "=appreciation(B2)" en argument de la fonction vous sélectionner la note que vous souhaitez utiliser pour rentrer l'appréciation:

En résultat les appréciations seront entrées automatiquement:

Vous trouverez le détail de la présentation du tutoriel sur la vidéo youtube ici:

https://youtu.be/D-lhjoFz5zE

N'hésitez-pas à me dire en commentaire si vous avez réussi à créer votre programme, si vous l'avez personnalisé ou amélioré.

Merci !