|
7#

楼主 |
发表于 2023-4-4 11:42:51
|
只看该作者
经典案例图书
项目编号代码“Part.Extension.CustomPropertyManager("").Set("项目编号",Rtrim(Replace(Left(Part.GetTitle,InStr(Part.GetTitle,".")) ,"."," ")))”
图纸编号代码“Part.Extension.CustomPropertyManager("").Set("图纸编号",Left(Part.GetTitle,InStr(Part.GetTitle," ")-1))”
零件编号代码“Part.Extension.CustomPropertyManager("").Set("零件号",Trim(Replace(Right(left(Part.GetTitle,InStr(Part.GetTitle," ")),Len(Left(Part.GetTitle,InStr(Part.GetTitle," ")))-InStr(Left(Part.GetTitle,InStr(Part.GetTitle," ")),"-")), " "," ")))”
图纸名称代码“Part.Extension.CustomPropertyManager("").Set("图纸名称",Trim(Replace(Right(Part.GetTitle,Len(Part.GetTitle)-InStr(Part.GetTitle," ")),".SLDPRT"," ")))” |
|