Excel在CAD绘断面图

合集下载

利用EXCEL在AutoCAD中快速绘图

利用EXCEL在AutoCAD中快速绘图

利用EXCEL在AutoCAD中快速绘图利用EXCEL在AutoCAD中快速绘图CAD的绘图其实是执行命令,因此当在CAD中绘制一些图时可以按照CAD的输入格式,把绘图的所有命令和绘图数据在word、记事本或EXCEL等文本编辑器中编辑好后选中复制,再到CAD中,鼠标放在命令行上按右健,出现小菜单后点击粘贴即可。

由于在工程绘图中往往涉及到很多的计算,所以本人建议采用在EXCEL中输入绘图的命令和数据比较合适。

对于一般的绘图上述这些方法可能大多数朋友都已掌握,可是对于批量的文本标注等光采用上述办法还不行,需要一些小技巧。

现本人就以绘制线路征地图(要求标上各桩号和征地宽度)为例(本例共12个桩号)说明上述的这些方法:1.分别打开CAD和EXCEL2.选择EXCEL3.从第2行开始分别在A列输入各桩号、B列输入左幅的征地宽度为“+”、C列输入右幅的征地宽度为“-”4.在D1单元格键入_line,在D2单元格键入公式=MIN(A2:A13)&","&0,在D3单元格键入公式=MAX(A2:A13)&","&05.在E2单元格键入_line6.在F1单元格键入_line,在F2单元格键入公式=A2&","&B27.在G1单元格键入_line,在G2单元格键入公式=A2&","&C28.在H2单元格键入一个空格9.选中单元格区域“E2:H2”,然后下拉复制直至第13行,删除单元格H13内的空格使其为空10.在I2单元格键入_text,在J2单元格键入j,在K2单元格键入bc,在L2单元格键入公式=A2&","&(B2/2),在M2单元格键入2.5,在N2单元格键入-90,在O2单元格键入公式=ABS(B2),设置O2单元格公式为“0.000”11.选中单元格区域“D1: D4”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时绘出线路中线12.转到EXCEL选中单元格区域“F1:F14”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时绘出左幅征地界13.转到EXCEL选中单元格区域“G1:G14”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时绘出右幅征地界14.转到EXCEL选中单元格区域“E2:H13”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时绘出征地宽度线15.转到EXCEL选中单元格区域“I2:O3”(注:两行七列,后一行为空白数据),下拉复制直至第13行16.选中单元格区域“I2:O13”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时标注出第奇数个的左幅征地宽度17.转到EXCEL,删除单元格区域“I4:O12”,然后选中单元格区域“I2:O2”下拉复制一行18.选中单元格区域“I3:O4”(注:两行七列,后一行为空白数据),下拉复制直至第14行19.选中单元格区域“I3:O14”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时标注出第偶数个的左幅征地宽度20.转到EXCEL,删除单元格区域“I3:O13”,然后修改单元格L2公式为=A2&","&(C2/2),修改单元格O2公式为=ABS(C2)21.选中单元格区域“I2:O3”(注:两行七列,后一行为空白数据),下拉复制直至第13行22.选中单元格区域“I2:O13”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时标注出第奇数个的右幅征地宽度23.转到EXCEL,删除单元格区域“I4:O12”,然后选中单元格区域“I2:O2”下拉复制一行24.选中单元格区域“I3:O4”(注:两行七列,后一行为空白数据),下拉复制直至第14行25.选中单元格区域“I3:O14”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时标注出第偶数个的右幅征地宽度26.转到EXCEL,删除单元格区域“I3:O13”,然后修改单元格K2内容为tc,修改单元格L2公式为=A2&","&0,修改单元格O2公式为=A2,重新设置O2单元格公式为“K0+000”27.选中单元格区域“I2:O3”(注:两行七列,后一行为空白数据),下拉复制直至第13行28.选中单元格区域“I2:O13”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时标注出第奇数个的桩号29.转到EXCEL,删除单元格区域“I4:O12”,然后选中单元格区域“I2:O2”下拉复制一行30.选中单元格区域“I3:O4”(注:两行七列,后一行为空白数据),下拉复制直至第14行31.选中单元格区域“I3:O14”复制,然后转到CAD,鼠标放在命令行上按右健,出现小菜单后点击粘贴,此时标注出第偶数个的右幅征地宽度执行完上述即可完成征地图的绘制EXCEL表格设置具体下载附件。

AutoCAD VBA自动获取Excel数据生成塔基断面图

AutoCAD VBA自动获取Excel数据生成塔基断面图

AutoCAD VBA编程:自动获取Excel数据生成塔脚断面图原以为这辈子再不会写程序了,无奈,还得继续……1、测量原始数据、处理结果。

如图:2、原始数据录入Excel ,并整理如下格式:3、因断面图用于设计高低柱、长短腿,在AutoCAD里面只生成A、B、C、D四个腿、以及横线路方向(E)即可。

