Calling the function from a Sub procedure
Sub CallerSub() Ans = CubeRoot(125) MsgBox Ans End Sub Function CubeRoot(number) CubeRoot = number ^ (1 / 3) End Function