ExcelVBA开发渠道纵断面图辅助绘图程序实践与探讨本文由rbjeeh贡献doc文档可能在WAP端浏览体验不佳。建议您优先选择TXT,或下载源文件到本机查看。本文由pingtoul68贡献pdf文档可能在WAP端浏览体验不佳。建议您优先选择TXT,或下载源文件到本机查看。新疆农业大学学报2009,32(1):89〜92Journa1ofXinjiangAgriculturalUniversity文章编号：1007—8614(2009)01—0089—04ExcelVBA开发渠道纵断面图辅助绘图程序实践与探讨董文明1,马英杰1,崔龙1,孔德庸100094)(1•新疆农业大学水利与土木工程学院，乌鲁木齐830052；2•屮国农业大学资源与环境学院。北京摘耍：使用Excel的VBA编程功能，将设计好的数据自动的输出为AutoCAD的命令组文件(Script),在Au一toCAD里运彳亍该命令组文件，即口r快速的绘制渠道纵断面图。使用该程序时.还可根据各项目的特点修改局部参数和预设图框内容，直接批量生成施工图.极大程度上减化了渠道设计人员的绘图工作。关键词：Exce1；AutoCAD；VBA编程；渠道纵断面图绘图；传统绘图方法文献标识码：A中图分类号：TV222.1PracticeandDiscussiononAuxi1iaryDrawingRoutineofExcelVBADeve1opmentChanne1ProfileDiagramDONG(1.Co1legeofWen一min91,MAYin-jie1,CUILon91,KONGDe—yon92WaterConservancyandCivi1Engineering,XinjiangAgricu1tura1University,Urumqi830052；2.CollegeofResourcesandEnvironmentScience,ChinaAgricu1tura1University,Beijing100094)Inthispaper,itintroducesfinishcanAbstract：animprovedwaytotohelpUStocanalrunprofi1ediagram.TheinAutoCAD,canhelpway,withthehelpofVBAprogramsinExcelUStomakeScriptfileswhichbefinishthecanalprofi1ediagramseasi1ywhenWedesigncana1s.WhenprogramingfunctionwasmadeusingExcelVBA,thedesigneddatawereautomaticallyoutputforthecommondgroupofAutoCADfi1es(Script),thenachanne1Profi1ediagramcouldimmediatelybefinished.Whenusingtheprogram,itcou1dcono—bemodifiedinaccordancewiththepurposeofthecharacteristicsoflocalmappresetparametersandtentofthebox.D■1rect1ytheW0rk1ngt0adrawingc0u1dgreatexteatbePr0duced0na1argesca1ewhic:hc0u1ddecreasedraw1ngw0rk0fchanne1des1gnersKeyW0rds••EXce1；AutoCAD；VBAProgramming；channe1sectionsauxi1iarydrawing；traditionalingmethoddraw—Exce1电子表格是工程设计人员进行数据处理的一种常用工具。特别是渠道设计者，大部分利用Excel表格处理断面数据（地面高程、渠底高程等）但将数据录入到，AutoCAD中绘制断面图却产生了一定的困难，釆用常规的手工录入数据，绘制各条设计线的方法，其效率和正确率都很低，一直以来，不收稿FI期：2008—10-12基金项目：新疆水利水电重点学科基金项目通讯作者：马英杰.E—mai1:dwm@xjau.edu.cn少设计者在Exce1和CAD之间寻求着快捷、便利的方法,诸如：复制、粘贴或利用手工编制cAD命令组文件，虽然取得了一定的进展，但工序烦琐，人工参与较多，当然，目前也有不少相关软件，但由于价格偏高或有的需要程序读取和数据转换，成图效率低等特点，并不能真正意义上给广大的渠道设计者万方数据90新疆农业大学学报提供便利。笔者在长期实践工作中利用Exce1的VBA编程功能，将设计好的数据自动输出为Auto一CAD的命令组文件（Script）结合AutoCAD内部的，命令组文件。开发出一套可快速绘制渠道纵断面图的渠道辅助绘图程序。该程序还可根据各项目的特点修改局部参数和预设图框内容,直接批量生成施工图。Sheet1中第i行、笫j列单元格数值2程序编制的实现过程在C盘（也可其它盘符，本研究以C盘编制程序）建立"Cana1”子目录，后续的CAD图、Excel表格、程序生成文件均在此目录下。2.1渠道设计的Exce1表格建立在Canal目录下新建名为“渠道绘图”的Exce11程序编制的基本原理程序编制的基本原理主要是通过Exce1VBA编制程序读取Exce1渠道设计数据并生成AutoCAD可以执行的命令组文件（SeriPt）命令组文件也称脚本。研究件，是CAD中读人并能莺复执行CAD命令的文件（以下简称scr文件）,相当于Dos系统下的批处理文件［1］。如建立...