利用VBA编程实现从EXCEL表到AUTOCAD表转换(1)
2015-03-06 01:22
导读:计算机应用论文论文,利用VBA编程实现从EXCEL表到AUTOCAD表转换(1)怎么写,格式要求,写法技巧,科教论文网展示的这篇文章是很好的参考:摘要: 该程序可将Excel表格中的所有单元格全部按原来大小、风格转换到AutoC
摘要: 该程序可将Excel表格中的所有单元格全部按原来大小、风格转换到AutoCAD文件中来。在转换过程中,表格线条的转换和文字转换是重点。文字转换采用了直接利用AddMtext命令提供的属性进行转换,避免了已往修改形文件来进行文字标注的 方法 ,直接控制表格文字字体、大小、下划线、上下脚标,倾斜,加粗等,使每个文字的风格均可以得到很好的控制,极大提高了文字标注的灵活性。
关键词: 计算 机 ---- 一、前言
---- Microsoft Excel 软件具有十分强大的制表、表格计算等功能,是普通人员常用的制表工具。可以通过其内嵌的VBA语言可以控制Microsoft Excel 的整个操作过程。
---- AutoCAD是由AutoDesk公司的工程绘图软件,是CAD市场的主流产品,功能十分强大,是工程制图人员常用的软件之一。AutoDesk公司从R14版以后,为其提供了VBA语言接口。
---- 在工程制图中,常常需要在图中插入绘制表格,一般有两种方法。其一,是利用剪贴板,将Microsoft Excel表格拷贝至剪贴板中,然后打开AutoCAD文件,再将剪贴板中的文件粘贴至所需位置。这种方法十分简单,但有其固有的缺点。①在保存文件必须将.xls和.dwg文件保存在一起,一旦缺少excel环境,则再对表格继续修改。②同时打开多个表格操作,需要占据较大的内存空间。③文件体积变得很大,表格有时在.dwg文件中以图标形式显示,不便于观察。
---- 第二种方法,即利用Microsoft Excel、AutoCAD都提供的VBA功能,编制程序进行转换,将Microsoft Excel表格按原来样子转换,即把Microsoft Excel表格中的文字和线条信息全部读取出来,在AutoCAD文件里按照一一对应的方式写出来,确保转换后的表格与原表格一致。这样彻底避免了前种方法的缺点,便于表格 内容 编辑。本文着重介绍此方法。
(转载自http://zw.nseac.coM科教作文网) ---- 二、表格转换工作机理 分析 及具体实现方法
---- 1.表格转换工作机理分析
---- 在制表过程中,经常遇到两个概念,表和方格。
---- 在Microsoft Excel中,与表对应的对象是工作表(Sheet或Worksheet),与每一个表格方格相对应的对象是单元格区域(range),它可以仅包括一个单元格(cell),也可以由多个单元格合并而成。
---- 在AutoCAD中,没有与表对应的对象,但表可以理解由若干条线和文字对象组合而成。
---- 根据上述分析,可以发现如下的转换方法:
---- 读取Microsoft Excel文件中的最小对象----单元格区域(range)的主要信息---线条和文字,然后在AutoCAD文件里在指定图层、位置画线条,书写文字。通过循环,遍历所有单元格区域(range),边读边写,最终完成表格的转换。转换过程中,保持线条、文字及其相关属性不发生改变。
---- 下面就转换工作的两个主要对象表格线条和表格文字进行讨论。
---- 2、表格线条的转换
---- Microsoft Excel 中内嵌的VBA为我们获取Excel文件信息提供了极大便利。通常,通过访问range对象,可以获得许多信息。访问分析表格的属性应从分析range开始。每一个range包括许多对象和属性,例如,font对象可以返回range的字体信息。通过遍历,即可获得整个表格信息。获取表格信息的目的在于准确地按照位置画表格线,同时确定文字位置。
---- 在获取表格信息时,存在一个最佳算法 问题 。以下就画线问题为例,阐明问题和解决方法。
---- 假设表格由a(a