Помогите с факториалом

[Milli_billi]

Не получается вычислить факториал и оформить его в виде функции. помогите пожалуйста очень надо.

[Busine2009]

Milli_billi
ссылка не работает.

[Milli_billi]

Milli_billi
ссылка не работает.

Исправил (

[Busine2009]

Milli_billi
я не знаю, правильно этот или нет, но в яндексе набрал факториал vba и нашёл следующее:

Код: Выделить всё

Sub Test()
	MsgBox Str(Fact(3))
End Sub

Function Fact(n As Integer)
	If n < 1 Then
		Fact = 1
	Else
		Fact = Fact(n - 1) * n
	End If
End Function