excel中计算方位角距离公式电子表格中求方位角公式

《excel中计算方位角距离公式电子表格中求方位角公式》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、EXCEL中计算方位角距离公式电子表格中求方位角公式度格式：=(PI()*(1-SIGN(B3-$B$1)/2)-ATAN((A3-$A$1)/(B3-$B$1)))*180/PI()Excel中求方位角公式：a1,b1放起始点坐标 a3,b3放终点坐标。度分秒格式：=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()*(

2、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-

3、SIGN(B3-$b$1)/2)-ATAN((A3-$a$1)/(B3-$b$1)))*180/PI()))*60))*600)/10其中：A1,B1中存放测站坐标,a3,b3放终点坐标。上面的计算出来的是度分秒格式，也就是字符串格式，不能用来计算，只是用来看的哟！下面这个简单一点：=(PI()*(1-SIGN(B3-B1)/2)-ATAN((A3-A1)/(B3-B1)))*180/PI()Excel中求方位角公式：a1,b1放起始点坐标 a3,b3放终点坐标。求距离公式:=Round(SQRT(POWER((A3-$A$1),2)+POWER((B3-$B$

4、1),2)),3)提供http://553502225.qzone.qq.com/公路逐桩坐标计算4800程序公路逐桩坐标计算程序评论/浏览(0)发表时间：2007年4月19日9时12分公路逐桩坐标计算4800程序公路逐桩坐标计算程序(可以计算对称、不对称缓和曲线)Lb10Z=？ V=？W=V+2：Fixm｛K｝Lb11K>Z[W+5Z+4]=>W=W+1:Goto1⊿   (判断桩号在哪个交点范围，就是该交点曲线起点至下一交点曲线起点)S=K-Z[W+5Z+3]                             （计算该桩号与曲线起点的距离）R=Z[W+

5、2Z+2]：L=Z[W+3Z+2]:E=Z[W+4Z+2]   （读取该交点曲线要素R、Ls1、Ls2）Pol（Z[W]-Z[W-1],Z[W+Z+2]-Z[W+Z+1]）      （计算该交点与下一交点直线方位角）J<0=>J=J+360⊿A=JPol（Z[W-1]-Z[W-2],Z[W+Z+1]-Z[W+Z]）     （计算该交点与上一交点直线方位角）J<0=>J=J+360⊿C=A-J:A=J                           （计算偏角）W=V+2=>Goto2⊿                    （如果桩号在起点与第一交点曲线

6、起点之间，则转Lb12）I=Abs（tan（c÷2））M=L÷2-L^3÷240R^2:N=E÷2-E^3÷240R^2P=L^2÷6R-L^4÷336R^3-R（1-cos（90L÷πR））Q=E^2÷6R-E^4÷336R^3-R（1-cos（90E÷πR））D=（P-Q）I÷2:F=（P+Q+2R）I÷2M=F+M-D:Q=F+N+DN=πRAbsC÷180+（L+E）÷2X=Z[W-1]-McosAY=Z[W+Z+1]-MsinAM=Z[W-1]+Qcos（A+C）V=Z[W+Z+1]+Qsin（A+C）      Q=AbsC÷CS≤L=>P=0:Go

7、to3⊿   （如果桩号在第一缓和曲线内，则转Lb13）S≤N-E=>S=S-L:Goto4⊿（如果桩号在圆曲线内，则转Lb14）S≤N=>S=N-SQ=-Q:A=A+C-180:X=M:Y=V:L=E：P=180:Goto3⊿  （如果桩号在第二缓和曲线内，则转Lb13）P=A+C:S=S-N:D=M+ScosP:F=V+SsinPGoto6                                          （如果桩号在直线内，则转Lb16）Lb12P=A+CD=Z[W-1]+ScosPF=Z[W+Z+1]+SsinP:Goto6Lb13I=S

8、-S^5÷40R^2÷L