solidworks批量图号分离_SolidWorks图号名称分离宏

SolidWorks

宏代码，用来分离文件名中的图号与零件名并自动写入属性，文件名不需要“

-

”或

者

空

格

等

特

殊

符

号

，

不

限

制

图

号

长

度

，

均

可

识

别

并

分

离

使用方法

1.

打开宏工具栏

2

点击新建宏按钮

选择路径，输入新建宏名称

3

删除窗口里的所有代码，把本文档里的代码粘贴进去保存

4

打开

SolidWorks

自定义

5

打开命令标签，选择宏，把方框里的图标拖动到

SolidWorks

主界面工具栏

6

在弹出窗口浏览刚刚保存的宏文件路径，点击确定

7

在打开文件的情况下，点击刚刚在工具栏创建的宏按钮即可自动识别并写入属性

以下为代码：

SubMAIN()

SetswApp=CreateObject("sldworks.application")

SetPart=swApp.ActiveDoc

=1

SetCurCFG=Part.GetActiveConfiguration()

ConfName=CurCFG.Name

Name=

c=Replace(Name,"","")

blnretval=Part.AddCustomInfo3(ConfName,"

代号

",swCustomInfoText,frmPartID)

blnretval=Part.AddCustomInfo3(ConfName,"

名称

",swCustomInfoText,frmPartID)

blnretval=Part.AddCustomInfo3(ConfName,"

备注

",swCustomInfoText,frmPartID)

b=Len(c)