明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 9622|回复: 29

CAD图形 合并工具 (VB)

[复制链接]
发表于 2014-4-18 16:12:56 | 显示全部楼层 |阅读模式
本帖最后由 dpf200810 于 2017-7-31 12:15 编辑

CAD图形 合并工具 (VB)



1、由于程序是用vb6.0写的所以在CAD2010以上版本使用要安装vba支持文件下载地址如下:

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=73729
以下为最近4年cad vba 模块官方下载地址
https://knowledge.autodesk.com/s ... ons-module-vba.html
2、弹 Runtime Error 48  nable to Load DLL  错误请修复cad试试
3、文件请保证“.dwg”前保证不为“空格”(tekla导出的图有时存在“文件名+空格+'.dwg'的情况 ”)
ps:1、文件名“1 .dwg"程序不会执行合并;“1.dwg” 则可以
2、比较粗暴解决办法1、全选文件;2、重命名随便命名一个文件名;3、插件选择文件;4、合并图形;5、撤销重命名
附件:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2016-9-26 09:53:03 | 显示全部楼层
1、于程序是用vb6.0写的所以在CAD2010以上版本使用要安装vba支持文件下载地址如下:

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=73729
以下为最近4年cad vba 模块官方下载地址
https://knowledge.autodesk.com/s ... ons-module-vba.html
2、弹 Runtime Error 48  nable to Load DLL  错误请修复cad试试
3、文件请保证“.dwg”前保证不为“空格”(tekla导出的图有时存在“文件名+空格+'.dwg'的情况 ”)
ps:1、文件名“1 .dwg"程序不会执行合并;“1.dwg” 则可以
2、比较粗暴解决办法1、全选文件;2、重命名随便命名一个文件名3、插件选择文件;3、合并图形;4、撤销重命名
发表于 2022-3-31 17:55:25 | 显示全部楼层
很感谢你的cad 合并插件,但是 不同dwg的里面的同名块,在合并时候会被替代,这是唯一的不足,可以选择对块重新命名,可以解决这个问题

例如三个dwg文件,里面都有FFF这个名称的块
其中一个矩形 一个三角形 一个圆形
最后合并都变成了矩形!
麻烦大佬优化一下
有偿也是可以的!!!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2022-6-29 13:56:33 | 显示全部楼层
lady_poul 发表于 2022-3-31 17:55
很感谢你的cad 合并插件,但是 不同dwg的里面的同名块,在合并时候会被替代,这是唯一的不足,可以选择对块 ...

我有,加QQ 321399857
 楼主| 发表于 2014-4-18 16:15:19 | 显示全部楼层
本帖最后由 dpf200810 于 2014-4-18 16:19 编辑

合好后记得分解

dwg格式文件“.dwg”前不能为空格


主要用于看图  和  Batchplot_setup_3.5.9使用前的合并图形

点评

还是用这种原始的方式呀  发表于 2014-11-5 08:48

评分

参与人数 2明经币 +2 金钱 +5 收起 理由
freehand8008 + 1 + 5
love1030312 + 1 很给力! 真心的很不错

查看全部评分

发表于 2014-4-18 17:33:56 | 显示全部楼层
不错!!!如果能识别外部参照图框 和图框块就好了  

有的图  还有图框以外的东西
发表于 2014-4-19 17:09:29 | 显示全部楼层
支持一下。
是不是拼图的意思?
至于批量打印,我想有个EBatPrint不用合并图,支持多图打印。
 楼主| 发表于 2014-6-28 10:31:31 | 显示全部楼层
本帖最后由 dpf200810 于 2014-6-28 10:42 编辑

VirSCAN.org Scanned Report :
Scanned time   : 2014-06-28 10:39:28
Scanner results: 0%的杀软(0/38)报告发现病毒
File Name      : 合并图形20140402.exe
File Size      : 77824 byte
File Type      : application/x-dosexec
MD5            : 30444c781908a28830079d95d6e94f04
SHA1           : 67ec276850e68d3eff665b15dc8c5371cb15d421
Online report  : http://r.virscan.org/report/0cbba9698f0e09d3bc25496086b4c2c1

