Comment créer des fonctions Excel personnalisées? (avec exemples)
Pour créer une fonction personnalisée, nous devons écrire un code pour le fonctionnement de nos propres fonctions, qui s'appelle «UDF». Les fonctions personnalisées sont des fonctions définies par l'utilisateur dans Excel, donc pour créer ces fonctions, vous devez connaître à fond le codage VBA.
Exemple # 1 - Ajouter deux nombres quelconques
Par exemple, si vous souhaitez ajouter deux nombres quelconques, nous vous montrerons une simple fonction définie par l'utilisateur (UDF).
- Appuyez sur Alt + F11 et insérez le module.
- Écrivez du code dans un module pour créer une fonction personnalisée.
Toute fonction personnalisée doit commencer par le mot «Fonction», suivi du nom de la formule.
Toute fonction a ses arguments ou paramètres de la même manière que les fonctions personnalisées; nous devons définir ces paramètres. Puisque nous ajoutons seulement deux nombres, définissons ces paramètres et affectons des types de données à ces variables d'argument.
Une fois que les paramètres sont définis avec un type de données, nous devons également définir les types de données de résultat. Définissons le résultat comme la valeur «Integer».
Dans cette «Procédure de fonction», nous écrirons le code de la formule.
Code:
Addition de fonction (Num1 As Integer, Num2 As Integer) As Integer Additiona = Num1 + Num2 End Function
Cela indique que le résultat du nom de la fonction «Addition» sera la somme des valeurs Num1 et Num2.
- Revenez maintenant à la feuille de calcul et entrez deux nombres entiers quelconques.
- Nous allons ajouter ces deux nombres maintenant. Ouvrez le signe égal et entrez le nom de la fonction personnalisée «Addition».
Sélectionnez les premier et deuxième nombres en saisissant le séparateur sous forme de virgule (,).
- Appuyez sur la touche Entrée pour obtenir le résultat.
Sensationnel!!! Comme la fonction SOMME, nous avons obtenu le résultat de la somme de deux nombres.
Maintenant, regardez ces chiffres.
Essayez d'ajouter ces deux nombres maintenant.
Nous avons obtenu la valeur d'erreur car le type de données des arguments «Num1 & Num2» est «Integer», c'est-à-dire que ces deux arguments peuvent contenir des valeurs comprises entre -32767 et 32767, donc tout ce qui est plus que cela provoquera ces erreurs.
Maintenant, essayez d'ajouter ces deux nombres.
Même cela entraînera une valeur d'erreur inférieure.
Même si les valeurs des arguments individuels sont dans la limite du type de données Integer, nous avons toujours cette erreur car la somme totale de ces nombres est supérieure à la valeur limite entière.
Puisque nous avons également déclaré le type de résultat comme «entier», le résultat de l'addition de deux nombres devrait également être une limite de nombre entier.
Exemple # 2 - Ajouter tous les nombres impairs
Excel n'a pas de fonction intégrée, qui peut ajouter tous les nombres impairs de la liste des nombres. Mais rien d'inquiétant, nous allons créer une fonction Excel personnalisée pour supporter cela.
Ouvrez la fenêtre de l'éditeur VBA et donnez un nom à la procédure Function.
Donnez le paramètre de cette fonction comme «Plage».
Cela signifie que pour cette fonction, nous fournissons la valeur d'entrée pour cette fonction en tant que «Plage» de valeurs de cellules.
Puisque nous avons besoin de parcourir plus d'une cellule, nous devons utiliser la boucle «For Each» dans VBA, alors ouvrez la boucle «For Each».
À l'intérieur de cette boucle, ajoutez le code ci-dessous.
Code:
Fonction AddOdd (Rng As Range) For Each cell In Rng If cell.Value Mod 2 0 Then AddOdd = AddOdd + cell.Value Cellule suivante End Function
Nous devons utiliser la fonction «MOD» pour tester le nombre. Lorsque chaque valeur de cellule est divisée par le nombre 2 et que la valeur du reste n'est pas égale à zéro, notre code doit alors ajouter toutes les valeurs de nombre impair.
Revenez maintenant à la feuille de calcul et ouvrez la fonction personnalisée Excel.
Sélectionnez la plage de numéros de A1 à D8.
Appuyez sur la touche Entrée pour obtenir le résultat «impair». »
Ainsi, dans la plage A1 à D8, nous avons la somme des nombres impairs est 84.
Exemple # 3 - Ajouter tous les nombres pairs
De même, la fonction ci-dessous ajoutera tous les nombres pairs.
Code:
Fonction AddEven (Rng As Range) For Each cell In Rng If cell.Value Mod 2 = 0 Then AddEven = AddEven + cell.Value Cellule suivante End Function
Cette fonction ajoutera seulement un nombre pair. Dans ce cas, nous avons utilisé la logique de si chaque valeur de cellule est divisée par 2 et que le reste est égal à zéro, alors le code ajoutera uniquement ces valeurs de cellule.
De cette manière, en utilisant le codage VBA, nous pouvons créer nos propres fonctions personnalisées.
Choses dont il faut se rappeler
- Créer des fonctions personnalisées ne sont rien d'autre que des fonctions définies par l'utilisateur.
- Pour créer des fonctions personnalisées, il faut avoir des connaissances avancées en matière de codage VBA.
- Lors de la création des fonctions Excel personnalisées, il est important d'avoir un œil sur les arguments et leurs types de données.