在CADVBA程序管理器中录入以下程序段:Sub yema()Dim xcelApp As Excel.ApplicationDim xcelSheet As Excel.WorksheetDim strFile As StringstrFile = ThisDrawing.Application.VBE.ActiveVBProject.FileNameSet xcelApp = CreateObject("Excel.Application")xcelApp.Workbooks.Open Left$(strFile, Len(strFile) - 11) & "test.xlsx", , ReadOnly Set xcelSheet = xcelApp.ActiveWorkbook.Sheets(1)Dim mytxt As AcadTextStyleSet mytxt = ThisDrawing.TextStyles.Add("standard")mytxt.fontFile = "c:\windows\fonts\SIMFANG.TTF"ThisDrawing.ActiveTextStyle = mytxt'Dim newl, newl1, xxyLine, xxxLine As AcadSpline'取消顺线路方向Dim newl, newl1, xxyLine As AcadSplineDim startTan(0 To 2) As DoubleDim endTan(0 To 2) As DoublestartTan(0) = 0: startTan(1) = 0: startTan(2) = 0endTan(0) = 0: endTan(1) = 0: endTan(2) = 0Dim ptArr(0 To 92) As DoubleDim ptArr1(0 To 92) As DoubleDim ptArr2(0 To 92) As Double'Dim ptArr3(0 To 92) As DoubleDim i, j As Integeri = 1j = 0Do While i < 32ptArr(j) = xcelSheet.Range("C" & i): ptArr(j + 1) = xcelSheet.Range("D" & i): ptArr(j + 2) = 0ptArr1(j) = xcelSheet.Range("G" & i): ptArr1(j + 1) = xcelSheet.Range("H" & i): ptArr1(j + 2) = 0ptArr2(j) = xcelSheet.Range("K" & i): ptArr2(j + 1) = xcelSheet.Range("L" & i): ptArr2(j + 2) = 0'ptArr3(j) = xcelSheet.Range("O" & i): ptArr3(j + 1) = xcelSheet.Range("P" & i): ptArr3(j + 2) = 0i = i + 1j = j + 3LoopSet newl = ThisDrawing.ModelSpace.AddSpline(ptArr, startTan, endTan)Set newl1 = ThisDrawing.ModelSpace.AddSpline(ptArr1, startTan, endTan)Set xxyLine = ThisDrawing.ModelSpace.AddSpline(ptArr2, startTan, endTan)'Set xxxLine = ThisDrawing.ModelSpace.AddSpline(ptArr3, startTan, endTan) newl.color = acRednewl1.color = acYellowxxyLine.color = acBlue'xxxLine.color = acBlueDim aText, cText, bText, dText As AcadTextDim txtP(0 To 2) As DoubletxtP(0) = ptArr(0) + 20txtP(1) = ptArr(1)txtP(2) = 0Set aText = ThisDrawing.ModelSpace.AddText("A", txtP, 800)txtP(0) = ptArr(90) - 20txtP(1) = ptArr(91)txtP(2) = 0Set cText = ThisDrawing.ModelSpace.AddText("C", txtP, 800)txtP(0) = ptArr1(0) + 20txtP(1) = ptArr1(1)txtP(2) = 0Set bText = ThisDrawing.ModelSpace.AddText("B", txtP, 800)txtP(0) = ptArr1(90) - 20txtP(1) = ptArr1(91)txtP(2) = 0Set dText = ThisDrawing.ModelSpace.AddText("D", txtP, 800)'画坐标Dim xLine As AcadLineDim yLine As AcadLineDim stPoint(0 To 2) As DoubleDim enPoint(0 To 2) As DoublestPoint(0) = -20000: stPoint(1) = 0: stPoint(2) = 0enPoint(0) = 20000: enPoint(1) = 0: enPoint(2) = 0Set yLine = ThisDrawing.ModelSpace.AddLine(stPoint, enPoint)stPoint(0) = 0: stPoint(1) = -13000: stPoint(2) = 0enPoint(0) = 0: enPoint(1) = 13000: enPoint(2) = 0Set yLine = ThisDrawing.ModelSpace.AddLine(stPoint, enPoint)'加坐标度ThisDrawing.SetVariable "PDMODE", 2ThisDrawing.SetVariable "PDSIZE", 300Dim zbPoint As AcadPointDim zbTxt As AcadTexti = -15Do While i < 16stPoint(0) = i * 1000: stPoint(1) = 0: stPoint(2) = 0Set zbPoint = ThisDrawing.ModelSpace.AddPoint(stPoint)stPoint(0) = i * 1000: stPoint(1) = -700: stPoint(2) = 0If i < 0 ThenSet zbTxt = ThisDrawing.ModelSpace.AddText(-i, stPoint, 250) ElseSet zbTxt = ThisDrawing.ModelSpace.AddText(i, stPoint, 250) End Ifi = i + 1Loopi = -6Do While i < 7stPoint(0) = 0: stPoint(1) = i * 2000: stPoint(2) = 0Set zbPoint = ThisDrawing.ModelSpace.AddPoint(stPoint)stPoint(0) = -650: stPoint(1) = i * 2000 - 100: stPoint(2) = 0Set zbTxt = ThisDrawing.ModelSpace.AddText(i, stPoint, 250)i = i + 1Loop'加塔号、塔型Dim titTxt As AcadTextstPoint(0) = 1000: stPoint(1) = -10000: stPoint(2) = 0Set titTxt = ThisDrawing.ModelSpace.AddText(xcelSheet.Range("B32") & "(" & xcelSheet.Range("B33") & ")", stPoint, 800)ThisDrawing.Application.UpdateZoomAllxcelApp.ActiveWorkbook.ClosexcelApp.Workbooks.ClosexcelApp.QuitEnd Sub4、运行结果如下图(OK):。

用excel快速制作cad断面图示例(绝对有用)

用excel快速制作cad断面图示例(绝对有用)

利用EXCEL表格快速在CAD中画横断面图在高速公路项目中,施工单位前期进场都会对原地面进行复测,测量人员要快速地用复测数据绘图并算出土方的填挖量,对项目组织相应的工作策划及部署至关重要。

这也就对测量人员提出了出图效率问题,本文以横断面为例进行说明。

1 数据获取现在施工单位都普及了全站仪,我们只需要将根据地貌特征点选取好断面来测量,在土方的数据量上来说是不会有很大的出入,目前我们大多使用的是CASIO和SHARP-E500计算器,我们最好编写的程序能用坐标计算出此点所对应的桩号、边距(顺路线前进方向左侧边距为负,右侧为正),只需要记录断面桩号、边距、高程就可以顺利出断面图了。

2 Excel上处理数据将现场测量数据录入Excel中,数据格式如下表一,其中D列的100,300,500的等差数组,是为了在CAD上能按断面里程从左至右依次画多个断面图。

使它们不会出现上一断面的右部与下一断面的左部相交。

在E3、F3中先分别输入E2、F2数据并回车后再点击E3、F3,表格亮显后按住右下角的“十”字拖动成了点位数据列。

表一3 绘制图形3.1 绘制路线标准图形绘制标准图形时按照1:1的比例进行绘制,这样在后面填写断面面积、填挖高度时直接将查询数据输入就完事。

根据纵曲线数据计算出K126+270、K126+290、K126+305断面的中桩高程为分别为690.000、690.800、691.400。

K126+270断面的标准图形根据点位坐标(100,690.000)在CAD 中按照路面横坡往两侧绘制路基线,然后在两侧将边坡线连接在路基的两边。

如果后面的断面与本断面也是相同的话,使用CAD中的Copy命令进行复制。

方法是在文本窗口中:选择所有线形,回车确认后在“指定基点或位移”时我们将基点选择在(100,690.000),对于后面的“指定位移的第二点或 <用第一点作位移>:”时输入(300,690.800)回车后继续输入(500,691.400)。

excel表格数据画cad图

excel表格数据画cad图

excel表格数据画cad图竭诚为您提供优质文档/双击可除excel表格数据画cad图篇一:将excel数据导入cad画图的简易方法将excel数据导入cad画图的简易方法在excel的a列给出线上对应点的x值,在b列给出线上对应点的y值,c列输入公式a3缩放至满幅xlbook.closexlapp.quitsetxlapp=nothingendsub3.打开vba编辑器的工具→引用,从引用对话窗找到microsoftexcelxx.xobjectlibrary,点击其左边的□,出现勾符号(如果没有此项,可浏览打开excel.exe文件即可,文件位置一般此是c:\programFiles\microsoftoffice\officexx,其扩展名可能未显示),然后确定。

4.做好这几步之后就保存编辑内容,然后点击工具栏上的▲(向右)或按F5或点击工具菜单→运行就可以画出折线了,到cad界面(excel表格数据画cad图)可见。

或返回cad后按快捷键alt+F8(一次不行就再按一次)启动宏,然后选中名字为zx的那个宏(工程中只有一个宏是默认选中),点击运行按钮,此时cad界面上就会自动将图画出来(轴测图或动态观察可见3d 效果)。

三、用窗体画图1.打开cad,单击cad界面工具菜单→宏→Visualbasic 编辑器,打开Vba编辑器。

(快捷键alt+F1,若一次不行就再按一次)。

2.单击Visualbasic界面插入→用户窗体,主页面会出现窗体窗口,加入控件,标签不是必须,控件属性可以默认。

