WorksheetFunction.Fact (Excel)

Retorna o fatorial de um número. O fatorial de um número é igual a 1*2*3*...

Fact (Arg1)

Arg1: Número-o número não negativo do qual você deseja obter o fatorial. Se núm não for um inteiro, será truncado.

Dim dblArg1 As Double: dblArg1 = 
Dim dblFact As Double
dblFact = WorksheetFunction.Fact(Arg1:=dblArg1)