焊接切割清单怎么链接单重、总重的属性？

dzp1023 · 发表于 2020-12-25 23:17:39

经典图书

如题，大侠帮忙

puttransnetcana · 发表于 2020-12-28 11:48:27

solidworks中如果焊件的零件不是由“结构构件”生成的话，切割清单项目的属性默认情况下会生成“材料”和“数量”2个属性。

以下方法的测试版本solidworks2016

今天我会用“宏”来自动的给切割清单中的零件添加“单重”和“总重”，并自动链接到工程图中，这在实际工作中是非常有用的，比如零件好几百的板料的焊件，下料的尺寸、数量和重量统计。如果人工智能来做的话，不仅容易出错，工作也很繁琐。

今天我就给亲讲一下如何把数量和重重链接到solidworks工程图的“焊接清单明细表”中。

1.运行宏，生成单重和总重
1.1宏代码

Option Explicit
Dim swApp As SldWorks.SldWorks
Dim Part As SldWorks.ModelDoc2
Dim thisFeat As SldWorks.Feature
Dim thisSubFeat As SldWorks.Feature
Dim cutFolder As Object
Dim BodyCount As Integer
Dim fn As String
Dim pn As String
Dim custPropMgr As SldWorks.CustomPropertyManager
Dim propNames As Variant
Dim vName As Variant
Dim propName As String
Dim Value As String
Dim resolvedValue As String
Dim TotalW As Double
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set thisFeat = Part.FirstFeature
Do While Not thisFeat Is Nothing
If thisFeat.GetTypeName = "SolidBodyFolder" Then
thisFeat.GetSpecificFeature2.UpdateCutList
End If
Set thisSubFeat = thisFeat.GetFirstSubFeature
Do While Not thisSubFeat Is Nothing
If thisSubFeat.GetTypeName = "CutListFolder" Then
Set cutFolder = thisSubFeat.GetSpecificFeature2
End If
If Not cutFolder Is Nothing Then
BodyCount = cutFolder.GetBodyCount
If BodyCount > 0 Then
Set custPropMgr = thisSubFeat.CustomPropertyManager
If Not custPropMgr Is Nothing Then
custPropMgr.Delete "Total Weight"
custPropMgr.Delete "Weight"
fn = thisSubFeat.Name
pn = Part.GetTitle
custPropMgr.Add "Weight", "文字", Chr(34) & "SW-Mass@@@" & fn & "@" & pn & Chr(34)
propNames = custPropMgr.GetNames
If Not IsEmpty(propNames) Then
For Each vName In propNames
propName = vName
custPropMgr.Get2 propName, Value, resolvedValue
If propName = "Weight" Then TotalW = resolvedValue
Next vName
End If
custPropMgr.Add "Total Weight", "文字", Format(BodyCount * TotalW, "0.00")
End If
End If
End If
Set thisSubFeat = thisSubFeat.GetNextSubFeature
Loop
Set thisFeat = thisFeat.GetNextFeature
Loop
End Sub

复制代码

1.2新建宏

1.3运行宏后添加单重和总重属性

2.在工程图的焊接清单中添加单重和总重
2.1添加单重

2.2添加总重

upstate · 发表于 2020-12-28 11:05:58

经典图书

顶一下，坐等高手！

auto1234 · 发表于 2020-12-28 12:42:33

好好学习，天天向上！

schjck · 发表于 2020-12-31 13:09:30

经典案例图书

upstate 发表于 2020-12-28 11:05
顶一下，坐等高手！

经典案例图书

顶一下，坐等高手！

dzp1023 · 发表于 2021-1-2 15:49:30

puttransnetcana 发表于 2020-12-28 11:48
solidworks中如果焊件的零件不是由“结构构件”生成的话，切割清单项目的属性默认情况下会生成“材料” ...

运用宏命令，非常感谢分享！

dzp1023 · 发表于 2021-1-2 16:29:48

经典案例图书

puttransnetcana 发表于 2020-12-28 11:48
solidworks中如果焊件的零件不是由“结构构件”生成的话，切割清单项目的属性默认情况下会生成“材料” ...

代码好像有问题，在19项出现错误，编译错误，发现二义性的名称：mian

sazbwz · 发表于 2021-1-5 15:53:09

运行宏命令麻烦，自己设置零件模板时，方程式里设置好、保存一劳永逸，不管焊件、还是零件重量自动显示，这是我以前没法逼出来的，论坛找一找吧，找不到我告诉你。

1215956038 · 发表于 2021-4-10 06:12:21

感谢楼主分享，很不错！

1215956038 · 发表于 2021-4-10 12:29:09

经典图书

谢谢楼主分享

lvhailong · 发表于 2021-7-16 14:19:29

好东西，努力学习学习！

小西太阳 · 发表于 2022-4-13 09:18:17

sazbwz 发表于 2021-1-5 15:53
运行宏命令麻烦，自己设置零件模板时，方程式里设置好、保存一劳永逸，不管焊件、还是零件重量自动显示， ...

楼主，模板怎么设置

824751842 · 发表于 2022-7-19 22:22:59

感谢楼主分享，很不错！

yun6yun7 · 发表于 2022-11-30 22:49:13

很不错，找到组织了！

sg2010 · 发表于 2023-5-31 11:24:43

加入QQ群
参与讨论和学习

或扫描二维码加入

很不错，找到组织了！

1215956038 · 发表于前天 21:14

经典案例图书

楼主辛苦了！

		自动登录	找回密码
密码			立即注册

焊接切割清单怎么链接单重、总重的属性？

最佳新人

活跃会员

热心会员

宣传达人

灌水之王

突出贡献