找回密码 注册 QQ登录
开思网工业级高精度在线3D打印服务

iCAx开思网

CAD/CAM/CAE/设计/模具 高清视频【积分说明】如何快速获得积分?在线3D打印服务,一键上传,自动报价 
查看: 1376|回复: 9

[求助] solidworks 使用宏在标注后加注释

[复制链接]
发表于 2022-4-15 08:14:49 | 显示全部楼层 |阅读模式
在工作中需要在铁管上的孔上注明是否为通孔,想通过宏来解决,但是却出现不能同时兼顾的现象,问题见下图(如果宏内有加直径符号,标注方孔时会出现直接符号,如果不加,标注圆孔时又没有直径符号),下面的代码是没加直径符号的代码,怎么能让宏自动判断是否要加直径符号,请高手帮忙。
Sub main()
7 |4 b+ i2 i6 u+ d- |9 P! r
Set swApp = CreateObject("SldWorks.Application")# X3 H/ L1 e5 w) n) S% ^7 y- [% P
Set Part = swApp.ActiveDoc
Part.EditDimensionProperties2 0, 0, 0, "", "", 1, 9, 1, 1, 11, 11, "", "通", 1, "", "", 0
Part.EditDimensionProperties2 0, 0, 0, "", "", 1, 9, 1, 1, 11, 11, "", "通孔", 1, "", "", 0$ p1 @& m, U) o( M0 y

Part.ClearSelection
End Sub

本帖子中包含更多资源

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

x
 楼主| 发表于 2022-4-15 15:30:58 | 显示全部楼层
自己顶一下,高手在哪里?
 楼主| 发表于 2022-4-15 17:26:59 | 显示全部楼层
已解决,多谢了
发表于 2022-4-19 11:04:29 | 显示全部楼层
楼主能告知一下怎么使用吗,最新代码
发表于 2022-4-23 19:42:25 | 显示全部楼层
这个不如自己在尺寸公差上添加文字不就好了吗?
 楼主| 发表于 2022-5-14 16:21:20 | 显示全部楼层
本帖最后由 snycef 于 2022-5-14 16:22 编辑

给大家参考一下

本帖子中包含更多资源

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

x
发表于 2022-12-2 17:45:43 | 显示全部楼层
snycef 发表于 2022-5-14 16:21
给大家参考一下

感谢分享
发表于 2022-12-7 14:57:44 | 显示全部楼层
感谢分享
发表于 2022-12-10 08:27:42 | 显示全部楼层
感谢楼主分享,很不错!
发表于 2022-12-31 15:31:41 | 显示全部楼层
这方法不错,支持一下。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

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

GMT+8, 2023-2-5 22:56 , Processed in 0.028071 second(s), 11 queries , Gzip On, Redis On.

Powered by Discuz! X3.3

© 2002-2023 www.iCAx.org

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