怎样使用EXCEL绘制路基断面图。先谢了,QQ362343630.

怎样使用EXCEL绘制路基断面图。先谢了,QQ362343630.,第1张

由图面生成,另一种是根据里程文件来生成,另外,本小节还专门介绍道路纵横断面图的绘制。

1.由图面生成

有根据坐标文件和根据图上高程点两种方法,现以根据坐标文件为例:

先用复合线生成断面线,点取“工程应用”下的“绘断面图”下的“根据坐标文件”功能。

提示:选择断面线 用鼠标点取上步所绘断面线。屏幕上d出“输入高程点数据文件名”的对话框,来选择高程点数据文件。

如果选“根据图上高程点”此步则为在图上选取高程点。

提示: 请输入采样点间距(米):<20> 输入采样点的间距,系统的默认值为20米。采样点的间距的含义是复合线上两顶点之间若大于此间距,则每隔此间距内插一个点。

提示:输入起始里程<00 系统默认起始里程为0。

>横向比例为1:<500> 输入横向比例,系统的默认值为1:500。

纵向比例为1:<100>输入纵向比例,系统的默认值为1:100。

请输入隔多少里程绘一个标尺(米)<直接回车只在两侧绘标尺>

在屏幕上则出现所选断面线的断面图。

命令行提示:是否绘制平面图?(1)否(2)是<1> 上图上绘出平面图的结果。

2 根据里程文件生成

根据里程文件绘制断面图,里程文件格式见《参考手册》第五章。

一个里程文件可包含多个断面的信息,此时绘断面图就可一次绘出多个断面。

里程文件的一个断面信息内允许有该断面不同时期的断面数据,这样绘制这个断面时就可以同时绘出实际断面线和设计断面线。

这种计算你还是下载一个程序比较好,比如道路之星、轻松测量之类的

自己在excel编辑的话,起码你得精通线路坐标的计算模型,还要精通excel的函数应用以及宏程序才行

否则,即使编出计算公式以及程序,应用起来也不是很方便

Const C1 = 10 '连续数调整值

Const C2 = 15 '非连续数调整值

Const S = 10 '设定连续范围

Sub process()

Dim a, i!, j!, d!, n

Range("A1")Sort key1:=Range("A1"), order1:=xlAscending

a = WorksheetFunctionTranspose(Range("A1:A" & [A65536]End(xlUp)Row))

For i = 1 To UBound(a)

    d = a(i) + S

    For j = i To UBound(a)

        If j + 1 > UBound(a) Then Exit For

        If a(j + 1) > d Then Exit For

    Next

    If i = j Then '非连续数

        a(i) = a(i) - C2

    Else '连续数

        n = a(i) - C1

        For k = i To j

            a(k) = n

        Next

        i = j

    End If

Next

Range("B1")Resize(UBound(a)) = WorksheetFunctionTranspose(a)

End Sub

效果如图,可下载附件参考

以上就是关于怎样使用EXCEL绘制路基断面图。先谢了,QQ362343630.全部的内容,包括:怎样使用EXCEL绘制路基断面图。先谢了,QQ362343630.、如何在excel中编辑公路坐标交点法程序、怎样利用Excel进行VB编程等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10632086.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-10
下一篇 2023-05-10

发表评论

登录后才能评论

评论列表(0条)

保存