利用Excel实现度分秒转换十进制度

一、提取度、分、秒的数值

首先，我们要获取°号、′号、″号的位置：

A1=34°56′1″
A2=FIND("°", A1) //结果是3
A3=FIND("′", A1) //结果是6
A4=FIND("″", A1) //结果是8


	

然后，使用LEFT取到度（注意是到°号之前的4，不是到度号）：

A6=LEFT(A1,A2)     //结果错误，是34°，并不是我们想要的34
A7=LEFT(A1,A2-1)  //结果是34

用MID取到分和秒的数值。 

A8=MID(A1,A2+1,A3-A2-1) //结果是56

A9=MID(A1,A3+1,A4-A3-1) //结果是1

二、拼接

C1=A7+A8/60+A9/3600

三、整合后的总公式：

function=LEFT(A1, FIND("°", A1)-1) + MID(A1, FIND("°", A1)+1, FIND("′", A1)-FIND("°", A1)-1)/60 + MID(A1, FIND("′", A1)+1, FIND("″", A1)-FIND("′", A1)-1)/3600