Inverse Sine calculation with formualr1c1 function

[bradyj7]

Hi there,

I want to find the inverse sine (sin^-1) of numbers in a column to get a column of angles next to it. I cant figure it out. This is what I have so far. The values are in the previous column.

    Range("m1").Value = "Angle of road"
    Range("m2").Value = 0
    Range("m3:m" & LastRow).FormulaR1C1 = "=Atn( rc[-1] / Sqr(rc[-1] * rc[-1] + 1))"

I got the inverse sine function from this page http://www.vbforums.com/showthread.php?t=161043

When I compile it, there is no error but this #NAME? is returned in the cells

Thank you

 

[bradyj7]

Hi,

Thanks for the input but the above is only true if your dealing in radians not degrees - which is what I'm working in.

Thank you

 

[GlennUK]

Does this make things clearer:

Excel Workbook
	D	E	F	G	H
7	Angle ( deg )	Angle ( rad )	Sin	Asin	Angle
8	23	0.401425728	0.390731	0.401426	23
9	45	0.785398163	0.707107	0.785398	45
10	60	1.047197551	0.866025	1.047198	60
11	75	1.308996939	0.965926	1.308997	75
12	90	1.570796327	1	1.570796	90
Sheet12