solidworks文件属性自定义
公司要求零件命名为:零件号+零件名称下图如何设置才能自动识别的?求大神指点!
就是在零件名称 后面定义名字跟代号就可以了 ,出工程图自动在工程图显示
百度一下“solidworks图号和名称分离命令”有惊喜。 零件名称很难定义准确,所以不建议把零件名称给增加上。 可以直接在开始菜单——SolidWorks工具——属性编制程序里做 宏處理
Dim swApp As Object
Dim Part As Object
Dim SymbolPlace As Integer
Dim Number_Name As String
Dim Number_ As String
Dim Name_ As String
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Number_Name = swApp.ActiveDoc.GetTitle() '取得零件的 編號-名稱(本例編號名稱是用 " - " 符號分離)
SymbolPlace = InStr(Number_Name, "-") '取得 " - " 符號的位置數
Number_ = Left(Number_Name, SymbolPlace - 1) '取得 零件編號
Name_ = Mid(Number_Name, SymbolPlace + 1, Len(Number_Name) - SymbolPlace - 7) '取得 零件名稱
blnretval = Part.DeleteCustomInfo2("", "PartNumber")
blnretval = Part.DeleteCustomInfo2("", "PartName")
blnretval = Part.AddCustomInfo3("", "PartNumber", swCustomInfoText, Number_)
blnretval = Part.AddCustomInfo3("", "PartName", swCustomInfoText, Name_)
End Sub
感谢分享
页:
[1]