双击窗体打开窗体代码窗口,向其输入如下代码(画圆弧):privatesubcommandbutton1_click()dimcurves(0to1)asacadentitydimcenterpoint(0to2)asdoubledimradiusasdoubledimstartangleasdoubledimendangleasdoubledebug.printoptionbutton1_debug.printoptionbutton2iftextbox1=""thensetxlapp=createobject("excel.application")setxlbook=xlapp.workbooks.open("d:\cadvba\eaht.xlsx ")打开的excel路径xlapp.Visible=Falsesetxlsheet=xlbook.worksheets("eat")打开excel中名为“eat”的工作表centerpoint(0)=xlsheet.cells(14,1)(圆心x坐标): centerpoint(1)=xlsheet.cells(14,2)(圆心y坐标): centerpoint(2)=xlsheet.cells(14,3)(圆心z坐标){圆心坐标}radius=xlsheet.cells(14,4)(所画弧处圆的半径){半径}startangle=xlsheet.cells(14,5)(所画弧起点弧度值)角度/180*3.141592653endangle=xlsheet.cells(14,6)(所画弧终点弧度值)elsecenterpoint(0)=textbox1centerpoint(1)=textbox2centerpoint(2)=textbox3radius=textbox4ifoptionbutton1=trueandoptionbutton2=Falsethenstartangle=textbox5/180*3.1416endangle=textbox6/180*3.1416elseifoptionbutton1=Falseandoptionbutton2=truethen startangle=textbox5endangle=textbox6elsemsgbox"角度单位不明确"endifendifsetcurves(0)=thisdrawing.modelspace.addarc(centerpoint,radius,startangle,endangle)zoomextentsendsub3.做好这几步之后就保存编辑内容,然后点击工具栏上的▲(向右)或按F5或点击工具菜单→运行就会出现用户窗体,若用excel中数据画弧就点击命令按钮-画弧,若用窗体改变参数就向窗体填数并选择角度单位,然后点击画弧按钮,然后,到cad界面可见既定圆弧线。

用EXCEL输入数据在CAD中计算工程量及生成断面图

用EXCEL输入数据在CAD中计算工程量及生成断面图

用EXCEL输入数据在CAD中计算工程量及生成断面图摘要:本文介绍一种比较简洁的断面输入方法和土方工程量相结合的方法。

关键词:EXCEL 数据AUTOCAD 工程量断面图水利工程的土方工程计量是项重要工作,其方法有很多,最原始的方法是用水准仪配合测绳测得原始断面数据,再把数据用米格纸标出来,形成断面图,然后数需要开挖(或回填)的部分的格数,并按照一定的比例折算成面积,该方法通俗易懂但教繁琐、计算结果误差大、工作效率低。

随着科技的的发展,现在越来越多的企业用GPS全球定位系统或全站仪测得原始地形图然后用自带的软件形成断面图并计算面积,方便快捷,效率高。

因测量数据由测量仪器存储,不同测量仪器软件不同,不同的使用者熟悉程度不同,从工程计量角度看不易复核、校对。

还有一种测量方式是用全站仪或水准仪配合测绳测得原始断面数据,测得断面数据后,进行断面输入,得出断面图与设计线进行比较,计算出工程量。

第三种方法是在日常施工质量控制和工程量计算的常用方法,该种方法需要在测量后在CAD上进行点坐标输入断面输入,点坐标输入需要一个一个点的坐标输入,工作量大而且需要一定的细致耐心,一旦输入出错不易发现,也不利于校核。

笔者在工作中摸索出一种简单的运用EXCEL工作表结合CAD就可以完成日常断面输入的工作,现结合一工程实例将此方法与大家探讨。

方法原理:基于EXCEL电子表格的合并、连接功能结合CAD多线段输入坐标原理。

具体使用方法:EXCEL电子表格的功能十分强大,其中有一种二维坐标和连接功能,用连接符号“&”将该数据默认为一个二维的坐标,使用此符号后就能将所需数据格数据连接在一起。

在EXCEL中数据输入完成后,在AUTOCAD中将所输入的数据用多线段方法粘贴到CAD中的断面网格中,自动生成了工程的断面图。

为了能确切的说明该方法,现用具体的数据输入来介绍一下。

背景简述:某工程为一河道拓宽工程,设计河底高程▽30.0m,宽20米,边坡1:3,干法施工。

利用Excel绘制横断面线的一种方法

利用Excel绘制横断面线的一种方法

利用Excel绘制横断面线的一种方法利用Excel绘制原始地表横断面线的一种方法摘要:本文主要讲解通过利用Excel配合外业测量所取得的数据(平面坐标和高程)的特点进行绘制横断面地表线的一种方法,这种方法灵活简便,强度小,效率高,特别适合现场横断面测量及复测设计院的原始地表线。

关键词:数据采集内业处理横断面绘制在复测设计院原始横断面线形测量中,尤其是在高差陡变频繁的地区,传统的测量方法(标杆皮尺法、水准仪法)使外业与内业工作繁琐且效率低下。

本文通过全站仪置镜于任意控制点测量平面和高程的特点,结合Excel办公软件,介绍一种进行内外业一体化的断面测量方法,这种方法具有灵活简便、劳动量小效率高的特点,特别适合高差变化大的地区。

何为横断面测量?:横断面测量是对线路横向方向剖面的地面起伏进行的测量工作。

是在线路上设计院所有提供的断面桩号横向桩位垂直于线路中线的水平方向上,分别测量中线两侧各变坡特征点至中线桩的水平距离和高差(坐标、高程),并据纵断面里程和横断面面积以计算出挖填的方量。

横断面测量介绍:1、标杆皮尺法:利用花杆直接测得平距和高差。

此法简便、易行,所以被经常采用,它适用于横向变化较多较大的地段,但由于测站较多,测量和积累误差较大。

2、水准仪法:此法适用于施测横断面较宽的平坦地区。

安置水准仪后,以中线桩地面高程点为后视,以中线桩两侧横断面方向的地形特征点为前视,标尺读数读至厘米。

用皮尺分别量出各特征点到中线桩的水平距离(也可用视距测量)。

高差由后视读数与前视读数求差得到。

3、全站仪法:3.1 安置全站仪于中桩上,全站仪定向与切线方向垂直。

量出至中桩地面的仪器高,直接测出各特征象限点与中桩间的平距和高差。

此法适用于一般地形,必须通视条件好。

测量记录:表中按路线前进方向分左侧和右侧,桩号从下往上记录,表中左侧和右侧记录平距和高差,以分数形式记录分子表示高差,分母表示平距,高差为正号表示上坡,负号表示下坡。

浅谈CAD与EXCEL在道路断面绘制中的运用

浅谈CAD与EXCEL在道路断面绘制中的运用

浅谈CAD与EXCEL在道路断面绘制中的运用计算机在道路施工中越来越显示的重要,尤其是图纸的绘制与修改,数据的统计与计算,也就是我们常用的AutoCAD及Excel软件的运用。

本文通过这两款软件的日常运用及总结,对道路横断面绘制提出一些小小的运用。

标签道路横断面绘制;AutoCAD;Excel;一、在道路绘制横断面时面临的问题在道路绘制横断面时,往往要借助一些针对性比较强的专业软件进行,而做为施工单位的技术人员,却面临着:软件种类五花八门,而实际运用却存在着界面不熟悉,操作熟练度小,导致效率不高的问题,而且软件价格也让人望而却步。

