欢迎光临测量协同网!https://www.fffsky.com/blog
Loading
0

[原创]Excel曲线坐标计算程序VBA 4.7

文章:用Office Excel VBA编制的“曲线坐标计算程序VBA 4.7”

关键词:Excel 曲线坐标 VBA 程序 坐标正反算 竖曲线 连续计算 附合导线 无定向导线 水准平差

 

一、程序用途:

本坐标计算程序可计算不对称和对称缓和曲线(含圆曲线)且可进行正交、斜交坐标计算且可进行反算偏距和里程、连续坐标计算等,还可以计算结构物坐标计算,极坐标放样、线元法坐标正反算、竖曲线高程连续计算、附合导线、无定向导线平差,水准平差,还可以生成5800和9750数据库等。

 

程序主界面:

程序相关界面:

二、程序原理:

1、程序主要采用office excel自带的编程工具Visual Basic for Applications进行编写。

2、程序主体采用的公式均为测量学(书本上的公式),准确高效。

3、程序框架构思纯属个人思维,界面美观可直接打印,单元格采用按钮化设计,操作简便快捷。

 

三、更新记录:

1、修改了竖曲线计算范围。

2、修改了线元法要素判断位置,当切线方位角大于360或小于0时会自动加减,把=10^45改为了0。

3、调整了交点法曲线要素,修正了起止点输入交点里程时出现溢出现象。

4、取消了右键“插入和删除”菜单。

5、修改了交点法坐标自动生成等起止点计算范围。

6、新增了结构物计算桩基中心坐标和前后坐标和新增了展点数据。

7、修改了坐标反算输入取值范围,当遇到小半径时则不会报错。

其他:主程序界面进行了优化,添加了相关使用说明!

 

本表需启用"宏"即可运行,否则禁止宏运行时点击按钮会没有反映,Office Excel 启用"宏"方法如下:

Office Excel 2003版:工具>>>宏>>>安全性>>>选择较低的安全级别>>>重新打开文件即可运行。
Office Excel 2007版:Office按钮>>>Excel选项>>>信任中心>>>信任中心设置>>>宏设置>>>启用所有宏。

******************************************************

程序下载地址:[Excel]曲线坐标计算程序VBA 4.7

【本程序已更新,推荐下载新版本程序】更新下载地址:进入下载

******************************************************

 

相关文章:

1、[[Excel]曲线坐标计算程序VBA 2.2]

2、[[Excel]曲线任意点切线方位角计算表VBA]

3、[[Excel]竖曲线高程计算程序VBA 1.0]

4、[[Excel]任意曲线坐标计算程序(单点)Beta1]

5、[[excel]符合导线严密平差]

6、[[Excel]坐标计算多边形面积]

 

©版权声明:文章源于作者原创,如需转载请注明文章出处。


测量协同网诚邀您投稿,文章主题与工程测量、大地测量等相关即可,可以是理论介绍,也可以是实务分析,还可以是工作总结。➮点击投稿

行善积德、广修福田行善积德、广修福田

如果文章对你有帮助,欢迎点击上方按钮行善积德

最后编辑于:2018/10/28作者: 测量测绘

暂无评论

发表评论

  1. 刘春亮 刘春亮说道:
    6#

  2. fffsky fffsky说道:
    5#

    你好,这个程序支持非对称缓和曲线,fx-4800P计算器使用。
    https://www.fffsky.com/blog/blog/post/QXZB-4800.html

  3. 刘春亮 刘春亮说道:
    4#

    好,

  4. 刘春亮 刘春亮说道:
    3#

    很好,我想要非对称缓和曲线的计算程序,要求针对CASIO4800P计算器的程序,恳请帮忙, 我可以出钱购买,谢谢.,

  5. 测量 测量说道:
    2#

    应该是起点切线方位角输入有误,或者起止点半径输入有误。

  6. 郑伯亮 郑伯亮说道:
    1#

    用线元法算出来的结果,差了几公分,而且切线方位角也差了好多

扫一扫关注公众号

扫一扫关注公众号