WorksheetFunction.Cosh (Excel)

Returns the hyperbolic cosine of a number.

The formula for the hyperbolic cosine is

Cosh (Arg1)

Arg1: Any real number for which you want to find the hyperbolic cosine.

Dim dblArg1 As Double: dblArg1 = 
Dim dblCosh As Double
dblCosh = WorksheetFunction.Cosh(Arg1:=dblArg1)