Function Factorial(Value As Long) As Long If Value = 0 Or Value = 1 Then Factorial = 1 Else Factorial = Factorial(Value - 1) * Value End If End Function