一区二区三区日韩精品-日韩经典一区二区三区-五月激情综合丁香婷婷-欧美精品中文字幕专区

分享

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充

 sarazyn 2022-05-15
SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充摘要: 今天有學(xué)員問溪風(fēng)SolidWorks命名文件的時(shí)候是代號加名稱的方法保存的圖紙,然后能不能自動將代號和名稱自動填充到零件或裝配體屬性里面,其實(shí)這個(gè)是可以的,溪風(fēng)在之前也見過有的工程...

今天有學(xué)員問溪風(fēng)SolidWorks命名文件的時(shí)候是代號加名稱的方法保存的圖紙,然后能不能自動將代號和名稱自動填充到零件或裝配體屬性里面,其實(shí)這個(gè)是可以的,溪風(fēng)在之前也見過有的工程師這么對文件起名字。比如下面SolidWorks圖紙的命名規(guī)格:代號空格名稱。如下圖所示:

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第1張

通過對SolidWorks圖紙進(jìn)行有規(guī)則的命名,比如【代號+空格+名稱】這樣的規(guī)則,對零件或者裝配體進(jìn)行保存。那么如何才能實(shí)現(xiàn)SolidWorks文檔屬性跟著自動填充呢?

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第2張

今天溪風(fēng)就給大家分享SolidWorks代號名稱分離宏的制作和使用方法。

SolidWorks代號名稱分離宏的制作

SolidWorks代號名稱分離宏代碼如下:

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("", "代號")
blnretval = Part.DeleteCustomInfo2("", "名稱")
blnretval = Part.DeleteCustomInfo2("", "材料")
a = InStr(c, " ") - 1      '重點(diǎn):分隔標(biāo)識符,這里是一個(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("", "代號", swCustomInfoText, e)  '代號
blnretval = Part.AddCustomInfo3("", "名稱", swCustomInfoText, m)  '名稱
blnretval = Part.AddCustomInfo3("", "表面處理", swCustomInfoText, " ")
End Sub

使用方法:

1、打開SolidWorks,工具-新建宏

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第3張

2、 新建之后將里面的文字全部刪除,然后將上面的SolidWorks代號名稱分離宏,復(fù)制粘貼進(jìn)去即可

然后保存,宏命令的默認(rèn)格式是.swp

如果對電腦操作不熟練的學(xué)員,可以直接下載溪風(fēng)已經(jīng)做好的宏程序,在文章底部附件里面下載。

SolidWorks代號名稱分離宏使用方法

打開我們的SolidWorks文件,一定是代號+空格+名稱,比如我這里的xifengboke是代號,溪風(fēng)博客是名稱

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第4張

然后我們來使用我們做好的宏程序,點(diǎn)擊菜單-工具-宏-運(yùn)行宏-選擇上面保存的宏(或者下載附件里面宏)

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第5張

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第6張

然后點(diǎn)擊打開,幾乎是瞬間,我們代號和名稱就自動填充了

SolidWorks代號名稱分離宏程序,輕松實(shí)現(xiàn)SolidWorks文件圖號和名稱的自動分離填充  SolidWorks插件 solidworks宏 第7張

就是這么的簡單方便。希望可以幫助到有需要的學(xué)員。

    本站是提供個(gè)人知識管理的網(wǎng)絡(luò)存儲空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多

    日本 一区二区 在线| 国产欧美日韩一级小黄片| 欧美日韩一区二区午夜| 亚洲国产精品久久综合网| 欧美不卡高清一区二区三区| 国语久精品在视频在线观看| 久久热麻豆国产精品视频| 美女激情免费在线观看| 少妇肥臀一区二区三区| 亚洲中文字幕日韩在线| 人人爽夜夜爽夜夜爽精品视频| 国产又大又黄又粗的黄色| 东京热男人的天堂久久综合| 精品少妇一区二区视频| 成人亚洲国产精品一区不卡| 精品伊人久久大香线蕉综合| 欧美字幕一区二区三区| 日韩欧美三级视频在线| 欧美丰满人妻少妇精品| 国产日韩在线一二三区| 久久精品国产在热久久| 亚洲一区在线观看蜜桃| 精品丝袜一区二区三区性色| 在线免费观看一二区视频| 日本婷婷色大香蕉视频在线观看| 亚洲一二三四区免费视频| 美女黄片大全在线观看| 色小姐干香蕉在线综合网| 国产成人一区二区三区久久| 91欧美亚洲视频在线| 国产精品午夜视频免费观看| 美女黄色三级深夜福利| 亚洲专区一区中文字幕| 日本午夜免费观看视频| 老司机精品视频免费入口| 视频在线播放你懂的一区| 亚洲永久一区二区三区在线| 国产一区二区三区av在线| 日韩人妻精品免费一区二区三区| 亚洲熟女乱色一区二区三区| 婷婷色香五月综合激激情|