Scanner        Engine Ver      Sig Ver           Sig Date    Time   Scan result
ANTIVIR        1.9.2.0        1.9.159.0         7.11.157.100   13   没有发现病毒            
AVAST!         140627-0       4.7.4             2014-06-27     16   没有发现病毒            
AVG            2109/7210      10.0.1405         2014-06-20     1    没有发现病毒            
ArcaVir        1.0            2011              2014-05-30     8    没有发现病毒            
Authentium     4.6.5          5.3.14            2013-12-01     1    没有发现病毒            
Baidu Antivirus2.0.1.0        4.1.3.52192       2.0.1.0        4    没有发现病毒            
Bitdefender    7.55575        7.90123           2014-06-27     8    没有发现病毒            
ClamAV         19132          0.97.5            2014-06-26     1    没有发现病毒            
Comodo         15023          5.1               2014-06-27     3    没有发现病毒            
Dr.Web         5.0.2.3300     5.0.1.1           2014-06-20     29   没有发现病毒            
F-PROT         4.6.2.117      6.5.1.5418        2014-06-27     1    没有发现病毒            
F-Secure       2014-04-02-01  9.13              2014-04-02     1    没有发现病毒            
Fortinet       22.389         5.1.153           2014-06-27     1    没有发现病毒            
GData          24.2881        24.2881           2014-06-27     9    没有发现病毒            
IKARUS         1.06.01        V1.32.31.0        2014-06-27     14   没有发现病毒            
NOD32          9809           3.0.21            2014-05-16     1    没有发现病毒            
Quickheal      14.00          14.00             2014-06-14     2    没有发现病毒            
SOPHOS         5.02           3.51.0            2014-06-20     6    没有发现病毒            
Sunbelt        3.9.2589.2     3.9.2589.2        2014-06-13     1    没有发现病毒            
TheHacker      6.8.0.5        6.8.0.5           2014-06-12     1    没有发现病毒            
Vba32          3.12.26.3      3.12.26.3         2014-06-27     4    没有发现病毒            
ViRobot        2.73           2.73              2014-06-13     1    没有发现病毒            
VirusBuster    15.0.829.0     5.5.2.13          2014-06-26     13   没有发现病毒            
a-squared      9.0.0.4142     9.0.0.4142        2014-06-27     10   没有发现病毒            
nProtect       9.9.9          9.9.9             2013-12-27     3    没有发现病毒            
卡巴斯基   5.5.33         5.5.33            2014-04-01     21   没有发现病毒            
奇虎360      1.0.1          1.0.1             1.0.1          12   没有发现病毒            
安博士V3    9.9.9          9.9.9             2013-05-28     3    没有发现病毒            
安天         014621         AVL140512         2014-06-27     5    没有发现病毒            
江民杀毒   16.0.100       1.0.0.0           2014-06-26     14   没有发现病毒            
熊猫卫士   9.05.01        9.05.01           2014-06-15     3    没有发现病毒            
瑞星         25.17.00.04    25.17.00.04       2014-06-02     3    没有发现病毒            
百度杀毒   1.0            1.0               2014-04-02     1    没有发现病毒            
费尔         17.47.17308    1.0.2.2108        2014-06-16     6    没有发现病毒            
赛门铁克                  1.3.0.24                         56   引擎扫描超时            
趋势科技   10.886.07      9.500-1005        2014-06-26     1    没有发现病毒            
迈克菲      7474           5400.1158         2014-06-19     11   没有发现病毒            
金山毒霸   2.1            2.1               2013-09-22     2    没有发现病毒            

发表于 2014-6-28 15:54:32 | 显示全部楼层
这真是一个好东西啊  支持
发表于 2014-6-30 09:31:11 | 显示全部楼层
咱也不能只做伸手党啊
发表于 2014-11-4 18:56:46 | 显示全部楼层
试试效果咋样,64位同样?
 楼主| 发表于 2014-11-13 14:17:55 | 显示全部楼层
晓晓小饭夹 发表于 2014-11-4 18:56
试试效果咋样,64位同样?

能用 的         
发表于 2014-11-22 17:26:08 | 显示全部楼层
有一个问题,当图纸不是标准图框大小,又大有小的时候,图纸重叠比较厉害
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-18 12:47 , Processed in 0.199521 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表