论文部分内容阅读
摘要：在测量工作中，我们可以通过Excel中的函数的应用可以在Excel中更好的实现数据处理的功能，能够通过函数开发功能，更加高速的完成数据处理，同时利用自带的VBA程序还可以在计算机上模拟施工放样等。
关键词：Excel 函数开发 工程测量 数据处理
中图分类号：K826.16 文章标识码：A文章编号：
笔者编写了一系列辅助计算软件进行检算测量成果的计算程序，能够计算四等水准测量的内业，左右角的闭合差计算，同时利用VBA程序的二次开发在程序中做到了模拟绘制导线图和模拟放样的简易程序，通过Excel二次开发，能够降低劳动强度，同时能够加快测量内业的计算速度。
1．四等水准测量（双面尺法）
1．1引入
本计算程序主要采用的是Excel中自带的函数公式编辑，通过函数的编写，能够达到记录成果，检验成果。在测量时可以随时录入数据，程序会自动纠正由于各种原因导致的错误，能够减少因读数不准确等导致的数据错误，填制数据后如图1所示：
图1
1．2函数设置
当完成需要控制的数据量时候，我们需要利用Excel自带的函数功能完成上述功能的编写。前后视距差不能大于十米需要设置条件格式，条件格式设置为大于10m时，单元格底色变为红色，通过条件格式即可实时监控视距差的情况，同时便于下一个点位的调整。上丝与下丝的差在3mm以内同样通过if函数进行定义，在上图中，通过K列数值进行检验，采用的是条件格式预警，能够直观的检验出双面尺法的读数是否有错误。在剩余单元格中，主要是涉及一般的加减乘除运算。
2．导线测量（测回法）
2．1引入
导线测量是平面控制测量的组成部分，是在测区内选定一批平面控制点，组成平面控制网，用精确的方法测量这些点的平面位置，并计算出他们的坐标。在修筑建筑物时通过上一级控制测量选定的控制点进行放样，确定建筑物的平面位置。在平面控制测量中主要运用的是两种仪器：经纬仪或全站仪。笔者就经纬仪的测量数据（左角）编写出相应的内业计算表格。
图3
2．2函数设置
下面笔者将就表格函数编写中的一些函数做说明。
在B、C、D列中，是间接输入测得角度的输入栏，I列是测得的两点之间的距离，N4、O4控制点的平面坐标，N11、O11是终点的平面坐标，表格可以根据所测点位的增加减少而改变。该表中第1个点为已知坐标点，“α1”为该已知点至下一导线点的坐标方位角。“未知点个数n”为闭合导线的边数。
14~16行分别为一些检验数的计算情况，能够及时反映出在分配角度后的全长闭合差，以及恒定本次导线测量的质量水平的数据。下面将就本表运用的主要函数归纳如下：
3．VBA程序扩展应用
通过VBA程序可以在Excel中添加VB程序，能够加快程序的开发作用。在Excel中实现60进度的角度问题有很多种方法，通过VBA程序也能够更加快捷的实现，在具有VB编程常识的基础下，利用VBA能够更快的编写需要的程序。
首先，打开Excel，按AIt+F11即进VB工程资源管理器界面，通过模块的插入可以解决60进制的问题。
代码如下：（单引号后为程序语句注释）
Public Const pi=3．14159265359’定義函数π的数值
Public Function DG(n As Double) ’定义函数名称为DG，n为参数，双精度变量
Dim A As Double．B As Double，C As Double，D As Double，E As Double，F As Double，G As Double，KAAs Double’定义A~G 参数分别为双精度型变量
D=Abs(n)+0．00000001’求整数n的绝对值加上微小值
F=Sgn(n) ’ 返回一个整型变量，指出参数n的正负号，并赋值于F
A=Int(D) ’得到度
B=Int((D—A)*100)’得到分
C=D—A—B/100 ’得到秒
DG=F*(A+B/60+C/0.36)*pi/180’将数值化为60进制的关键程序语句
End Function’结束函数
这样。就定义了一个名字为DG的函数，它的作用就是转换60进制的角度为Excel认识的弧度。编辑完后按AIt+Q返回Excel。再在某一单元格输=sin(dg(单元格的值，也可以是输入的角度值))，回车，就计算出了成果。同样，还可以利用VBA程序计算导线，也可以利用Excel把工作表中点的坐标值（二维或者三维）在CAD中展绘出来，这里就不再一一介绍。
4．结语
利用常见函数和公式引用能够迅速完成导线测量的计算工作，能够大大减少在测量内业计算中所需要的大量人力物力，同时能够将数据连接到平差计算程序中，在计算机中完成平差计算及导线图及导线控制点的绘制，对模拟放样，计算机自动绘图具有重要的意义。Excel的功能是非常强大的。利用他可完成许多测量上的计算，而且方法要方便的多。
参考文献：
1 王兆祥.《铁道工程测量》[M]北京：中国铁道出版社，1998.1
2 国家标准.工程测量规范（GB50026-2007）[S].北京：中国计划出版社，2007
关键词：Excel 函数开发 工程测量 数据处理
中图分类号：K826.16 文章标识码：A文章编号：
笔者编写了一系列辅助计算软件进行检算测量成果的计算程序，能够计算四等水准测量的内业，左右角的闭合差计算，同时利用VBA程序的二次开发在程序中做到了模拟绘制导线图和模拟放样的简易程序，通过Excel二次开发，能够降低劳动强度，同时能够加快测量内业的计算速度。
1．四等水准测量（双面尺法）
1．1引入
本计算程序主要采用的是Excel中自带的函数公式编辑，通过函数的编写，能够达到记录成果，检验成果。在测量时可以随时录入数据，程序会自动纠正由于各种原因导致的错误，能够减少因读数不准确等导致的数据错误，填制数据后如图1所示：
图1
1．2函数设置
当完成需要控制的数据量时候，我们需要利用Excel自带的函数功能完成上述功能的编写。前后视距差不能大于十米需要设置条件格式，条件格式设置为大于10m时，单元格底色变为红色，通过条件格式即可实时监控视距差的情况，同时便于下一个点位的调整。上丝与下丝的差在3mm以内同样通过if函数进行定义，在上图中，通过K列数值进行检验，采用的是条件格式预警，能够直观的检验出双面尺法的读数是否有错误。在剩余单元格中，主要是涉及一般的加减乘除运算。
2．导线测量（测回法）
2．1引入
导线测量是平面控制测量的组成部分，是在测区内选定一批平面控制点，组成平面控制网，用精确的方法测量这些点的平面位置，并计算出他们的坐标。在修筑建筑物时通过上一级控制测量选定的控制点进行放样，确定建筑物的平面位置。在平面控制测量中主要运用的是两种仪器：经纬仪或全站仪。笔者就经纬仪的测量数据（左角）编写出相应的内业计算表格。
图3
2．2函数设置
下面笔者将就表格函数编写中的一些函数做说明。
在B、C、D列中，是间接输入测得角度的输入栏，I列是测得的两点之间的距离，N4、O4控制点的平面坐标，N11、O11是终点的平面坐标，表格可以根据所测点位的增加减少而改变。该表中第1个点为已知坐标点，“α1”为该已知点至下一导线点的坐标方位角。“未知点个数n”为闭合导线的边数。
14~16行分别为一些检验数的计算情况，能够及时反映出在分配角度后的全长闭合差，以及恒定本次导线测量的质量水平的数据。下面将就本表运用的主要函数归纳如下：
3．VBA程序扩展应用
通过VBA程序可以在Excel中添加VB程序，能够加快程序的开发作用。在Excel中实现60进度的角度问题有很多种方法，通过VBA程序也能够更加快捷的实现，在具有VB编程常识的基础下，利用VBA能够更快的编写需要的程序。
首先，打开Excel，按AIt+F11即进VB工程资源管理器界面，通过模块的插入可以解决60进制的问题。
代码如下：（单引号后为程序语句注释）
Public Const pi=3．14159265359’定義函数π的数值
Public Function DG(n As Double) ’定义函数名称为DG，n为参数，双精度变量
Dim A As Double．B As Double，C As Double，D As Double，E As Double，F As Double，G As Double，KAAs Double’定义A~G 参数分别为双精度型变量
D=Abs(n)+0．00000001’求整数n的绝对值加上微小值
F=Sgn(n) ’ 返回一个整型变量，指出参数n的正负号，并赋值于F
A=Int(D) ’得到度
B=Int((D—A)*100)’得到分
C=D—A—B/100 ’得到秒
DG=F*(A+B/60+C/0.36)*pi/180’将数值化为60进制的关键程序语句
End Function’结束函数
这样。就定义了一个名字为DG的函数，它的作用就是转换60进制的角度为Excel认识的弧度。编辑完后按AIt+Q返回Excel。再在某一单元格输=sin(dg(单元格的值，也可以是输入的角度值))，回车，就计算出了成果。同样，还可以利用VBA程序计算导线，也可以利用Excel把工作表中点的坐标值（二维或者三维）在CAD中展绘出来，这里就不再一一介绍。
4．结语
利用常见函数和公式引用能够迅速完成导线测量的计算工作，能够大大减少在测量内业计算中所需要的大量人力物力，同时能够将数据连接到平差计算程序中，在计算机中完成平差计算及导线图及导线控制点的绘制，对模拟放样，计算机自动绘图具有重要的意义。Excel的功能是非常强大的。利用他可完成许多测量上的计算，而且方法要方便的多。
参考文献：
1 王兆祥.《铁道工程测量》[M]北京：中国铁道出版社，1998.1
2 国家标准.工程测量规范（GB50026-2007）[S].北京：中国计划出版社，2007