Excel VBA在导线近似平差计算中的应用.pdf

《Excel VBA在导线近似平差计算中的应用.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、·31·地矿测绘2015，31(2)：31—34CN53一l124／TDISSN1oo7—9394SurveyingandMappingofGeologyandMineralResourcesExcelVBA在导线近似平差计算中的应用刘科，廖中平，余泽彬(1．道路灾变防治及交通安全教育部工程研究中心，湖南长沙410004；2．长沙理工大学交通运输工程学院，湖南长沙410004)摘要：传统导线平差计算过程繁琐，且易受人为因素影响。利用ExcelVBA编程进行导线自动平差计算，平差结果包括自动生成的CASS展点文件和平差报告。当观

2、测数据存在粗差，可进行一个转角或一条导线边粗差的自动查找。以闭合导线平差计算为例，本程序可快速检查数据且计算出未知点坐标。关键词：导线平差；ExcelVBA；数据检查；CASS中图分类号：P221．4文献标识码：B文章编号：1007—9394(2015)02—0031一o4ApplicationofExcelVBAinApproximateAdjustmentofTraverseLIUKe，LIAOZhong．ping，YUZe—bin(1．EngineeringResearchCenterofCatastrophicProp

3、hylaxisandTreatmentofRoad&TraficSafety，ll~nistryofEducation，ChangshaHunan410004，China；2_SchoolofrrqCficandTransportationEngineering，ChangshaUniversityofScienceandTechnology，ChangshaHunan410004，China)Abstract：Theprocessoftraditionaladjustmentcalculationoftraversesurv

4、eyisnotonlytedious，butalsoeasytobeinfluencedbyhumanfactors．WecanutilizethedevelopmenttoolsVBAintheExceltoprogramtofinishtheprocessauto-matically．TheadjustmentresultsincludethefileofpointsforCASSandtherepoa．WhentheobserveddataincludesthegrosserlY)rs，theprogramcanbeap

5、pliedtofindoutthemistakeontheconditionthatonlyoIIeangleorsidecontainsgrosserror．Bytakingtheadjustmentcalculationofclosedtraverseforanexample，wecanrapidlycheckthedataandcancal—culatethecoordinateofunknownpointsbyusingtheprogram．Keywords：traverseaajustment；ExcelVBA；da

6、tacheck；CASS需选择导线类型和输入未知点个数，程序就会自动生成相应的O弓l言导线平差计算表格。导线内业平差是工程勘测中常见的一项数据处理工作，一表格的自动生成主要调用ExcelVBA中常用的几个函数，般测绘人员借助科学计算器按相应的导线平差计算表格进行分如单元格选定函数cell、单元格合并函数merge、边框加粗函数步计算，过程较繁琐。当测区面积较大，待计算导线数较多时，border等Is]。计算量就成倍增加。若导线平差出错，数据检查比较繁琐，需重2单一附合导线的计算新输入数据¨-3]。MicrosoftExcel表

7、格界面友好、清晰、直观，同时内置大量公式与函数，使其具有强大的计算功能。将Excel导线可分为闭合导线、附合导线和支导线，其中支导线只有特性与传统的导线近似平差结合，计算将非常简单I5J。本文必要的起始数据，缺少对观测数据的检核。3种导线计算步骤虽不完全相同，但计算原理基本一致。以附合导线平差计算在计算导线点坐标的基础上，增加了导线测量数据错误检查功过程为例，其计算原理如下：附合导线计算的起算数据一般包括能，进一步完善导线计算过程。其主要包括表格的制作、坐4个已知点坐标及待测点观测角度与边长。本文中起算数标计算及测量数据错误检

8、查三个部分。据及计算表格，如图1所示。1导线平差界面设计2．1角度闭合差与方位角的计算附合导线角度闭合差的计算公式：Excel导线平差计算表格设计，采取与传统导线平差计算表=p测一p理(1)格一致。计算表格的大小，可根据计算的需要而改变，使用者只收稿日期：2015—03—21