excel 根据两点经纬度计算距离

已知AB列分别为起点经纬度，CD列分别终点经纬度，根据两点经纬度计算距离

在E2单元格里输入：
=6371004*ACOS(1-(POWER((SIN((90-B2)*PI()/180)COS(A2PI()/180)-SIN((90-D2)*PI()/180)COS(C2PI()/180)),2)+POWER((SIN((90-B2)*PI()/180)SIN(A2PI()/180)-SIN((90-D2)*PI()/180)SIN(C2PI()/180)),2)+POWER((COS((90-B2)*PI()/180)-COS((90-D2)*PI()/180)),2))/2)

计算出第二行两点的距离：

点击E2单元格，将鼠标移动到右下角小正方形点上，此时鼠标变为+号，双击鼠标，计算出所有数据的距离：