 摘要： 今天有學(xué)員問溪風(fēng)SolidWorks命名文件的時(shí)候是代號(hào)加名稱的方法保存的圖紙，然后能不能自動(dòng)將代號(hào)和名稱自動(dòng)填充到零件或裝配體屬性里面，其實(shí)這個(gè)是可以的，溪風(fēng)在之前也見過有的工程...今天有學(xué)員問溪風(fēng)SolidWorks命名文件的時(shí)候是代號(hào)加名稱的方法保存的圖紙，然后能不能自動(dòng)將代號(hào)和名稱自動(dòng)填充到零件或裝配體屬性里面，其實(shí)這個(gè)是可以的，溪風(fēng)在之前也見過有的工程師這么對(duì)文件起名字。比如下面SolidWorks圖紙的命名規(guī)格：代號(hào)空格名稱。如下圖所示：
通過對(duì)SolidWorks圖紙進(jìn)行有規(guī)則的命名，比如【代號(hào)+空格+名稱】這樣的規(guī)則，對(duì)零件或者裝配體進(jìn)行保存。那么如何才能實(shí)現(xiàn)SolidWorks文檔屬性跟著自動(dòng)填充呢？
今天溪風(fēng)就給大家分享SolidWorks代號(hào)名稱分離宏的制作和使用方法。 SolidWorks代號(hào)名稱分離宏的制作SolidWorks代號(hào)名稱分離宏代碼如下： BASIC '定義solidwork
Dim swApp As Object
Dim Part As Object
Dim SelMgr As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Dim Feature As Object
Dim a As Integer
Dim b As String
Dim m As String
Dim e As String
Dim k As String
Dim t As String
Dim c As String
Dim j As Integer
Dim strmat As String
Dim tempvalue As String
Sub main()
'link solidworks
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set SelMgr = Part.SelectionManager
swApp.ActiveDoc.ActiveView.FrameState = 1
'設(shè)定變量
c = swApp.ActiveDoc.GetTitle() '零件名
strmat = Chr(34) + Trim("SW-Material" + "@") + c + Chr(34)
blnretval = Part.DeleteCustomInfo2("", "代號(hào)")
blnretval = Part.DeleteCustomInfo2("", "名稱")
blnretval = Part.DeleteCustomInfo2("", "材料")
a = InStr(c, " ") - 1 '重點(diǎn)：分隔標(biāo)識(shí)符，這里是一個(gè)空格
If a > 0 Then
k = Left(c, a)
t = Left(LTrim(e), 3)
If t = "GBT" Then
e = "GB/T" + Mid(k, 4)
Else
e = k
End If
b = Mid(c, a + 2)
t = Right(c, 7)
If t = ".SLDPRT" Or t = ".SLDASM" Then
j = Len(b) - 7
Else
j = Len(b)
End If
m = Left(b, j)
End If
blnretval = Part.AddCustomInfo3("", "代號(hào)", swCustomInfoText, e) '代號(hào)
blnretval = Part.AddCustomInfo3("", "名稱", swCustomInfoText, m) '名稱
blnretval = Part.AddCustomInfo3("", "表面處理", swCustomInfoText, " ")
End Sub使用方法： 1、打開SolidWorks，工具-新建宏
2、 新建之后將里面的文字全部刪除，然后將上面的SolidWorks代號(hào)名稱分離宏，復(fù)制粘貼進(jìn)去即可 然后保存，宏命令的默認(rèn)格式是.swp 如果對(duì)電腦操作不熟練的學(xué)員，可以直接下載溪風(fēng)已經(jīng)做好的宏程序，在文章底部附件里面下載。 SolidWorks代號(hào)名稱分離宏使用方法 打開我們的SolidWorks文件，一定是代號(hào)+空格+名稱，比如我這里的xifengboke是代號(hào)，溪風(fēng)博客是名稱
然后我們來使用我們做好的宏程序，點(diǎn)擊菜單-工具-宏-運(yùn)行宏-選擇上面保存的宏（或者下載附件里面宏）
然后點(diǎn)擊打開，幾乎是瞬間，我們代號(hào)和名稱就自動(dòng)填充了
就是這么的簡(jiǎn)單方便。希望可以幫助到有需要的學(xué)員。 |
|
|
