Excel内嵌VBA和COM代码在测量计算中的应用.pdfVIP

浙江林学院学报2008，25(1)：83—87 Journal ofZhejiangForestryCollege 陈永刚，施拥军，汤孟平，徐文兵 (浙江林学院环境科技学院，浙江临安311300) 摘要：为了能够解决测量平差计算烦琐复杂和人工编写Cass展点文件容易出错的问题，提出一种在Excel中嵌入VBA 江林学院数字植物园的1：500大比例尺基础地形图测绘工作中，利用该方法快速准确地进行了25个点的闭合测量导 线平差计算和近1．2万个展点文件的自动生成，计算结果均准确无误。该方法可使测量导线平差计算和Cass展点文 件生成变得简单方便高效。图5参15 关键词：工程测量；测量平差；格式转换；VBA代码；COM模块；Excel应用 中图分类号：TB22；$7711 文献标志码：A 文章编号：1000-5692(2008)01-0083-05 MeasurementsandcalculationswithembeddedVBA andCOMcodesinExcel CHEN Yong—gang，SHIYong-jun，TANGMeng—ping，XUWen-bing ofEnvironmental (School Technology，ZhejiangForestryCollege，Lin’all311300，Zhejiang，China) isto andcreate in Abstract：Theaim calculationsofmeasurement simplify adjustment points’filescomputer assisted this basicfor search,service(CASS)automatically．Instudy，visual wereembeddedintoMicrosoftExcel．Calculationsof componentobjectmodel(COM)codes adjusted measurementswere and filesin were created．Withthis simplifiedpoint CASS automatically method，first COMmoduleswith convertsandCASS anactive fromVC angle pointsusing template were moduleswereusedwithVBAcodeinExcelSOthatmeasurement developed．Then，COM adjustments werecalculatedand flieswere methodwasusedfor point created．nis topographic automatically 25 from1：500 inthe botanicalof Forestry with pointsbeing large—scalemaps digital gardenZhejiang College calculated