Can anyone help me?
This line of code bring up the message when run "sub or function not
defined" and highlights the acos in the code.
Cells(i, 2) = Cos([L2] * Acos(Cells(i - 1, 2) / Radical))
I've tried alot- can you help me?

Steven,
Acos is an xl Worksheet function, not a VB math Method and should me
addressed as WorksheetFunction.Acos(Cells(i-1,2)/Radical ).
That might be the problem.
Ken Johnson

Hi Steven,

ACOS is an Excel worksheet function, so try changing Acos to
Application.ACOS


---
Regards,
Norman



"Steven" wrote in message
.com...
Can anyone help me?
This line of code bring up the message when run "sub or function not
defined" and highlights the acos in the code.
Cells(i, 2) = Cos([L2] * Acos(Cells(i - 1, 2) / Radical))
I've tried alot- can you help me?

VBA's help also shows this as a derived math function:

Inverse Cosine
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)

Steven wrote:

Can anyone help me?
This line of code bring up the message when run "sub or function not
defined" and highlights the acos in the code.
Cells(i, 2) = Cos([L2] * Acos(Cells(i - 1, 2) / Radical))
I've tried alot- can you help me?

--

Dave Peterson