找回密码 注册 QQ登录
开启辅助访问 位置分享设为首页收藏本站清爽阅读
一站式解决方案

iCAx开思网

iCAx开思网»开思论坛 › Dassault Systèmes软件讨论区 › SOLIDWORKS › 宏例子: 打開指定目錄逐一處理所有零件的瑣事
CAD/CAM/CAE/设计/模具 高清视频【积分说明】如何快速获得积分？在线3D打印服务，一键上传，自动报价 
1234567下一页
返回列表 发新帖
查看: 32480|回复: 82
打印 上一主题 下一主题

[分享] 宏例子: 打開指定目錄逐一處理所有零件的瑣事

[复制链接]
Francis
跳转到指定楼层
1楼
发表于 2014-9-23 13:17:37 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x
本帖最后由 Francis 于 2014-9-24 23:10 编辑

僅供參考:
  1. Sub Test()
  2. Set swApp = Application.SldWorks
  3. PartPath = "D:\Project" '設定目錄
  4. PartFileName = Dir(PartPath & "*.sldprt") '搜尋首個零件檔案名稱
  5. Do Until PartFileName = "" '直至搜尋到空值
  6.     Set Part = swApp.OpenDoc(PartPath & PartFileName, 1) '開啟零件
  7.     '加入所需語句
  8.     '.
  9.     '.
  10.     '.
  11.     '.
  12.     Part.Save '保存
  13.     swApp.CloseDoc (PartFileName) '關閉零件
  14.     PartFileName = Dir '搜尋下一個零件檔案名稱
  15. Loop '循環搜尋
  16. End Sub
复制代码

评分

参与人数 2技术 +2 贡献 +1 收起 理由
gg555gg555 + 1 超给力！
gt.adan + 2 很给力!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏27 分享淘帖 赞一下！赞一下！
开思网工业级高精度在线3D打印服务：材料多、价格低、交货快！点击上传模型... 实时报价
回复

举报

Francis
推荐
 楼主| 发表于 2014-11-18 23:47:42 | 只看该作者

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有帐号？注册

x

评分

参与人数 1技术 +2 贡献 +10 收起 理由
gt.adan + 2 + 10 很给力!

查看全部评分

开思网工业级高精度在线3D打印服务：材料多、价格低、交货快！点击上传模型... 实时报价
回复 支持 1 反对 0

举报

大鹿
推荐
发表于 2014-11-20 12:24:05 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x

评分

参与人数 1贡献 +10 收起 理由
wutong490 + 10 赞一个!

查看全部评分

工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 1 反对 0

举报

Francis
4楼
 楼主| 发表于 2014-9-23 13:33:15 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x
开思网工业级高精度在线3D打印服务：材料多、价格低、交货快！点击上传模型... 实时报价
回复 支持 反对

举报

gt.adan
5楼
发表于 2014-9-23 15:09:38 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x

评分

参与人数 1技术 +1 收起 理由
Francis + 1 赞一个!

查看全部评分

工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 反对

举报

gg555gg555
6楼
发表于 2014-9-24 08:09:31 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x
工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 反对

举报

Francis
7楼
 楼主| 发表于 2014-9-25 01:18:08 | 只看该作者

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有帐号？注册

x

评分

参与人数 1技术 +2 贡献 +10 收起 理由
gt.adan + 2 + 10 神马都是浮云

查看全部评分

开思网工业级高精度在线3D打印服务：材料多、价格低、交货快！点击上传模型... 实时报价
回复 支持 反对

举报

Francis
8楼
 楼主| 发表于 2014-9-25 01:33:14 | 只看该作者

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有帐号？注册

x
工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 反对

举报

wxg263
9楼
发表于 2014-9-27 11:14:48 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x
工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 反对

举报

Francis
10楼
 楼主| 发表于 2014-9-27 23:00:03 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x
工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 反对

举报

gt.adan
11楼
发表于 2014-11-3 15:12:16 | 只看该作者

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有帐号？注册

x
开思网工业级高精度在线3D打印服务：材料多、价格低、交货快！点击上传模型... 实时报价
回复 支持 反对

举报

Francis
12楼
 楼主| 发表于 2014-11-3 15:53:51 | 只看该作者

马上注册，结交更多同行朋友，交流，分享，学习。

您需要 登录 才可以下载或查看，没有帐号？注册

x
工业级高精度3D打印，24小时在线提供树脂、尼龙、金属3D打印服务，最快12小时交货！
回复 支持 反对

举报

1234567下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

3D打印手板模型快速制作服务，在线报价下单！

QQ 咨询|手机版|联系我们|iCAx开思网  

GMT+8, 2024-5-10 14:43 , Processed in 0.032960 second(s), 14 queries , Gzip On, Redis On.

Powered by Discuz! X3.3

© 2002-2024 www.iCAx.org

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