求:excel经纬度转距离公式

问题描述:

求:excel经纬度转距离公式
知道两个点的经纬度,怎么用excel转换成距离?例如:A(118°19'20",35°4'4");B(118°19'56”,35°4’46”)

=6371000*ACOS(COS(RADIANS(SUM(1*LEFT(A2,FIND("°",A2)-1),MID(A2,FIND("°",A2)+1,FIND("'",A2)-FIND("°",A2)-1)/60,RIGHT(LEFT(A2,LEN(A2)-1),LEN(A2)-FIND("'",A2)-1)/3600)-SUM(1*LEFT(A1,FIND("°",A1)-1),MID(A1,FIND("°",A1)+1,FIND("'",A1)-FIND("°",A1)-1)/60,RIGHT(LEFT(A1,LEN(A1)-1),LEN(A1)-FIND("'",A1)-1)/3600)))*COS(RADIANS(SUM(1*LEFT(B2,FIND("°",B2)-1),MID(B2,FIND("°",B2)+1,FIND("'",B2)-FIND("°",B2)-1)/60,RIGHT(LEFT(B2,LEN(B2)-1),LEN(B2)-FIND("'",B2)-1)/3600)-SUM(1*LEFT(B1,FIND("°",B1)-1),MID(B1,FIND("°",B1)+1,FIND("'",B1)-FIND("°",B1)-1)/60,RIGHT(LEFT(B1,LEN(B1)-1),LEN(B1)-FIND("'",B1)-1)/3600))))
-----------------
A1 :第一点经度 B1 :第一点纬度
A2 :第二点经度 B2 :第二点纬度
经纬度格式:118°19'20" (度分秒的字符不要搞错)
--------------
如:
118°19'20" 35°4'4"
118°19'56" 35°4'46"
-----
计算结果是:1708.610943 米
---------------
当然,将地球视作标准圆球