监理检测网论坛

注册

 

发新话题 回复该主题

在一个Excel单元格中实现度、分、秒转换 [复制链接]

1#
在一个Excel单元格中实现度、分、秒转换A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
怎样在Excel一个 单元格中输入度分秒再转换成小数度或弧度一直困绕许多测量同行,网上有许多用VBA 编辑的自定义函数当然可行,但对大多数不会编辑VBA的测量同行而言,这不仅存在编辑上的困难,也存在调用上的不方便。为此,我直接用公式在EXCEL中轻松实现了在一单元格中对度、分、秒的转换,转换后的角度精度等同转换前,现介绍:A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
  1、度、分、秒在一个单元格中转换成小数度。设A1为输入的度、分、秒单元格,B1为小数度单元格,若A1=256.3246(读着256度32分46秒),则:A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
    B1=INT(A1)+INT(100*MOD(A1,1))/60+MOD(A1*100,1)/36A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
  2、度、分、秒在一个单元格中转换成弧度。设置引用同上.A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
    B1=RADIANS(INT(A1)+INT(100*MOD(A1,1))/60+MOD(A1*100,1)/36)A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
这样就轻松实现了在一个单元格中对角度的转换运算,比在三个单元格中分别输入度、分、秒的格式简单适用,也可以解决VBA编辑的困难和调用的复杂性,使用时,只需在需要进行换算的单元格中复制或粘贴公式即可进行计算。A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
分享 转发
回贴是一种美德,请尊重别人的劳动成果! 哪怕是一个“好”字,也会给我们带来莫大的鼓励!

Kiii路-桥-隧精英群,群号:31833317
TOP
2#

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

非常感谢!虽然我知道命令的功能,但是还不会这样灵活的运用,惭愧。A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
心想事成!
TOP
3#

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

非常感谢!虽然我知道命令的功能,但是还不会这样灵活的运用,惭愧。A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
心想事成!
TOP
4#

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

非常感谢!虽然我知道命令的功能,但是还不会这样灵活的运用,惭愧A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
5#

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

非常感谢!愿你如百合花一样美丽!!! A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
6#

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

回贴是一种美德,请尊重别人的劳动成果! 哪怕是一个“好”字,也会给我们带来莫大的鼓励!A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
7#

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

非常感谢意本人一直想实现的问题总算解决了,谢谢!A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
8#

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

谢谢!希望这样的同志多些!A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
9#

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

非常感谢!虽然我知道命令的功能,但是还不会这样灵活的运用,惭愧A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
10#

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

回贴是一种美德!A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
11#

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

谢谢A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
12#

大哥,你直接编出来不就得了,我不会编啊A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
13#

非常感谢A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
14#

这个文件满实用,希望斑竹以后多发些类似的东西,我们共同学习.A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
15#

非常感谢,对于excel测量中的应用还是不错的A¡øX©÷VÅbbs.3c3t.comˌQ ‰ÌHìÎO
TOP
发主话题 回复该主题