Comment créer une fonction factorielle dans VBA (avec exemple)

Une factorielle est le produit de tous les entiers positifs inférieurs ou égaux à un entier positif donné.

Par exemple, la factorielle 5 (écrite 5 !) est calculée comme :

• 5 ! = 5 * 4 * 3 * 2 * 1 = 120

Vous pouvez utiliser la syntaxe suivante pour créer une fonction factorielle dans VBA :

Function FindFactorial(N As Integer) As Double

 Dim i As Integer, result As Long
 
 result = 1

 For i = 1 To N
     result = result * i
 Next

 FindFactorial = result

End Function

Une fois que vous avez créé cette fonction, vous pouvez ensuite taper quelque chose comme =FindFactorial(A2) dans une cellule d’Excel pour trouver la factorielle de l’entier dans la cellule A2 .

L’exemple suivant montre comment utiliser cette syntaxe dans la pratique.

Exemple : créer une fonction factorielle dans VBA

Supposons que nous ayons la liste de nombres suivante dans Excel et que nous souhaitions calculer la factorielle de chaque nombre :

Nous pouvons définir la fonction suivante dans VBA pour ce faire :

Function FindFactorial(N As Integer) As Double

 Dim i As Integer, result As Long
 
 result = 1

 For i = 1 To N
     result = result * i
 Next

 FindFactorial = result

End Function

Une fois que nous avons créé cette fonction, nous pouvons alors taper la formule suivante dans la cellule B2 pour calculer la factorielle de la valeur dans la cellule A2 :

=FindFactorial(A2)

Nous pouvons ensuite cliquer et faire glisser cette formule vers chaque cellule restante de la colonne B :

Notez que la colonne B affiche désormais la factorielle de chaque entier de la colonne A.

Par exemple:

• 1! = 1
• 2 ! = 2 * 1 = 2
• 3 ! = 3 * 2 * 1 = 6
• 4 ! = 4 * 3 * 2 * 1 = 24

Et ainsi de suite.

Remarque : Pour calculer une factorielle dans Excel sans utiliser VBA, vous pouvez utiliser la fonction FACT .

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

VBA : Comment additionner les valeurs dans une plage
VBA : Comment calculer la valeur moyenne de la plage
VBA : Comment compter le nombre de lignes dans la plage