SolidWorks图号名称分离无图号则只提取名称.swp Solidworks 图号名称分离程序,无图号则只提取名称Sub main() 'link solidworks Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Set SelMgr = Part.SelectionManage