EXCEL 计算方位角

[Excel]综合曲线坐标计算程序bata3http://www.fffsky.com/blog/post/ZHQX-bata3.html综合曲线坐标计算程序bata3说明附属表一、简要说明
1、本程序可对单圆曲线、对称缓和曲线、不对称缓和曲线进行中、边桩坐标计算。
2、数据输入时应在"曲线要素表"中有浅黄底色的单元格区内输入、其他均为自动计算。
3、当线路az左转时，转角前面加负号；当线路ay右转时，转角为正值输入。
4、只需输入"坐标计算表"的里程桩号、边桩偏距即可自动计算坐标。
5、计算边桩时交角均为90°,其他自由拟定。
6、"放样计算表"中可计算出前视方位角和距离，为现场放线人员减少了计算繁琐。

度分秒格式：
=INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/PI())
&"度"& INT( ((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180
/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/
PI()))*60)&"分"&INT( (((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-
$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-
$b$1)))*180/PI()))*60-INT(((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /
(B3-$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /
(B3-$b$1)))*180/PI()))*60))*600)/10)&"秒"
其中：A1,B1中存放测站坐标,a3,b3放终点坐标。