在一个Excel单元格中实现度、分、秒转换

zdj8210

在一个Excel单元格中实现度、分、秒转换

怎样在Excel一个 单元格中输入度分秒再转换成小数度或弧度一直困绕许多测量同行，网上有许多用VBA 编辑的自定义函数当然可行，但对大多数不会编辑VBA的测量同行而言，这不仅存在编辑上的困难，也存在调用上的不方便。为此，我直接用公式在EXCEL中轻松实现了在一单元格中对度、分、秒的转换，转换后的角度精度等同转换前，现介绍：
  1、度、分、秒在一个单元格中转换成小数度。设A1为输入的度、分、秒单元格，B1为小数度单元格，若A1=256.3246（读着256度32分46秒），则：

    B1=INT（A1）+INT（100*MOD（A1，1））/60+MOD（A1*100,1）/36
  2、度、分、秒在一个单元格中转换成弧度。设置引用同上.
    B1=RADIANS(INT（A1）+INT（100*MOD（A1，1））/60+MOD（A1*100,1）/36)
这样就轻松实现了在一个单元格中对角度的转换运算,比在三个单元格中分别输入度、分、秒的格式简单适用，也可以解决VBA编辑的困难和调用的复杂性，使用时，只需在需要进行换算的单元格中复制或粘贴公式即可进行计算。   














**********

zdj8210

非常感谢！虽然我知道命令的功能，但是还不会这样灵活的运用，惭愧。