注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

神瑛侍者的博客

 
 
 

日志

 
 

【转载】EXCEL+CAD+WORD处理数据  

2013-05-15 20:25:39|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
本文转载自PEACELVIRENE《EXCEL+CAD+WORD处理数据》
研究某梁在某荷载作用下的应力分布情况,拟处理成如下的曲线。
[总图]
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
[局部放大图1]
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
[局部放大图2]
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
[局部放大图3]
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
数字表示最大应力值,单位为MPa。可以想象,如果手动画的话,会要了人命的。还好我们有EXCEL这个入门级的强大的编程工具,我们的CAD还支持编程的,那么我们就可以利用两者的优势互补来完成这项间距的任务。
主要介绍局部放大图2和3的具体画法,圆形的那个因此类推,同比发散一下就可以了。
我们的数据同样利用程序采自ANSYS,看看华丽丽的数据文件:
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
 下面我们开始我们的EXCEL+CAD处理之旅!
先看我们的EXCEL处理界面:
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
说明:黄色框表示这部分区域所有单元格性质相同,黑框表示这部分区域的代表单元格。
区域①:为原始数据区域,左起各列依次为:节点号,X,Y,SX。各种情况的节点数是一样的,所以行数是一定的,所以其余部分可以不动,一种情况处理完之后,选中区域①所有列,DELETE,重新加载新的数据;
区域②:等于区域①第三列。程序(A2为例):=E2
区域③:辅助,为区域④编程用
区域④:把Y从大到小排列,G2单元格程序:=LARGE($E$2:$E$17,B2),其余类推
区域⑤:与排序后的Y相对应的SX,H2单元格程序:=VLOOKUP(G2,A:F,6,FALSE)
区域⑥:为核心区域,生成在CAD里画图的程序,主要步骤是:先画表示应力大小的横线(i2至i17),再画表示高度的竖线(i18),再用样条曲线画应力边界线(i19至i34),最后写上最大应力值(i35至i38)。i2单元格程序:="LINE"&" "&0&","&$L$1*G2&" "&$L$1*H2/$J$1&","&$L$1*G2&" ",i18单元格程序:="LINE"&" "&0&","&$L$1*G17&" "&0&","&$L$1*G2&" ",i19单元格程序:="SPLINE"&" "&H2/$J$1*$L$1&","&G2*$L$1,i20单元格程序:=H3/$J$1*$L$1&","&G3*$L$1,i35单元格程序:="text "&$L$1*H2/$J$1&","&$L$1*(G2+0.002)&" 800 0 "&ROUND(J2,0),其余类推。
区域⑦:获取最大应力和最小应力,并换算成MPa,同时只保留整数,J2单元格程序:=MIN(H2:H17)/1000000,四舍五入成整数在i35单元格中完成。
区域⑧⑨[10]:缩放系数,旨在把SX化成和X,Y同一数量级的数,使得图形美观。
区域[11]:把区域⑥的所有程序合并到一个单元格内,这样复制这些命令的时候会变得很方便。程序:=CONCATENATE(I2,CHAR(10),I3,CHAR(10),I4,CHAR(10),I5,CHAR(10),I6,CHAR(10),I7,CHAR(10),I8,CHAR(10),I9,CHAR(10),I10,CHAR(10),I11,CHAR(10),I12,CHAR(10),I13,CHAR(10),I14,CHAR(10),I15,CHAR(10),I16,CHAR(10),I17,CHAR(10),I18,CHAR(10),I19,CHAR(10),I20,CHAR(10),I21,CHAR(10),I22,CHAR(10),I23,CHAR(10),I24,CHAR(10),I25,CHAR(10),I26,CHAR(10),I27,CHAR(10),I28,CHAR(10),I29,CHAR(10),I30,CHAR(10),I31,CHAR(10),I32,CHAR(10),I33,CHAR(10),I34,CHAR(10),I35,CHAR(10),I36,CHAR(10),I37,CHAR(10),I38,CHAR(10),I39),同时设置此单元格为自动换行
区域⑥编写程序基本上是按照我们在CAD中画图的操作来的,例如像我们画一条线,我们的操作是:输入“line”,(我们使用命令流的全名),然后按一下空格,然后点第一个点,然后点第二个点,然后按一下空格结束。相信大家一看就懂了。对于写字有必要解释一下这段程序::="text_"&拟输入点的X坐标&","&拟输入点的Y坐标&"_字高_倾斜_"&拟输入的文字,对照上面的程序一比较就知道了。
下面我们讲讲具体的操作:
选中区域[11]的,复制,打开一个word(为什么要先复制进word呢?完全是因为我们有text这一步,不然我们完全可以直接由EXCEL到CAD的,大家去实践一下就知道了),进入后调出选择性粘贴(我设置了快捷键ALT+B,初始的快捷键应该是CTRL+ALT+V),选择无格式文本,去掉第一行的["],可恶的这个["],浪费了我多少时间,大家可以想想办法,把它去掉的。然后全选,剪切(因为接下去没用了,而且下次粘进新的程序的时候还要删除掉,还不如现在就剪切,而不是复制),然后来到CAD,点击其命令输入行,然后CTRL+V,ok了,画好一个了。灰常速度。之后的就是简单的重复性工作了。【今天尝试了网word里粘贴的时候,不选择无格式文本,而是用HTML格式或者无格式的unicode格式,不会出现那个可恶的引号,可以直接剪切。。。完美了。。。2011年5月23日】
EXCEL+CAD+WORD处理数据 - PEACELVIRENE - PEACELVIRENE
大家动手试试看吧。。。。。。
 
 
 
 
 
 
 
 
  评论这张
 
阅读(60)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017