作者：网友
更新时间：2025-06-16
说明：
1.零件状态运行，
2.多实体零件自动拆分成一个个单实体零件，并组合成一个装配体，原点装配，
3.装配中装配原始零件，自动成压缩状态。
4，当零件只有曲面或实体其中一种时，下标报错。
5，新建零件或装配体时，重命报错（非第一次运行)。
6，点选其中一个或多个实体，仅输出选中实体 ，再新建零件来组合装配体。
7，增加最后保存装配体。
增加输入名称选项
执行时会提示输入装配体名称，建立的装配体，装配体名称自动在后面加“00”，相关实体建立的名称则为输入的装配名称后面加“01”、“02”。。。。如果第二次执行时输入 相同的名称 则，装配体名称后则加“01”，相关实体建立的零件则为输入的装配名称后面加，已在存在的序号加1。
如运行出错：
可以根据下面的代码修改，保存零件部件也要同样修改，只是要注意变量序号1的位置。
mm= 1
G_mm:
FileA = Left(File, Len(File) - 7) & "-装配" & mm & ".SLDASM" '装配体路径
If Dir(FileA) <> "" Then mm = mm + 1: GoTo G_mm '当文件名存在时，序号+1
如遇报错提示438
InsertPart3是sw2019以上才有，sw2018没有，你可以试试换成InsertPart2。
把new_Part_A和new_Part_B段的修改成。
Set myFeature = swModel.InsertPart2(File, 259)
注：本插件、【宏】来源于网络，该工具为网友上传，具体使用需自行探索，请谨慎下载，最终所有权归原创作者所有，如有问题可联系作者，如有侵权可联系本站删除！