二、CAD的运用众所周之AUTO CAD是绘制图形的利器,那么是否可以用AUTO CAD进行道路横断面的绘制呢?答案是肯定的。

但是这里存在一个问题,怎么画?关于这个问题,笔者请教了周边一些CAD制图的朋友,基本上采用相对高程(高差)及宽度进行绘制。

但是这个方法需要进行高差计算,笔者感觉出错几率会增加,且查找纠错难度大。

于是,想到采用绝对坐标的形式来进行断面的绘制。

1、图形的绘制根据绘制坐标的原则,绘制坐标需要(X,Y)的形式,进行总体设想:X 轴为距离(宽度),Y轴为高程,经过实际操作,这个设想完全可行。

再进行进一步设想:①X轴的设置:道路宽度的中点设为0,左侧为负值,右侧为正值,如:绘制0+021断面,道路宽度为9m,则左侧X值为:-4.5,中点X值为0,右侧X值为4.5;②Y轴的设置:道路绝对高程在绘制一个断面的情况下可行,但对于较多断面时,将有较多重叠,这时需加入一个常量以拉开每个断面的距离。

这个常量可以是自行设定的值,也可以桩号为设定值,如:现在绘制0+021断面,中线高程为3.749,则输入Y值为:21+3.749=24.749;绘制0+040断面,中线高程为3.797,则输入Y值为:40+3.797=43.797。

根据以上设定,0+021断面得到三个坐标依次(从左到右)为:(-4.5,24.771),(0,24.749),(4.5,24.717)。

CAD快速绘制道路横断面图的一种新方法

CAD快速绘制道路横断面图的一种新方法

在EXCEL中处理测量数据是利用函数“&”对数据进行连接处理,对所有的测量点都处理成:距中桩距离&“,”&高程,例如在图2中,桩号为K2+160左12m位置高程为691.420,可以在EXCEL工作表中一个相对应的单元格的公式栏中输入=“-12”&“,”&M307,结果单元格显示“-12,691.420”。

在EXCEL中一般按照下列原则处理横断面测量数据:1)每一个数据都要处理成(距离,高程)的形式且占用一个单元格。

2)每一个横断面数据(包括原地面测量数据和路床数据)只占用一行。

3)每一行中的横断面数据自左向右顺序依次是:原地面数据一路床数据,其中原地面数据的顺序是距离中桩最左边的数据依次到距离中桩最右边的数据,路床数据是距离中桩最右边数据依次到距离中桩最左边的数据。

4)每一行结尾几个单元格分别输入Auto CAD命令C、ucs、0,4、L。

最后在EXCEL中拖动填充柄或左键双击K2+160每一个单元格填充柄,EXCEL就会进行自动填充K2+180-K2+240 中的所有数据。

3 使用功能3.1道路横断图自动绘制因为Auto CAD默认EXCEL从左面单元格移至右面单元格是一个键入回车键(Enter),这是Auto CAD能自动绘制横断面图形的一个关键。

对于道路横断图自动绘制,我们首先启动Auto CAD并打开一张新图,在命令行中输入“line”划线命令,Auto CAD在命令行中会提示“ _line指定第一点:”,然后打开EXCEL表格并复制整理完毕的所有测量数据,转到Auto CAD软件中,在命令行中“_line指定第一点:”后右键单击进行粘贴(或者Ctrl+V),AutoCAD会自动绘制横断面图。

一般绘制200-500个横断面图仅仅需要1-3s时间就可以自动完成,非常方便快捷。

下面我们来通过绘制K2+160断面图实例来具体说明Auto CAD如何自动绘图的全过程:①在Auto CAD键入“line”执行画直线命令;②在AutoCAD命令行中使用“Ctrl+V”粘贴所有复制的EXCEL数据;③Auto CAD在画直线命令下会从EXCEL粘贴内容中得到“-12,691.42”的具体位置,Auto CAD就会在“-12,691.42”位置上展上第一点,同时Auto CAD又会自动得到一个回车命令(因为在EXCEL中从“-12,691.42”单元格向右移至“0,691.65”单元格),Auto CAD又要执行“指定下一点”命令,那么会从粘贴内容中得到“0,691.65”数据,Auto CAD就会在“0,691.65”位置上绘制直线的第二点,Auto CAD又会自动要求输入下一点。

用excel数据导出cad道路断面图示

用excel数据导出cad道路断面图示

1 引言传统横断面测量方法有水准仪皮尺法、横断面仪法和经纬仪视距法等,简而言之就是根据地形的变化对与道路轴线方向相垂直的断面进行测量,其中直线段所测断面方向与道路中线方向垂直,而曲线路段与测点的切线方向垂直。

在对横断面测量以后,为计算道路工程土方量,我们紧接着就要绘制道路横断面图。

在实际工作中,横断面图的绘制通常是采用手工在米格纸上按照一定比例用卡规和复式比例尺按照横向是距离、纵向是高程刺点,用小钢笔连接刺点绘制闭合图形。

然后把每一个断面的横断面图分成若干个梯形用复式比例尺和卡规量出每一个梯形的上底、下底和高,计算出每一个梯形的面积,然后把所有的梯形面积相加才得到一个断面面积。

通常道路横断面施测要求每20m测一个断面。

在地形变化较大的位置要加测横断面,这样每1km道路至少要绘制50多个横断面图。

可见如果用传统的方法绘制一条50km的道路断面图工作量是非常巨大的,而且由于是手工绘制,修改起来很麻烦,在实际工作中返工的情况是经常发生的。

由此可见快速高效地绘制出道路横断面图是非常重要的。

笔者根据实际情况发现如果能对Auto CAD系统进行二次开发,运用AutoLISP语言和Visual LISP开发环境进行编程,创建Auto CAD的新命令或重新定义原有的标准命令,提供系统自动执行重复性的计算与绘图任务,此类问题就迎刃而解了,但这要求道路施工人员具备专业性很强的编程知识。

在绘制了大量的横断面图后,笔者总结出一个非常便捷的方法,这种方法不需要道路工程人员具备很强的编程知识,只要具备常规的Excel和Auto CAD知识,就可以自动、精确和快速绘制道路横断面图,并且此方法可以推广至重复性较强的绘图工作。

下面以一个实例进行详细说明。

2 对横断面数据的处理2.1确定边桩位置和高程倾斜地面高等级道路施工测量中的边桩定位一般用逐渐趋近法。

该方法无论采用经纬仪或全站仪都不能直接给出边桩位置,只能通过重复多次测量和计算,才能确定边桩的位置,这种方法的野外工作量较大。

AutoCAD中绘制断面图

AutoCAD中绘制断面图

利用Excel在AutoCAD中批量绘制断面图的方式在高速公路项目中,施工单位前期进场都会对原地面进行复测,测量人员要快速地用复测数据画图并算出土方的填挖量,对项目组织相应的工作策划及部署相当重要。

这也就对测量人员提出了出图效率问题,本文介绍横断面的快速画法及出图。

一、数据获取此刻施工单位都普及了全站仪和GPS,咱们只需要将依照地貌特点点选取好断面来测量,在土方的数据量上来讲是可不能有专门大的出入,目前咱们大多利用的是CASIO和SHARP-E500计算器,咱们最好编写的程序能用坐标计算出此点所对应的桩号、边距(顺道线前进方向左侧边距为负,右边为正),只需要记录断面桩号、边距、高程就能够够顺利出断面图了。

