본문 바로가기
  • Welcome!
VBA, VB.NET For Creo

rename a simplified representation

by ToolBOX01 2024. 11. 19.
반응형

▷ Code

Dim solid As IpfcSolid
Set solid = oModel

'//get the required simprep from the solid (Assembly/part)
Dim simprep As IpfcSimpRep
Set simprep = solid.GetSimpRep("TEST")
 
Dim item As pfcls.IpfcModelItem
Set item = simprep
item.SetName ("NEW_TEST")