Christian MUIR

Vous êtes ici : Accueil >> Tableur >> Approfondissement >> Fonction personnalisée >> Exemple 3
Exemples de fonction

Attach:fonction_miss_01.png Δ

On veut utiliser dans la colonne J une fonction personnalisée qui permettra de calculer la note finale pour chaque candidate, à savoir la moyenne des notes une fois que l’on a retiré de ces notes la note maximale et la note minimale.
Par exemple, pour la candidate n° 1, le minimum est 10, le maximum est 18, la somme des notes est 112, la note finale sera (112 – 18 – 10) / 6, soit 14.

Création de la fonction

Dans Excel

• Menu Outils / Macro / Visual Basic Editor

Dans VB Editor

• Menu Insertion / Module

Le module étant ouvert

• Menu Insertion / Procédure / Type = Fonction
• Nommer la fonction
  (dans l’exemple ci-dessous, la fonction est appelée miss)
• Noter que VBA a créé la ligne Function et la ligne End Function
  • Saisir les arguments de la fonction à l’intérieur des parenthèses à la ligne Function ()
    dans l’exemple ci-dessous, la fonction utilise une plage de cellules
  • l'argument de la fonction a été défini comme Plage de cellule (Range)
• Entre les lignes Function et End Function, saisir le texte du programme correspondant à la fonction
• Enregistrer le module

Attach:fonction_miss_02.png Δ

Utilisation de la fonction personnalisée

Attach:fonction_miss_04.png Δ

On a utilisé dans la cellule J2 la fonction notefinale

L'argument de la fonction est la plage de cellules B2 à I2

Pour utiliser cette fonction, on peut

• Soit saisir directement dans la barre de formules la formule utilisant cette fonction
• Soit utiliser Insertion / Fonction / Personnalisées

Attach:fonction_miss_03.png Δ

• Sélectionner la fonction à utiliser
• L’Assistant Fonction est lancé

Attach:fonction_miss_05.png Δ

• Indiquer les références des cellules dans les zones correspondantes
  ici on sélectionnera la plage de cellules B2 : I2

ensuite on pourra recopier la formule vers le bas

En téléchargement : le fichier Δ contenant la fonction