二、excel上的数据处置将现场测量数据录入Excel中,数据格式如下表,P代表偏距,E代表高程,pline表示AutoCAD中的折线命令,C列代表桩号,每一桩号与下一桩号空两行(空格为CAD中的空格键,第一次表示命令终止,第二次表示重复第一次的命令),A列为P,B列为H,红色部份为中桩的偏距和高程。

其中1行、第12行、第23行的0,50,100的等差数组,是为了在CAD上能按断面里程从左至右依次画多个断面图。

使它们可不能显现上一断面的右部与下一断面的左部相交。

其中D=A1+$A$2, E=B2,F=D2&","&E2,表格亮显后按住右下角的“十”字拖动成了点位数据列。

D=A1+$A$2E=B2F=D2&","&E2下面把我在项目部的断面测量完整记录表传给大伙儿3、绘制图形绘制线路标准图形绘制标准图形时依照1:1的比例进行绘制,如此在后面填写断面面积、填挖高度时直接将查询数据输入就完事。

依照YK17+000的中桩高程和设计高程算出填挖方高度,然后再依照各自标段的边坡设计要求,画出坡度线。

再依照路基设计,画出横坡,做好连接。

本标段为填方0~8m为1:放坡。

利用Excel在AutoCAD中批量绘制断面图的方法

利用Excel在AutoCAD中批量绘制断面图的方法

利用Excel在AutoCAD中批量绘制断面图的方法作者:邓华胡来源:《城市建设理论研究》2013年第36期摘要:针对利用EXCEL在Autocad中绘制断面图的问题,本人结合实际操作给出在这方面最为简化的绘图步骤与出图技巧。

关键词: Excel;AutoCAD;断面图;方法中图分类号:U45 文献标识码:A在交通工程路基施工中,施工单位前期进场都会对原地面进行复测,不但是对设计院提供的土石方数量进行复核,也是为了项目经理部准确掌握土石方工程数量后对项目进行施工组织策划和施工部署。

用复测数据绘图并算出土石方的填挖量,这就要求测量人员加快野外数据采集和出图速率,为项目提前动工赢得时间。

本文仅以横断面为例进行出图方法说明。

1 数据获取现在施工单位都普及了全站仪,我们只要根据地貌特征点选取好断面和采集测量数据,基本上就能得到准确的土石方数量。

用全站仪进行特征点的三维坐标测量,测量人员使用的CASIO或SHARP-E500计算器编写的程序都能用平面坐标计算出此点所对应设计路线的桩号、边距(为了便于区分路基左、右边距,以路线前进方向左侧边距为负,右侧为正),记录本上只需要记录断面桩号、边距、高程就可以顺利出断面图了。

2 Excel上处理数据将每个横断面测量数据依次从左到右或者从右到左录入Excel中,数据格式如下表一,其中D列的100,300,500的等差数组,是为了在CAD上能按断面里程从左至右依次画多个断面图,使它们不会出现上一断面的右部与下一断面的左部相交。

在E3、F3中先分别输入E2、F2公式并回车后再点击E3、F3,表格亮显后按住右下角的“十”字拖动成了点位数据列。

表一3 绘制图形3.1 绘制路线标准图形绘制标准图形时按照1:1的比例进行绘制,这样在后面框格内填写断面面积、填挖高度时直接将查询数据输入就可以了,不用再对查询数据进行倍率转换。

根据纵曲线数据计算出K126+270、K126+290、K126+305断面的中桩高程为分别为690.000、690.800、691.400。

利用Excel在AutoCAD中绘制断面图的实践应用

利用Excel在AutoCAD中绘制断面图的实践应用
2006 年 第 8 期 测 绘 通 报 3 1
文章编号 :049420911 (2006) 0820031202
中图分类号 : P258 文献标识码 :B
利用 Excel 在 AutoCAD 中绘制断面图的实践应用
四 、在 AutoCAD 中绘制横断面图
打开 AutoCAD ,选择菜单命令 Draw →Point → Multiple Point (多点) 命令 ,在命令行指定点位置单 击鼠标右键 ,选择 Paste (粘贴) ,将剪贴板上的水平 距离与高程的坐标数据组粘贴过来 ,或在指定点位 置单击鼠标左键后键入 Ctrl + P 粘贴数据 ,通过窗 口缩放你会发现与水平距离和高程对应的所有点已 经全部展绘在 AutoCAD 图中了 ;在缺省情况下 ,点 对象仅被显示为一个小圆点 ,为了使得展点符号更 加清 晰 , 我 们 可 以 采 用 AutoCAD 中 的 系 统 变 量 pdmode 和 pdsize 来改变点的显示类型和尺寸 ,此外 我们也可以用 ddptype 命令在点样式对话框中选定 点的样式和尺寸大小 ,通过 regen 生成新类型和尺 寸的清晰的点 。
ZHAN G Wen2lin , HOU Wu2long
摘要 :介绍从数字地图中量取线路中心线横断面和纵断面上点的距离与高程的坐标数据 ,以及野外实际测量的坐标数据获取方 法 ,并在 Excel 中建立坐标数据组 ,在 AutoCAD 中批量展点 ,从而快速地绘制出横断面图和纵断面图 ,为计算土石方工作量提供准 确的矢量图依据 。 关键词 :断面图 ;测量 ; Excel ;AutoCAD
收稿日期 : 2006206219 作者简介 : 张文林 (19672) ,男 ,河北邯郸人 ,讲师 ,主要研究方向为地理信息系统 、工程测量 。

用excel数据导出cad道路断面图示.

用excel数据导出cad道路断面图示.

1 引言传统横断面测量方法有水准仪皮尺法、横断面仪法和经纬仪视距法等,简而言之就是根据地形的变化对与道路轴线方向相垂直的断面进行测量,其中直线段所测断面方向与道路中线方向垂直,而曲线路段与测点的切线方向垂直。

在对横断面测量以后,为计算道路工程土方量,我们紧接着就要绘制道路横断面图。

在实际工作中,横断面图的绘制通常是采用手工在米格纸上按照一定比例用卡规和复式比例尺按照横向是距离、纵向是高程刺点,用小钢笔连接刺点绘制闭合图形。

然后把每一个断面的横断面图分成若干个梯形用复式比例尺和卡规量出每一个梯形的上底、下底和高,计算出每一个梯形的面积,然后把所有的梯形面积相加才得到一个断面面积。

通常道路横断面施测要求每20m测一个断面。

在地形变化较大的位置要加测横断面,这样每1km道路至少要绘制50多个横断面图。

可见如果用传统的方法绘制一条50km的道路断面图工作量是非常巨大的,而且由于是手工绘制,修改起来很麻烦,在实际工作中返工的情况是经常发生的。

由此可见快速高效地绘制出道路横断面图是非常重要的。

笔者根据实际情况发现如果能对Auto CAD系统进行二次开发,运用AutoLISP 语言和Visual LISP开发环境进行编程,创建Auto CAD的新命令或重新定义原有的标准命令,提供系统自动执行重复性的计算与绘图任务,此类问题就迎刃而解了,但这要求道路施工人员具备专业性很强的编程知识。

