摘要信息的宏

xixi520108

   经典图书

请教歖的如何在摘要里面用宏输入信息。我试了一下不能录制。感谢大家的不吝赐教。谢谢

lisixu

API帮助里有现成的代码
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
swModel.SummaryInfo(swSumInfoTitle) = "标题"
swModel.SummaryInfo(swSumInfoSubject) = "主题"
swModel.SummaryInfo(swSumInfoAuthor) = "作者"
swModel.SummaryInfo(swSumInfoKeywords) = "关键字"
swModel.SummaryInfo(swSumInfoComment) = "备注"
End Sub
复制代码

djy123

   经典图书

使用英文菜单后,就知道关键词,再在API帮助中搜索关键词

oldmouse81

感谢大家的的热心支持！！！下面的两个图能提供一下宏代码吗？谢谢Set Part = swApp.ActiveDoc
boolstatus = Part.Extension.SelectByID2("Z轴气缸座底板H-1@06.固定气缸Z轴A1", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.CompConfigProperties4(2, 0, True, True, True, False)
boolstatus = Part.EditRebuild3()
boolstatus = Part.Extension.SelectByID2("Z轴气缸连接板-1@06.固定气缸Z轴A1", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.CompConfigProperties4(2, 0, True, True, False, False)

jinglian

   经典案例图书

我觉得你真的需要亲自尝试一下3楼教的在“API帮助”中找答案的方法，你要的东西“API帮助”里面基本都有。
遇到问题不自己先去找方法，老是这么伸手白要，我个人觉得挺讨嫌。

luowanlong

谢谢你的教导。鄙人没有系统的学习过编程，能力有限。对于录制宏可以使用的，我还有稍微有点组合能力。其他的真心看不懂。我个人觉得只是为了满足我工作需要。减轻劳动负荷。如果我的能力到了自己能解决问题了，我有何必再次发帖。麻烦大家，惹人厌。

fdlandlky

   经典案例图书

solidworks网，必须顶一下
。。。。。。。。。。。。。。。。。。。。。。。。

ywd700420

来学习学习

ouming

谢谢分享