在绘制了大量的横断面图后,笔者总结出一个非常便捷的方法,这种方法不需要道路工程人员具备很强的编程知识,只要具备常规的Excel和Auto CAD知识,就可以自动、精确和快速绘制道路横断面图,并且此方法可以推广至重复性较强的绘图工作。

下面以一个实例进行详细说明。

2 对横断面数据的处理2.1确定边桩位置和高程倾斜地面高等级道路施工测量中的边桩定位一般用逐渐趋近法。

该方法无论采用经纬仪或全站仪都不能直接给出边桩位置,只能通过重复多次测量和计算,才能确定边桩的位置,这种方法的野外工作量较大。

cad绘制断面图方法

cad绘制断面图方法

CAD快速绘制道路横断面图的一种新方法时间:2012-03-05 来源:网络浏览次数:15060 次在EXCEL中处理测量数据是利用函数“&”对数据进行连接处理,对所有的测量点都处理成:距中桩距离&“,”&高程,例如在图2中,桩号为K2+160左12m 位置高程为691.420,可以在EXCEL工作表中一个相对应的单元格的公式栏中输入=“-12”&“,”&M307,结果单元格显示“-12,691.420”。

在EXCEL中一般按照下列原则处理横断面测量数据:1)每一个数据都要处理成(距离,高程)的形式且占用一个单元格。

2)每一个横断面数据(包括原地面测量数据和路床数据)只占用一行。

3)每一行中的横断面数据自左向右顺序依次是:原地面数据一路床数据,其中原地面数据的顺序是距离中桩最左边的数据依次到距离中桩最右边的数据,路床数据是距离中桩最右边数据依次到距离中桩最左边的数据。

4)每一行结尾几个单元格分别输入Auto CAD命令C、ucs、0,4、L。

最后在EXCEL中拖动填充柄或左键双击K2+160每一个单元格填充柄,EXCEL就会进行自动填充K2+180-K2+240 中的所有数据。

3 使用功能3.1道路横断图自动绘制因为Auto CAD默认EXCEL从左面单元格移至右面单元格是一个键入回车键(Enter),这是Auto CAD能自动绘制横断面图形的一个关键。

对于道路横断图自动绘制,我们首先启动Auto CAD并打开一张新图,在命令行中输入“line”划线命令,Auto CAD在命令行中会提示“ _line指定第一点:”,然后打开EXCEL表格并复制整理完毕的所有测量数据,转到Auto CAD软件中,在命令行中“_line指定第一点:”后右键单击进行粘贴(或者Ctrl+V),AutoCAD会自动绘制横断面图。

一般绘制200-500个横断面图仅仅需要1-3s时间就可以自动完成,非常方便快捷。

如何使用EXCEL数据绘制CAD图形

如何使用EXCEL数据绘制CAD图形

如何使用EXCEL数据绘制CAD图形推荐文章excel表格如何插入进cad中使用热度:如何使用cad绘制一个方向箭头热度:怎么使用cad绘制工程平面图热度:怎样使用cad 绘制出楼梯热度: cad绘制三维图怎样使用差集命令热度:EXCEL中的数据是可以绘制CAD图形的,那么大家知道如何使用EXCEL数据绘制CAD图形吗?下面是店铺整理的如何使用EXCEL数据绘制CAD图形的方法,希望能给大家解答。

使用EXCEL数据绘制CAD图形的方法打开Excel,输入数据。

复制B列的数据。

打开CAD,输入“pl”,回车。

然后在命令行直接“Ctrl+V”可以以这些点直接生成一条多段线。

上面的例子相当简单,但是引我们思考。

为什么可以直接复制呢?其实CAD是可以读取从Excel在复制过去的内容的。

那么我们就可以把所有可以在命令行输入的内容在Excel中编辑出来然后“Ctrl+C”“Ctrl+V”就OK了。

如下面,我们就用上面的那些数据为圆心绘制半径为1的圆。

在Excel中另起一列输入(="C"&" "&C2&" "&1)括号内的内容。

其中C是CAD中画圆的快捷键,上式C后跟一空格,在CAD中相当于确定命令,接下来C2为圆心坐标,空格,半径1。

&符号在Excel 中是连接符号。

下拉上式得到全部数据的命令。

复制该列数据,在CAD命令行”Ctrl+V“。

从上面可以看出来使用Excel输入在某些时候比用徒手绘制要来得简洁。

我们也可以绘制更复杂的图形。

比如上面的数据我就是从咬合桩数据得来的。

我要绘制的是咬合桩桩的三维图。

我们可以以“圆柱体”命令cyl开头写出咬合桩的通用表达式。

然后直接画图。

也可以写出标注的表达式然后统一标注。

这些就不在详细讲述了,更多的应用还要靠自己去发现。

利用Excel 在AutoCAD 中绘制横断面图的实践应用

利用Excel 在AutoCAD 中绘制横断面图的实践应用

利用Excel 在AutoCAD 中绘制横断面图的实践应用
范长玉;徐菲
【期刊名称】《吉林水利》
【年(卷),期】2010(000)005
【摘要】在Excel 中建立坐标数据组,在AutoCAD 中批量展点,从而快速地绘制出大断面图,为计算断面面积提供准确的矢量图依据.
【总页数】2页(P57-57,72)
【作者】范长玉;徐菲
【作者单位】吉林省水文实验研究所,吉林长春130022;吉林省长春水文水资源分局,吉林长春130022
【正文语种】中文
【中图分类】TP317.3
【相关文献】
1.利用EXCEL在南方CASS7.0中绘制横断面图 [J], 刘学海;郑洪达
2.利用Excel、AutoCAD整理测量数据并自动绘制水利工程断面图 [J], 王洪宝
3.在AutoCAD中利用VBA编程绘制抛物线断面图 [J], 吕明;张松华
4.利用Excel数据合并在AutoCAD中绘制堤防横断面图的探讨 [J], 任少峰
5.利用Excel在AutoCAD中绘制断面图的实践应用 [J], 张文林;侯五龙
因版权原因,仅展示原文概要,查看原文内容请购买。

利用Excel数据在AutoCAD绘图软件中绘制土坝横断面

利用Excel数据在AutoCAD绘图软件中绘制土坝横断面

利用Excel数据在AutoCAD绘图软件中绘制土坝横断面陈鸿遵Excel数据处理软件具有超强的数据处理功能,而AutoCAD绘图软件绘图时需要调入大量的数据,如何在AutoCAD绘图时调入Excel 的数据,笔者根据自己的工作经验,浅谈二者“联姻”的小方法,希望能够为设计绘图工作提供一些便利,并与大家共同探讨交流:1.基本思路AutoCAD绘图时,各种轮廓线(即线段)皆由平面点的坐标(X,Y)连接而成,Excel表格可以提供坐标点(X,Y)格式的数据,把Excel坐标格式的数据提供给AutoCAD软件,二者即可完成“联姻”工作。

2.具体方法:2.1Excel表格数据的录入和生成根据处理后的地形测量和设计数据,在Excel表格中分别依次录入某一横断面各点的横坐标(X)和纵坐标(Y)于两列中,然后在第三列中生成(X,Y)格式的数据。

例如:假设某点坐标为 (X i,Y i)(i =1,2,3,4…),录入时使Ai=X i,Bi=Y i(i=1,2,3,4…),在C列中编辑公式:Ci=Ai&","&Bi(i=1,2,3,4…), 于是该列中的所有数据显示为坐标格式数据,即为我们需要的坐标格式数据(X i,Y i)。

2.2 AutoCAD绘图时数据的调入首先在EXCEL表格中选取该横断面所有坐标格式数据,然后点击复制命令。

如:选取Ci(i=1,2,3,4…20,假设该横断面有20个点),点击鼠标右键,然后点击“复制”命令(或者直接使用快捷键方式:Ctrl+C)。

然后打开AutoCAD绘图软件,点击绘直线命令,在屏幕下方出现命令提示行:“-line指定第一点:”,移动鼠标至该提示行尾,点击鼠标右键,点击“粘贴”命令。

此时AutoCAD绘图区出现该横断面及地面轮廓图。

3.特点3.1为数据检查与修改提供了方便。

利用EXCEL数据处理软件,可以直接录入原始测量数据,通过编辑公式计算,得到我们绘图时需要的坐标数据。

cad绘制横断面

cad绘制横断面

在EXCEL中处理测量数据是利用函数“&”对数据进行连接处理,对所有的测量点都处理成:距中桩距离&“,”&高程,例如在图2中,桩号为K2+160左12m位置高程为691.420,可以在EXCEL工作表中一个相对应的单元格的公式栏中输入=“-12”&“,”&M307,结果单元格显示“-12,691.420”。

在EXCEL中一般按照下列原则处理横断面测量数据:1)每一个数据都要处理成(距离,高程)的形式且占用一个单元格。

2)每一个横断面数据(包括原地面测量数据和路床数据)只占用一行。

3)每一行中的横断面数据自左向右顺序依次是:原地面数据一路床数据,其中原地面数据的顺序是距离中桩最左边的数据依次到距离中桩最右边的数据,路床数据是距离中桩最右边数据依次到距离中桩最左边的数据。

4)每一行结尾几个单元格分别输入Auto CAD命令C、ucs、0,4、L。

最后在EXCEL中拖动填充柄或左键双击K2+160每一个单元格填充柄,EXCEL 就会进行自动填充K2+180-K2+240 中的所有数据。

3 使用功能3.1道路横断图自动绘制因为Auto CAD默认EXCEL从左面单元格移至右面单元格是一个键入回车键(Enter),这是Auto CAD能自动绘制横断面图形的一个关键。

对于道路横断图自动绘制,我们首先启动Auto CAD并打开一张新图,在命令行中输入“line”划线命令,Auto CAD在命令行中会提示“ _line指定第一点:”,然后打开EXCEL表格并复制整理完毕的所有测量数据,转到Auto CAD软件中,在命令行中“_line指定第一点:”后右键单击进行粘贴(或者Ctrl+V),AutoCAD会自动绘制横断面图。

一般绘制200-500个横断面图仅仅需要1-3s时间就可以自动完成,非常方便快捷。

下面我们来通过绘制K2+160断面图实例来具体说明Auto CAD如何自动绘图的全过程:①在Auto CAD键入“line”执行画直线命令;②在AutoCAD命令行中使用“Ctrl+V”粘贴所有复制的EXCEL数据;③Auto CAD在画直线命令下会从EXCEL粘贴内容中得到“-12,691.42”的具体位置,Auto CAD就会在“-12,691.42”位置上展上第一点,同时Auto CAD又会自动得到一个回车命令(因为在EXCEL中从“-12,691.42”单元格向右移至“0,691.65”单元格),Auto CAD又要执行“指定下一点”命令,那么会从粘贴内容中得到“0,691.65”数据,Auto CAD就会在“0,691.65”位置上绘制直线的第二点,Auto CAD又会自动要求输入下一点。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

文章编号:0494-0911(2006)08-0031-02中图分类号:P258文献标识码:B利用Excel 在AutoCAD 中绘制断面图的实践应用张文林1,侯五龙2,3(1.河北工程大学水电学院,河北邯郸056021;2.北京市水务局,北京100038;3.河南省登封市建设管理局,河南登封452470)Cross Section and Profile Dia g ram Drawin g b y Usin g Excel in AutoCADZHANG Wen-lin ,HO U Wu-lon g摘要:介绍从数字地图中量取线路中心线横断面和纵断面上点的距离与高程的坐标数据,以及野外实际测量的坐标数据获取方法,并在Excel 中建立坐标数据组,在AutoCAD 中批量展点,从而快速地绘制出横断面图和纵断面图,为计算土石方工作量提供准确的矢量图依据。

关键词:断面图;测量;Excel ;AutoCAD收稿日期:2006-06-19作者简介:张文林(1967-),男,河北邯郸人,讲师,主要研究方向为地理信息系统、工程测量。

一、引言在开挖河道、修建渠道或道路等带状工程中,在地面上定出其中心位置,然后沿路线方向测出其地面起伏情况,并绘制成纵横断面图,作为设计路线坡度和计算土石工程量的依据。

线路测量一般包括踏勘选线、中线测量、纵横断面测量、纵横断面的绘制、在纵横断面上进行线路设计和土石方计算,以及边坡放线等工作。

为了便于计算线路长度和绘图施工,必须从线路起点开始,沿着线路中心方向丈量长度,每隔20m ,30m ,50m 或100m 打一标桩(一般山地、丘陵地区桩距为20m 或30m ,平原地区桩距为50m 或100m ),称为里程桩,在两里程桩之间地形坡度有明显的变化处或经过河、沟、坑、路以及需要构筑水利工程的地方,都应打标桩,称为加桩,将各桩距起点的距离标注在桩上,作为桩号,如56+200,即表示该桩距起始点距离为56200m 。

纵横断面图绘制对于几十千米长的线路来说是一项繁重而又大量重复的工作,即使是每100m 绘制一个横断面图,也需要成百上千个,有些复杂的地段还要加绘横断面图,因此,如果能有一个准确、快捷的绘制方法,将会使我们的工作效率大为提高。

现在虽然有一些软件可以自动生成断面数据和断面图,这些软件往往是在数字地图的DI M 模型(三角网图)上画出要截取的断面路线并获取断面数据,但对于许多技术人员来说要么软件用的不够熟练,要么软件中生成的数据与现状有较大差距,生成的断面数据仍需要有较大的修改才能使用。

在多次的断面图绘制实践中,我们总结了一套利用Excel 编辑数据,在AutoCAD 中快速展点并绘制断面图的简单方法,并以横断面图为例加以介绍。

二、横断面数据获取的几种方法1.数字地形图上横断面数据的量取如图1所示为河北省岳城水库下游民有总干渠一段渠道的地形图(比例尺为1:500),因年久失修,多处破损,个别地方垃圾、秸秆等物淤塞渠道,严重影响过水能力,经水利部门研究,于2005年底立项修整渠道,渠道顶面宽度约为21m ,底宽约为11m ,沿渠道中心线每100m 绘制50m 宽的横断面图。

首先在AutoCAD 中利用多义线(Pline )在原地形图上绘制渠道中心线;然后创建长度为50m 的竖直线为“块”,名称为“K ”,基点(base p oint )为该线段的中点(Mid p oint ),选取对象(Select ob j ects )为该线段;再用定距等分(measure )命令量取渠道中心线,指定块为K ,指定长度为相当于实地100m 的图上长度(即在1:1000输入100,在1:500输入200),在是否对齐块和对象中(Ali g n block with ob j ect ?<Y >)选择y ,则在渠道中心线上标出了垂直于中心线的横断面位置线,自渠道中心线起始位置开始注记各横断面的里程,如图56+200。

为了精确量距,可将捕捉方式设定为端点、交点并打开,用DIS T 命令量取断面起点A 至A ,B ,C ,…,G 的距离,得到距离数值为0m ,15.58m ,20.39m ,…,50m 。

在地形图上根据断面周围高程数据采用内插法得出A ,B ,C ,…,G 的高程为132006年第8═══════════════════════════════════════════════════════════════════期测绘通报56.51m ,56.51m ,54.52m ,…,56.66m 。

图12.实测横断面数据在没有数字地形图资料或地形图比例尺较小时,为了保证断面数据的精度,我们在实地量测断面数据,首先沿渠道中心线在施工范围以外埋设高程和平面控制点,每隔1~3km 敷设一临时水准点,精确测定了各水准点的高程和坐标之后,可以用全站仪按三角高程测量的方法依次测量渠道中心线上各里程桩和加桩点的高程,标定横断面方向可将简单十字架立于中心桩上,将相互垂直的两根横木条中的一根横木条上的两钉瞄准前(或后)一个中心桩,则另一根横木条上的两钉瞄准的方向就是与中心线成垂直的横断面方向,用反射棱镜的标杆和皮尺配合测量得出横断面上平距和高差对应的数据组,逐站实测,测到适当距离与临时水准点连测,以便检查渠道的高程成果是否符合精度要求;当具备测图软件时,在现场可以不用皮尺丈量横距而将全站仪中的横断面上各点的坐标和高程数据展绘成1:1000的数字地图,在数字地图中量出渠道横断面平距和高程数据。

三、利用Excel 建立数据文件将上述获得的距离和高程数据输入Excel 表格中,如图2所示,第A 列为里程桩号,第B 列为断面上各点高程,第C 列为各点相对于该断面起点的水平距离。

在D 列2行单元格输入命令:=C1&“,”&B1并回车,在D 列2行就出现0,56.51的水平距离与高程的坐标对,把鼠标放在D 列2行单元格单击鼠标左键,当指针变成细十字时,按住鼠标左键向下拖动鼠标进行复制,这样我们就得到了一组如图2中D 列所示水平距离与高程的坐标对数据组,选中该数据组将其复制(Ctrl +C )到剪贴板上,完成数据编辑。

图2四、在AutoCAD 中绘制横断面图打开AutoCAD ,选择菜单命令Draw →Point →M ulti p le Point(多点)命令,在命令行指定点位置单击鼠标右键,选择Paste (粘贴),将剪贴板上的水平距离与高程的坐标数据组粘贴过来,或在指定点位置单击鼠标左键后键入Ctrl +P 粘贴数据,通过窗口缩放你会发现与水平距离和高程对应的所有点已经全部展绘在AutoCAD 图中了;在缺省情况下,点对象仅被显示为一个小圆点,为了使得展点符号更加清晰,我们可以采用AutoCAD 中的系统变量p dmode 和p dsize 来改变点的显示类型和尺寸,此外我们也可以用dd p t yp e 命令在点样式对话框中选定点的样式和尺寸大小,通过re g en 生成新类型和尺寸的清晰的点。

用p line (多义线)从左至右依次连接各点即得56+200的横断面图。

如图3所示,在适当位置画上水平距离与竖直高程标尺,这样56+200的横断面图就完整地画出来了,其比例尺为1:1,即在图中用量距命令DIS T 所量数据为实地长度和高差,用坐标查询命令ID 所量数据为距离与高程的坐标数据。

当我们在图中绘出设计断面图后,可以很方便地测出填挖方区域的面积,从而计算出土石工程量;若我们要绘制1:50或1:100的横断面图,则在Au-toCAD 出图时将打印比例设为5mm :1绘图单位或10mm :1绘图单位。

图3民有总干渠横断图(56+200)(下转第45页)23测绘通报2006年第8═══════════════════════════════════════════════════════════════════期virtual CA T V T yp e Get T yp e()=0;//对象类型,对应缆段类型};系统采用ESRI公司的ArcOb j ects为平台,利用VC++编程实现。

ArcOb j ects是有GIS功能和可编程接口的软件组件集合,ArcOb j ects技术是基于COM协议,使用内置VBA脚本语言或服从COM可编程语言如VB,VC++或Del p hi进行定制。

通过VC++开发形成的有线电视网络管理系统主界面如图2所示。

图2有线电视网络管理系统主界面五、结束语本文主要分析了基于GIS的有线电视网络管理系统的基本功能。

可以看出,利用GIS技术可以综合多种先进的信息技术,为有线电视网络管理部门的管理、规划设计、运行维护、资产管理等业务提供了高效率的工作方式和全新的技术手段,同时也提高了相关部门的管理水平和服务水平。

参考文献:[1]严威,等.地理信息系统在有线电视网络管理中的应用[J].北京广播学院学报(自然科学版),2003,10(1):33-37.[2]金永平,等.青岛有线电视地理信息系统的开发与应用[J].中国有线电视,2002,(5):43-45.[3]王开伟,等.Ma p Info在有线电视网络设计与管理中的应用[J].有线电视技术,2004,(5):52-56.[4]陈安顺.柳州市有线广播电视网络GIS系统技术方案[J].有线电视技术,2004,(8):==================================================75-78.(上接第32页)五、纵断面图绘制利用渠道中心线上各里程桩的高程数据绘制纵断面图,可以直观地反映渠道中心线地面起伏情况,便于设计渠道纵坡、水深、填挖高度和边坡位置。

在AutoCAD中绘制渠道中心线的纵断面图时,首先编制纵断面里程与高程的坐标数据组的Excel格式数据文件,由于渠道中心线上高差和距离相比来说要小得多,所以在绘制纵断面时,水平距离和高程的比例尺是不一样的,水平距离比例尺常采用1:1000~1:10000,高程比例尺采用1:100~1:200。

与横断面绘制方法类似,将Excel中里程与高程数据计算为坐标数据,在AutoCAD中粘贴展点,连线成图,在适当位置画上里程与高程标尺,就得到了1:1的纵断面图,为了使纵横向比例得到改变,可以将纵断面图当成块文件,在新建的AutoCAD文件中插入该文件块,在缩放比例更改X和Y的比例,从而使里程和高程的比例符合要求。

六、结束语线路测量中包括了大量的横断面绘制和纵断面绘制,通过在Excel中编辑距离与高程的坐标数据组,在AutoCAD中利用这些数据多点粘贴,可以快速地完成批量展点,较以往逐点输入坐标数据的方法更加快捷,成倍地提高了工作效率,同时也减少了错误环节,提高了数据的准确性,为工程量计算提供了可靠的依据。

相关文档
最新文档